# Add children to an XML node This appends one or more XML nodes as children of an existing node. ```r append.XMLNode(to, ...) append.xmlNode(to, ...) ``` ## Arguments - `to`: the XML node to which the sub-nodes are to be added. - ``...``: the sub-nodes which are to be added to the `to` node. If this is a `list` of `XMLNode` objects (e.g. create by a call to `lapply`), then that list is used. ## Details `append.xmlNode` is a generic function with method `append.XMLNode` for class `"XMLNode"` and default method `base::append`. This seems historical and users may as well use `append.XMLNode` directly. ## Returns The original `to` node containing its new children nodes. ## References [https://www.w3.org/XML/](https://www.w3.org/XML/), [http://www.jclark.com/xml/](http://www.jclark.com/xml/), [https://www.omegahat.net](https://www.omegahat.net) ## Author(s) Duncan Temple Lang ## See Also `[<-.XMLNode` `[[<-.XMLNode` `[.XMLNode` `[[.XMLNode` ## Examples ```r # Create a very simple representation of a simple dataset. # This is just an example. The result is # # # # A # # # B # # # # 1.2 3.5 # # # 20.2 13.9 # # # 10.1 5.67 # # n = xmlNode("data", attrs = c("numVars" = 2, numRecords = 3)) n = append.xmlNode(n, xmlNode("varNames", xmlNode("string", "A"), xmlNode("string", "B"))) n = append.xmlNode(n, xmlNode("record", "1.2 3.5")) n = append.xmlNode(n, xmlNode("record", "20.2 13.9")) n = append.xmlNode(n, xmlNode("record", "10.1 5.67")) print(n) ## Not run: tmp <- lapply(references, function(i) { if(!inherits(i, "XMLNode")) i <- xmlNode("reference", i) i }) r <- xmlNode("references") r[["references"]] <- append.xmlNode(r[["references"]], tmp) ## End(Not run) ```

append.XMLNode function