myTests/reparent.R

library(XML)
doc = xmlParse("data/reparent.xml")
a = xmlRoot(doc)[[1]]
n = newXMLNode("new", parent = a)
#removeNodes(xmlChildren(a)[1:2])
invisible(addChildren(n, kids = xmlChildren(a)[1:2]))
doc
omegahat/XML documentation built on Jan. 17, 2024, 6:47 p.m.