修剪data.tree R

Question

我有一个决策树存储如下（使用data.tree）（在R中）：

性别
  | - 男
  |° - 类
  | | - 3   | |° - 年龄
  | | | - 儿童
  | | |° - 没有   | |° - 成人
  | |° - 没有   | | - 1   | |° - 年龄
  | | | - 成人
  | | |° - 没有   | |° - 儿童
  | |° - 是的   | | - 2   | |° - 年龄
  | | | - 成人
  | | |° - 没有   | |° - 儿童
  | |° - 是的   |° - 已完成   |° - 年龄
  |° - 成人
  |° - 没有   °--Female
      °--class
          | - 3
          |° - 年龄
          | | - 儿童
          | |° - 没有           |° - 成人
          |° - 没有           | - 第一
          |° - 年龄
          | | - 成人
          | |° - 是的           |° - 儿童
          |° - 是的           | - 第二
          |° - 年龄
          | | - 成人
          | |° - 是的           |° - 儿童
          |° - 是的           °--Crew
              °--Age
                  °--Adult
                      ° - 是的

此树存储在变量：root
中 我想修剪树（计算水平= 6的所有节点的卡方值以及它们的卡方值是否小于阈值（例6），然后从树中删除该节点）。

非常感谢任何帮助。

编辑： 我正在使用以下数据集：
“”， “类”， “性别”， “年龄”， “大难不死”
“1”， “1”， “男性”， “儿童”， “否”
“2”， “第二”， “男性”， “儿童”， “否”
“3”， “3”， “男性”， “儿童”， “否”
。
。
。

使用这个，我使用ID3算法来创建决策树。现在，我想修剪它。