使用函数使用R生成XML

时间:2018-07-15 19:03:22

标签: r xml dataframe export

我正在使用一个函数从R数据帧生成XML。

xml  <- xmlTree()
name <- 'Table1'

convertToXML <- function(df, name) 
{ 
  xml$addTag('ObjectList', attrs=c(ObjectType="xxx"), close=FALSE)
  for (i in 1:nrow(df)) {
    xml$addTag(name, close=FALSE)
    for (j in names(df)) {
      xml$addTag(j, df[i, j])
    }
    xml$closeTag()
  }
  xml$closeTag()
  return(xml)
}

是否可以在第一个标签的属性中使用变量 name

示例:如果 name 为“ Table1”,则此行代码应如下所示:

  xml$addTag('ObjectList', attrs=c(ObjectType="Table1"), close=FALSE)

我尝试使用paste()准备属性字符串,但是我无法正确添加引号。

1 个答案:

答案 0 :(得分:1)

在表达式中放入name,您将获得值:

 xml$addTag('ObjectList', attrs=c(ObjectType=name), close=FALSE)