nós data.tree através dos IDs

Meus dados são vinculados através de umId, ParentId sistema e eu consegui adicionar inteiro corretolevelsno entanto, gostaria de compor uma função que aninhe automaticamente minha hierarquia de cinco camadas como umpathString paradata.tree.

Estrutura:

Id                 Name               ParentId           ParentName    Level
701F0000006Iw8E    'Paid Media'       NA                 NA            1
701F0000006IS1t    'Bing ABC'         701F0000006Iw8Y    'Bing'        3    
701F0000006IS28    'Bing DEF'         701F0000006Iw8Y    'Bing'        3
701F0000006IS23    'Bing GHI'         701F0000006Iw8Y    'Bing'        3
701F0000006Imq9    'Bing JKL'         701F0000006Iw8Y    'Bing'        3
701F0000006IS1y    'Bing MNO'         701F0000006Iw8Y    'Bing'        3
701F0000006Iw8Y    'Bing'             701F0000006Iw8E    'Paid Media'  2
701F0000006IvcW    'Google'           701F0000006Iw8E    'Paid Media'  2
7012A000006rhY8    'Adwords ABC'      701F0000006IvcW    'Google'      3
701F0000006IS1j    'Adwords DEF'      701F0000006IvcW    'Google'      3
701F0000006IS1o    'Adwords GHI'      701F0000006IvcW    'Google'      3
701F0000006IS1Z    'Adwords JKL'      701F0000006IvcW    'Google'      3
701F0000006Ieci    'Adwords MNO'      701F0000006IvcW    'Google'      3

Atualmente, encontro o problema de que pathString é lido apenas por uma única camada no seguinte:

dat$pathString <- paste(dat$ParentId, 
      dat$Id, 
      sep = "/")

Ex.

 "NA/701F0000000SOEq"

Que, na realidade, para preencher corretamente toda a árvore, eu precisaria identificar todos os pais subsequentes na cadeia:

 "NA/701F0000006Iw8E/701F0000006Iw8Y/701F0000006IS1t" for "Bing ABC"

Idealmente, uma única expressão funcionará de forma equivalente para todos os níveis, mas eu entendo se cada nível precisa ser tratado separadamente.

ID completo, sistema ParentId aqui:Link do Dropbox

questionAnswers(1)

yourAnswerToTheQuestion