R - 将报告结构转换为JSON

Run*_*Run 0 tree json nested r

我无法获得JSON格式的一些报告结构数据(大约300个案例),我需要它,因此我可以将它弹出到d3树网络中.我找不到一个自动化转换的函数 - 大部分资源都使用聚类函数(例如hclust),但我的数据只是一个未加权的边列表,所以这些函数不起作用.有什么建议?谢谢!

数据源示例:

jobTitle    reportsTo
CTO         CEO
CPO         CEO
Director    CPO
Manager     Director
Run Code Online (Sandbox Code Playgroud)

需要JSON输出:

  "name": "CEO",
      "children": [
        {
            "name": "CPO",
            "children": [
              {
                  "name": "Director",
                   "children": [
                        {
                            "name": "Manager",
                             "children": []
                        }
                   ]
              }
            ]
        },
        {
            "name": "CTO",
            "children": []
        }
      ]
Run Code Online (Sandbox Code Playgroud)

tim*_*lio 5

有关帮助函数,请参阅https://github.com/timelyportfolio/d3r以构建/嵌套数据.以下是使用您提供的数据的示例.

#install.packages("d3r")
library(d3r)

df <- read.table(
  textConnection(
'jobTitle    reportsTo
CTO         CEO
CPO         CEO
Director    CPO
Manager     Director
'  ),
  header = TRUE,
  stringsAsFactors = FALSE
)

d3r::d3_nest(df)
# or it seems we should change order first
d3r::d3_nest(df[,c(2,1)])
Run Code Online (Sandbox Code Playgroud)

注意,您显示空数组children: []. d3_nest消除空虚的孩子.