तर्क लंबाई शून्य

Question

है, मैं जॉर्ज क्लूनी के विकिपीडिया पृष्ठ से व्यवसाय जानकारी प्राप्त करने के लिए निम्न वाक्यविन्यास का उपयोग करने की कोशिश कर रहा हूं। आखिरकार मैं विभिन्न व्यक्तित्वों के व्यवसायों पर डेटा प्राप्त करने के लिए एक लूप बनना चाहता हूं।

Error in if (symbol != "role") symbol = NULL : argument is of length zero 

मुझे यकीन है कि क्यों यह आ रहा है पर रहता है नहीं कर रहा हूँ:

हालांकि, मैं निम्नलिखित समस्या नीचे दिए गए कोड से चलाने के।

library(XML) 
library(plyr) 
    url = 'http://en.wikipedia.org/wiki/George_Clooney' 

# don't forget to parse the HTML, doh! 
    doc = htmlParse(url) 

# get every link in a table cell: 
    links = getNodeSet(doc, '//table/tr/td') 

# make a data.frame for each node with non-blank text, link, and 'title' attribute: 
    df = ldply(links, function(x) { 
       text = xmlValue(x) 
      if (text=='') text=NULL 
     symbol = xmlGetAttr(x, 'class') 
     if (symbol!='role') symbol=NULL 
     if(!is.null(text) & !is.null(symbol)) 
       data.frame(symbol, text)   }) 

Answer 1

@gsee उल्लेख किया है, आप जांच करने के लिए है कि symbol इससे पहले कि आप अपने मूल्य की जांच नहीं NULL है की जरूरत है। यहां आपके कोड पर एक मामूली अपडेट है जो काम करता है (कम से कम जॉर्ज के लिए)।

df = ldply(
    links, 
    function(x) 
    { 
    text = xmlValue(x) 
    if (!nzchar(text)) text = NULL 
    symbol = xmlGetAttr(x, 'class') 
    if (!is.null(symbol) && symbol != 'role') symbol = NULL 
    if(!is.null(text) & !is.null(symbol)) 
     data.frame(symbol, text)   
    } 
) 

Answer 2

उपयोग col.names = my_column_names अपने चाहता था नामों में से चरित्र वेक्टर होने के साथ kable() में my_column_names, मेरे लिए यह काम किया! - बेंजामिन टेलकैम्प