# NOT RUN {
node <- xmlNode("foo", "Some text")
xmlValue(node)
xmlValue(xmlTextNode("some more raw text"))
# Setting the xmlValue().
a = newXMLNode("a")
xmlValue(a) = "the text"
xmlValue(a) = "different text"
a = newXMLNode("x", "bob")
xmlValue(a) = "joe"
b = xmlNode("bob")
xmlValue(b) = "Foo"
xmlValue(b) = "again"
b = newXMLNode("bob", "some text")
xmlValue(b[[1]]) = "change"
b
# }
Run the code above in your browser using DataLab