这里是输入。
ID Element
1 A
1 B
1 C
2 A
2 D
2 E
2 B
3 B
3 D
预期的输出看起来与此代码产生的相似
URL <- paste0(
"https://cdn.rawgit.com/christophergandrud/networkD3/",
"master/JSONdata//flare.json")
## Convert to list format
Flare <- jsonlite::fromJSON(URL, simplifyDataFrame = FALSE)
# Use subset of data for more readable diagram
Flare$children = Flare$children[1:3]
因此,对于第一个元素 A 是 B 的父级,C 是 B 的父级,第二个 A 是 D 的父级,D 是 E 的父级,E 是 B 的父级。我尝试使用data.tree
包,但我找不到解决方案.