Update extractXML.r