The R Project SVN R-packages

(root)/trunk/XML/inst/examples/faq.R – Rev 7747

Blame | Last modification | View Log | Download | RSS feed

# Getting the question text from a FAQ.
doc = xmlParse("FAQ.xml")
q = getNodeSet(doc, "//question")
sapply(q, function(x) paste(sapply(xmlChildren(x)[names(x) == "text"], xmlValue), collapse = "\n"))