插值后使字符列突变

时间:2018-06-25 07:42:03

标签: r tidyverse

我有以下嵌套列表:

# 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我的角色bx

例如,如果a的{​​{1}} max值为48.5,则我需要x mutate才能在新列表中达到48.5

有什么建议吗?

P.S .:我无法从第一个列表中获得a并仅将其放入第二个列表中,因为我的真实列表远大于此,并且它们都不同。

编辑

我的插值是通过以下功能完成的:

z

0 个答案:

没有答案