这是我最小的可重现示例:
temp = list()
temp$rows$`1`$rows$name <- "rows"
temp$rows$`1`$rows$`1`$cells$name <- "cells"
temp$rows$`2`$rows$name <- "rows"
temp$rows$`2`$rows$`2`$cells$name <- "cells"
电流输出:
$rows
$rows$`1`
$rows$`1`$rows
$rows$`1`$rows$name
[1] "rows"
$rows$`1`$rows$`1`
$rows$`1`$rows$`1`$cells
$rows$`1`$rows$`1`$cells$name
[1] "cells"
$rows$`2`
$rows$`2`$rows
$rows$`2`$rows$name
[1] "rows"
$rows$`2`$rows$`2`
$rows$`2`$rows$`2`$cells
$rows$`2`$rows$`2`$cells$name
[1] "cells"
我想知道是否有一种编程方式可以替换此列表中的$1
to[[1]]
和$2
to [[2]]
?所以让输出看起来像这样,因为这是在将列表转换为 JSON 时制作数组的重要步骤。
$rows
$rows[[1]]
$rows[[1]]$rows
$rows[[1]]$rows$name
[1] "rows"
$rows[[1]]$rows[[1]]
$rows[[1]]$rows[[1]]$cells
$rows[[1]]$rows[[1]]$cells$name
[1] "cells"
$rows[[2]]
$rows[[2]]$rows
$rows[[2]]$rows$name
[1] "rows"
$rows[[2]]$rows[[2]]
$rows[[2]]$rows[[2]]$cells
$rows[[2]]$rows[[2]]$cells$name
[1] "cells"
这是我尝试过但没有以正确方式工作的方法:
lapply(temp$rows$
1, unname)
谢谢!