xml - 用于列出 XML 对象的 XML 元素

Question

如何将 XML 树拆分为 XML 对象列表，然后我喜欢使用函数 getNodeSet 但返回值应包含根对象“部分”？

require(XML)

txt = "<doc>
         <part>
           <name>ABC</name>
           <type>XYZ</type>
           <cost>3.54</cost>
           <status>available</status>
         </part>
         <part>
           <name>ABC</name>
           <type>XYZ</type>
           <cost>3.54</cost>
           <status>available</status>
         </part>
       </doc>"

doc <- xmlTreeParse(txt, useInternalNodes = TRUE)
special_nodes <- getNodeSet(doc, "/*/part//*")

Answer 1

我认为返回的节点getNodeSet是指向底层 XML 对象的指针，例如

> special_nodes[[1]]
<name>ABC</name> 
> xpathSApply(special_nodes[[1]], "../cost")
[[1]]
<cost>3.54</cost>