## example to convert an Excel xml file to tab delimited
library(XML)
input <- xmlParse("/home/share/guillaume/grid1_1cz1rlvt.xml")
top <- xmlRoot(input)
table <- top[["Worksheet"]][["Table"]]
for(row in 1:xmlSize(table)){
    cat(paste(xmlSApply(table[[row]], xmlValue), collapse="\t"), "\n", file="output.csv", append=TRUE)
}