评论太久了。 [如果人们认为这太难以回答(我倾向于认为它可能......),我会删除它。
所以问题是一个错字(见评论)。这只是编程实践的一个注释。排除赋值语句(尽可能多),所以这个:
ArticleTitle <- xpathSApply(myxml,"//*/MedlineCitation",padXML,xstr='./Article[1]/ArticleTitle[1]/text()') DateCreated <- xpathSApply(myxml,"//*/MedlineCitation",padXML,xstr='./DateCreated/Year/text()') Keyword1 < - xpathSApply(myxml,"//*/MedlineCitation",padXML,xstr='./KeywordList[1]/Keyword[1]/text()') Keyword2 < - xpathSApply(myxml,"//*/MedlineCitation",padXML,xstr='./KeywordList[1]/Keyword[2]/text()') Keyword3 < - xpathSApply(myxml,"//*/MedlineCitation",padXML,xstr='./KeywordList[1]/Keyword[3]/text()')
而不是这个:
使这种类型的错误真正流行。