r - 了解 R 中树（data.tree）的递归构建

Question

我正在尝试使用data.tree包在 R 中递归地构建树。任何回答的人请理解下面的递归。下面的代码只包含两级递归。在第二级递归中，我打印了树结构（在我的代码中标记了打印语句以供参考），它类似于下图。

整个代码完成后的树形结构就是。

我不明白 2 级递归的树如何与 1 级的树完美融合。

library(data.tree)
library(visNetwork)

recurs=function(i,previous_iteration_tree)
{
  if(i<=6)
  {
    if(i==1)
    {
      tree<-Node$new(i)
      tree$AddChild(i+1)
      tree$AddChild(i+2)
      tree$AddChild(i+3)
      tree$AddChild(i+4)
    }
    if(i==6)
    {
      dummy<-FindNode(previous_iteration_tree,i-4)
      a=dummy$AddChild(i)
      tree=a

      print(tree)#<------------------HERE
      #see the tree here
    }
  }
  else
    return(0)

  recurs(i+5,tree)

  plot(tree)
}

recurs(1,0)

在这种情况下请帮助我！