# 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