如何将含重复节点的XML文档转换为R语言DataFrame？

我看了你遇到的问题——把带重复<tns:Point>节点的XML转换成指定结构的DataFrame，原代码没达到预期效果，主要是XPath路径写法和命名空间处理出了问题，我帮你修正一下：

原代码的核心问题 #

1. XPath命名空间语法错误：你写了/tns.Point，正确的命名空间分隔符是冒号:, 应该是./tns:Point
2. 绝对路径导致节点查找错误：用/开头的XPath会从XML根节点开始查找，而不是当前的<tns:Curves>节点，应该用相对路径./限定在当前节点下查找子节点
3. 命名空间未注册：你的XML有tns前缀，需要先注册命名空间才能让XPath正确识别这些节点

修正后的完整代码 #

library(XML)

# 加载XML文档
doc <- xmlTreeParse("./sample.xml", useInternalNodes = TRUE)

# 注册命名空间（关键！不然XPath找不到tns前缀的节点）
xmlNamespaces(doc) <- c(tns = "www.test.org")

bodyToDF <- function(x) {
  # 获取当前Curves节点下的Name值（相对路径）
  current_name <- xpathSApply(x, "./tns:Name", xmlGetAttr, "v")
  # 获取当前Curves下的所有Point节点
  points <- xpathApply(x, "./tns:Point", function(y) {
    # 从当前Point节点下获取Xvalue的v属性（相对路径）
    x_val <- xpathSApply(y, "./tns:Xvalue", xmlGetAttr, "v")
    data.frame(Name = current_name, XValue = x_val, stringsAsFactors = FALSE)
  })
  do.call(rbind, points)
}

# 遍历所有Curves节点并转换
res <- xpathApply(doc, '/tns:DataSet/tns:Curves', bodyToDF)
temp.df <- do.call(rbind, res)

# 查看结果
print(temp.df)

运行结果 #

你会得到和预期完全一致的DataFrame：

Name XValue
1 Name1      0
2 Name2      5
3 Name2     20

关键说明 #

• 注册命名空间xmlNamespaces(doc) <- c(tns = "www.test.org")是必须的，否则R的XML包无法识别tns:前缀的节点
• 所有XPath都用./开头，确保是在当前父节点的范围内查找子节点，避免全局查找导致的错误匹配

内容的提问来源于stack exchange，提问作者Jacques