我有这两个列表:
firstList <- list(a = list(a_1 = 1:5,
a_2 = 5:10),
b = 10,
c = list(c_1 = 10:20,
c_2 = 20:30))
secondList <- list(b = 9999,
c = list(c_2 = 500:505))
我想找到一个优雅的函数(几行代码,没有循环),例如:
thirdList <- awesomeFx(firstList, secondList)
给我:
$a
$a$a_1
[1] 1 2 3 4 5
$a$a_2
[1] 5 6 7 8 9 10
$b
[1] 9999
$c
$c$c_1
[1] 10 11 12 13 14 15 16 17 18 19 20
$c$c_2
[1] 500 501 502 503 504 505
换句话说,一个函数(以某种方式)递归地替换两个列表中的元素。
modifyList(firstList, secondList)
$a
$a$a_1
[1] 1 2 3 4 5
$a$a_2
[1] 5 6 7 8 9 10
$b
[1] 9999
$c
$c$c_1
[1] 10 11 12 13 14 15 16 17 18 19 20
$c$c_2
[1] 500 501 502 503 504 505
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句