dtdFile <- system.file("exampleData", "foo.dtd",package="XML")
parseDTD(dtdFile)
# Read from text
txt <- readLines(dtdFile)
txt <- paste(txt, "", collapse="")
d <- parseDTD(txt, asText=TRUE)
url <- "http://www.omegahat.org/XML/DTDs/DatasetByRecord.dtd"
d <- parseDTD(url, asText=FALSE)
Run the code above in your browser using DataLab