在R中的data.tree包中查找叶节点的直接分层父项

Question

我正在尝试从数据树创建一个子树，需要在子树上执行进一步的操作。

data(acme)
print(acme)

Acme Inc.                       
2   ¦--Accounting                  
3   ¦   ¦--New Software            
4   ¦   °--New Accounting Standards

5  ¦--  Research                    
6   ¦   ¦--New Product Line        
7   ¦   °--New Labs                
8 |--IT                          
9         |--Outsource               
10       ¦--Go agile                
11       °--Switch to R  

现在我想创建一个对应于下面名称变量中指定的叶节点的子树：

name<-"New Labs"

以下代码为我提供了所需的子树：

subtree<-(FindNode(acme, name)$parent)$parent
print (subtree)

Acme Inc.       
2  °--Research    
3      °--New Labs

但是我需要一个代码，它不需要多次重复＆＃34; $ parent＆＃34; ＆安培;给所有父项直到树根。

对此的任何帮助都将非常感激。

谢谢