请考虑以下数据框:
Country Provinces City Zone
1 Canada Newfondland St Johns A
2 Canada PEI Charlottetown B
3 Canada Nova Scotia Halifax C
4 Canada New Brunswick Fredericton D
5 Canada Quebec NA NA
6 Canada Quebec Quebec City NA
7 Canada Ontario Toronto A
8 Canada Ontario Ottawa B
9 Canada Manitoba Winnipeg C
10 Canada Saskatchewan Regina D
Run Code Online (Sandbox Code Playgroud)
是否有一种聪明的方法将其转换为treeNetwork兼容列表(从networkD3包中),形式如下:
CanadaPC <- list(name = "Canada",
children = list(
list(name = "Newfoundland",
children = list(list(name = "St. …Run Code Online (Sandbox Code Playgroud) 我想使用networkD3可视化一些深层嵌套的数据.在发送之前,我无法弄清楚如何将数据转换成正确的格式radialNetwork.
以下是一些示例数据:
level <- c(1, 2, 3, 4, 4, 3, 4, 4, 1, 2, 3)
value <- letters[1:11]
Run Code Online (Sandbox Code Playgroud)
where level表示嵌套的级别,value是节点的名称.通过使用这两个向量,我需要将数据转换为以下格式:
my_list <- list(
name = "root",
children = list(
list(
name = value[1], ## a
children = list(list(
name = value[2], ## b
children = list(list(
name = value[3], ## c
children = list(
list(name = value[4]), ## d
list(name = value[5]) ## e
)
),
list(
name = value[6], ## f
children …Run Code Online (Sandbox Code Playgroud)