library(XML)
f = system.file("exampleData","mtcars.xml",package="XML")
f
x<-xmlParseDoc(f)
typeof(x)






