如何在R中的gvisOrgChart中存储用户单击的节点的值？

Question

我正在尝试使用R中的gvisOrgChart函数制作组织图。我希望​​组织图最多显示2个级别（即，根节点和第一个子节点），并为用户提供在其中单击任何节点的能力。级别2和新的组织结构图应渲染为最多2个级别，并单击该节点作为根节点及其子节点。我已经能够将组织结构图限制为2级，但是，我想知道是否可以存储用户单击的子节点的值，然后可以进一步使用它来创建新的组织结构图

output$distPlot <- renderGvis({

  gvisOrgChart(Test, idvar = "Name", parentvar = "Supervisor_Employee_Code",
               tipvar="Position_Text_Augmented",
               options=list(width= "automatic", height= "automatic",
                            size='medium', allowCollapse=TRUE))      
})