我有以下嵌套列表:
# Nested list
df <- list(
list(
x = seq(0,100, length.out = 1500),
y = seq(0,500, length.out = 1500),
z = sort(rep(letters[1:2], length.out = 1500))),
list(
x = seq(0,100, length.out = 1480),
y = seq(0,500, length.out = 1480),
z = sort(rep(letters[1:2], length.out = 1480)))
)
我在第二个列表上插值y
的值与第一个列表上的y
值的长度相同。然后,结果将如下所示:
# Nested list
df <- list(
list(
x = seq(0,100, length.out = 1500),
y = seq(0,500, length.out = 1500)),
list(
x = seq(0,100, length.out = 1500),
y = seq(0,500, length.out = 1500))
)
问题是插值后,我放宽了字符值z
。我现在想做的是mutate
或将此字符退回cbind
。我可以轻松地为第一个列表执行此操作,因为它没有更改其长度。但是,对于第二个列表,我需要根据他们之前拥有的mutate
的值来a
我的角色b
和x
。
例如,如果a
的{{1}} max
值为48.5,则我需要x
mutate
才能在新列表中达到48.5
有什么建议吗?
P.S .:我无法从第一个列表中获得a
并仅将其放入第二个列表中,因为我的真实列表远大于此,并且它们都不同。
我的插值是通过以下功能完成的:
z