Tengo este código xml:
<?xml version="1.0"?>
-<sct type="detail" version="0.1">
-<serviceLevelSegments timestamp="2017-10-25T11:45:44Z">
<Segment travelTimeMinutes="0.387" c-value="100" score="30" reference="85"
average="77" speed="95" code="447332188"/>
-<Segment travelTimeMinutes="0.597" c-value="100" score="30" reference="85"
average="77" speed="85" code="447332203">
<SubSegment speed="95" PkEnd="782.112" PkIni="781.9" offset="0,212"/>
<SubSegment speed="77" PkEnd="782.746" offset="635,846" pkIni="782.535"/>
</Segment>
</serviceLevelSegments>
</sct>
Y quiero obtener una tabla con todos los atributos (de todos los niveles). Sería una tabla como esta:
Value1 Value2 Value3 ...
timestamp
code
travelTimeMinutes
c-value
score
reference
average
speed (from Segment)
speed (from SubSegment)
PkEnd
PkIni
offset
En las celdas vacías me gustaría que pusiera: "NA".
Sólo he conseguido obtener una tabla separada para cada nivel (serviceLevelSegments, Segment o SubSegment por separado). Por ejemplo, para obtener la tabla para el nivel SubSegment, he encontrado este código:
library(XML)
arch = "file.xml" #code in xml
input <- xmlParse(arch)
nodes <- getNodeSet(input,"//SubSegment")
all_parameters <- sapply(nodes, xmlAttrs)
all_parameters
Pero sólo obtengo una tabla con estos atributos (en campo filas): speed, offset, PkIni, PkEnd. Y necesito todos los atributos que salen en el código.
Muchas gracias de antemano.