从r中的xml文件中删除父节点

下面是xml输出。我试图从R中删除使用XML或xml2库的父级。我发现了一篇类似的帖子，但这些函数不知何故给了我一个错误。我正在尝试删除这些父项，直到分析数据父项。这就是我要分析的

<assessment>
  <itembank />
  <instrument id="797393  ">
    <form id="Math G3">
      <formitem id="8243" position="0" />

    </form>
  </instrument>
  <admin id="797393  " instrument="797393  ">
    <genatt name="adminperiod" value="SP19" />
    <responseanalyses>
      <responsebankref id="3M" />
      <analysisdefs>
        <analysisoption name="mark" value="no" />
        <analysisoption name="notreached" value="ASNOTPRESENTED" />
        <statentity type="item" id="8243" varname="I_8243">
          <genatt name="type" value="CR" />
          <genatt name="codestart" value="0" />
          <genatt name="validcodes" value="2" />
          <genatt name="omitcode" value="9" />
          <genatt name="notpresentedcode" value="8" />
          <statentity code="0.000000" id="0.000000" type="itemscorept" />
          <statentity code="1.000000" id="1.000000" type="itemscorept" />
          <statentity code="9" id="omit" type="itemscorept" />
        </statentity>

          <genatt name="type" value="CR" />
          <genatt name="codestart" value="0" />
          <genatt name="validcodes" value="2" />
          <genatt name="omitcode" value="9" />
          <genatt name="notpresentedcode" value="8" />
          <statentity code="0.000000" id="0.000000" type="itemscorept" />
          <statentity code="1.000000" id="1.000000" type="itemscorept" />
          <statentity code="9" id="omit" type="itemscorept" />
        </statentity>
        <statentity id="DIFGROUP_TTS" varname="DIFGROUP_TTS" type="popgroup" description="DIFGROUP_TTS">
          <statentity code="0.000000" id="0.000000" description="0.000000" samplesize="40501" type="popsubgroup" />
          <statentity code="1.000000" id="1.000000" description="1.000000" samplesize="5532" type="popsubgroup" />
        </statentity>

      </analysisdefs>
      <genatt name="xmloutputfile" value="J:\out.xml" />
      <analysis creator="ST" description="" level="form" type="classical">
    <analysisdata formid="Math G3">

          <statentityref id="8243" type="item">
            <statval type="OmitCount" value="0.000000" />
            <statval type="NotReachedCount" value="43.000000" />
            <statval type="PolyserialCorrelation" value="0.644181" />
            <statval type="AdjustedPolyserial" value="0.644181" />
            <statval type="AverageScore" value="0.223074" se="0.011957" />
            <statval type="NCount" value="2609.000000" />
            <statval type="StdevItemScore" value="0.416308" />
              </statentityref>

            </statentityref>
          </statentityref>
        </analysisdata>
      </analysis>
    </responseanalyses>
    <responsebank findin="J:\outAM.am" sourcetype="AM" id="3M" />
  </admin>
</assessment>

有什么想法吗？ 谢谢

您可以使用rvest库中的html\u节点

---

只需提取节点。这是我的答案。谢谢你的建议：如果你发布这个，我会接受正确的解决方案。

<analysisdata formid="Math G3">
  <statentityref id="8243" type="item">
    <statval type="OmitCount" value="0.000000" />
    <statval type="NotReachedCount" value="43.000000" />
    <statval type="PolyserialCorrelation" value="0.644181" />
    <statval type="AdjustedPolyserial" value="0.644181" />
    <statval type="AverageScore" value="0.223074" se="0.011957" />
    <statval type="NCount" value="2609.000000" />
    <statval type="StdevItemScore" value="0.416308" />
      </statentityref>

    </statentityref>
  </statentityref>
</analysisdata>

 rvest::html_node(doc, 'analysisdata')