如何将xml数据转换为R中的数据帧

Question

大家好， 我需要将一个xml文件加载到R中的数据框中。xml格式如下所示。我如何获得同样的成绩？

  <?xml version="1.0" encoding="utf-8"?><posts> <row Id="1" PostTypeId="1" AcceptedAnswerId="17" CreationDate="2010-07-26T19:14:18.907" Score="6"/></posts> 

我试过下面的代码....它没有给出所需的输出。我期待一个列表输出，列名和它们的值列在下面。

library(XML) 
xml.url ="test.xml" 
xmlfile = xmlTreeParse(xml.url) 

class(xmlfile) 
xmltop=xmlRoot(xmlfile) 

print(xmltop)[1:2] 

plantcat <- xmlSApply(xmltop, function(x) xmlSApply(x, xmlValue)) 

plantcat_df <- data.frame(t(plantcat)) 

Answer 1

xml.text <- 
'<?xml version="1.0" encoding="utf-8"?> 
<posts> 
<row Id="1" PostTypeId="1" AcceptedAnswerId="17" CreationDate="2010-07-26T19:14:18.907" Score="6"/> 
<row Id="2" PostTypeId="1" AcceptedAnswerId="17" CreationDate="2010-07-26T19:14:18.907" Score="6"/> 
<row Id="3" PostTypeId="1" AcceptedAnswerId="17" CreationDate="2010-07-26T19:14:18.907" Score="6"/> 
<row Id="4" PostTypeId="1" AcceptedAnswerId="17" CreationDate="2010-07-26T19:14:18.907" Score="6"/> 
</posts>' 

library(XML) 
xml <- xmlParse(xml.text) 
result <- as.data.frame(t(xmlSApply(xml["/posts/row"],xmlAttrs)), 
         stringsAsFactors=FALSE) 
# Id PostTypeId AcceptedAnswerId   CreationDate Score 
# 1 1   1    17 2010-07-26T19:14:18.907  6 
# 2 2   1    17 2010-07-26T19:14:18.907  6 
# 3 3   1    17 2010-07-26T19:14:18.907  6 
# 4 4   1    17 2010-07-26T19:14:18.907  6 

这比平时麻烦一些，因为数据是属性，而不是节点（节点是空的），所以我们不能用xlmToDataFrame(...)不幸。

上面的所有数据仍然是字符，所以您仍然需要将列转换为适合的类。