Question

我正在尝试使用相同名称的重复节点（但由属性值唯一标识）将XML展平为R中的平面数据。我的示例是

<?xml version="1.0"?>
<data>
<tr id="1">
    <A id="100">100</A>
    <B>abc</B>
    <C>true</C>
</tr>
<tr id="2">
    <A id="200">200</A>
    <A id="300">300</A>
    <B>wxyz</B>
    <C>FALSE</C>
</tr>
</data>

所需的结果是一个看起来像

的data.frame

tr     A     B     C
 1   100   abc  true
 2   200  wxyz FALSE
 2   300  wxyz FALSE

我已阅读xml ...

library(XML)
xmlfile <- "H:/My Documents/Code/R/xml/example.xml"
xmldoc <- xmlTreeParse(xmlfile)

使用xpathSApply（），我可以毫无问题地检索每个节点和属性，例如，

data.frame(id = xpathSApply(xmldoc, "//A", xmlGetAttr, "id"))

但我无法在data.frame中组织整个批次，因为＆＃34; A＆＃34;节点比所有其他节点（2）的数量大（3）。

任何帮助将不胜感激......

Answer 1

您可能需要为每个节点创建一个data.frame并合并结果。

tr <- getNodeSet(xmldoc, "//tr")
x <- lapply(tr, function(x)  data.frame(tr = xpathSApply(x, "." , xmlGetAttr, "id"),
                                         A = xpathSApply(x, ".//A", xmlValue),
                                         B = xpathSApply(x, ".//B", xmlValue),
                                         C = xpathSApply(x, ".//C", xmlValue) ))

do.call("rbind", x)
  tr   A    B     C
1  1 100  abc  true
2  2 200 wxyz FALSE
3  2 300 wxyz FALSE

将具有重复节点的XML转换为R数据帧

1 个答案: