R programmation XML: extraire un nœud spécifique

Question

Je me demandais comment accéder à un nœud spécifique en utilisant le paquet XML de R. Voici un exemple utilisant l'ensemble de données de R, mtcars.

fileName <- system.file("exampleData", "mtcars.xml", package="XML") 
doc <- xmlTreeParse(fileName) 
doc$doc$children$dataset 

L'exécution du code ci-dessus me donne le ff. Résultats:

.... 
<record id="Fiat 128">32.4 4 78.7 66 4.08 2.200 19.47 1 1 4 1</record> 
<record id="Honda Civic">30.4 4 75.7 52 4.93 1.615 18.52 1 1 4 2</record> 
<record id="Toyota Corolla">33.9 4 71.1 65 4.22 1.835 19.90 1 1 4 1</record> 
<record id="Toyota Corona">21.5 4 120.1 97 3.70 2.465 20.01 1 0 3 1</record> 
<record id="Dodge Challenger">15.5 8 318.0 150 2.76 3.520 16.87 0 0 3 2</record> 
<record id="AMC Javelin">15.2 8 304.0 150 3.15 3.435 17.30 0 0 3 2</record> 
<record id="Camaro Z28">13.3 8 350.0 245 3.73 3.840 15.41 0 0 3 4</record> 
<record id="Pontiac Firebird">19.2 8 400.0 175 3.08 3.845 17.05 0 0 3  
.... 

Je me demande comment puis-je sélectionner des nœuds spécifiques et obtenir leurs valeurs à l'aide xmlAttrs. Par exemple, comment pourrais-je sélectionner le nœud: <record id="Fiat 128"> ou le noeud <record id="Honda Civic">

Answer 1

doc <- xmlTreeParse(fileName) 
doc <- xmlParse(fileName) 
xpathSApply(doc,"//*/record[@id=\"Fiat 128\"]",xmlValue) 
xpathSApply(doc,"//*/record[@id=\"Honda Civic\"]",xmlValue) 

utilisation xmlParse qui équivaut à xmlTreeParse(useInternalNodes=T) pour info sur xpath voir https://www.w3schools.com/xml/xpath_syntax.asp