1

次のxmlような構造のファイルがあります。

<?xml version="1.0" encoding="utf-8"?>
<ScheduleMessage DtdVersion="3" DtdRelease="0">
  <MessageIdentification v="ETSOVista-DMinus1TotalLoadForecast-DE-2012-1" />
  <MessageVersion v="1" />
  <MessageType v="A11" />
    <ScheduleTimeSeries>
    <SendersTimeSeriesIdentification v="10YCB-GERMANY--8" />
    <SendersTimeSeriesVersion v="1" />
    <BusinessType v="A05" />
    <Period>
      <TimeInterval v="2012-11-15T23:00Z/2012-11-16T23:00Z" />
      <Resolution v="PT60M" />
      <Interval>
        <Pos v="1" />
        <Qty v="52452" />
      </Interval>
      <Interval>
        <Pos v="2" />
        <Qty v="50527" />
      </Interval>
      <Interval>
       <Pos v="3" />
       <Qty v="49221" />
      </Interval>
      <Interval>
       <Pos v="4" />
       <Qty v="49344" />
      </Interval>
    </Period>
   </ScheduleTimeSeries>
   <ScheduleTimeSeries>
    <SendersTimeSeriesIdentification v="10YCB-GERMANY--8" />
    <SendersTimeSeriesVersion v="1" />
    <BusinessType v="A05" />
    <Period>
     <TimeInterval v="2012-11-16T23:00Z/2012-11-17T23:00Z" />
     <Resolution v="PT60M" />
     <Interval>
      <Pos v="1" />
      <Qty v="50935" />
     </Interval>
     <Interval>
      <Pos v="2" />
      <Qty v="48918" />
     </Interval>
     <Interval>
      <Pos v="3" />
      <Qty v="47347" />
     </Interval>
     <Interval>
      <Pos v="4" />
      <Qty v="46382" />
  </Interval>
 </Period>
</ScheduleTimeSeries>
</ScheduleMessage>

必要なのはQty値だけです。これまでのところ、私のコードは次のようになります。

xml <- xmlInternalTreeParse(file = "test.xml")
xml_top <- xmlRoot(xml)
xml_children <- xmlChildren(x = xml_top)

しかし、ファイルをさらに深く掘り下げようとすると、次のようになります。

xml_children2 <- xmlChildren(x = xml_children)

次のエラーが表示されます。

Error in UseMethod("xmlChildren") : 
no applicable method for 'xmlChildren' applied to an object of class "c('XMLInternalNodeList', 'XMLNodeList')"

[]またはを使用してファイルをサブセット化しようとしまし[[]]たが、常に同じエラーが発生します。

4

2 に答える 2

0

以下を使用して問題を解決しました。

xpathSApply(doc = xml_top, 
            file = "//ScheduleMessage/ScheduleTimeSeries/Period/Interval/Qty", 
            fun = xmlAttrs)
于 2013-07-23T09:45:44.607 に答える