我有一个看起来像这样的数据集:
data <- data.frame(A = c(3.132324,12.3439085,3.34343,5.1239048,6.34323,3.342334,9.342343,134.132433,13.1234323,23.34323))
现在,我想使用A值创建一个新列B,该列基于A下方一行的值。像这样:
A B
1 3.132324 12.343908
2 12.343908 3.343430
3 3.343430 5.123905
4 5.123905 6.343230
5 6.343230 3.342334
6 3.342334 9.342343
7 9.342343 134.132433
8 134.132433 13.123432
9 13.123432 23.343230
10 23.343230 NA
我已经尝试使用类似这样的代码data$B <- c(tail(data$A, -1), NA))
,但是我得到的小数位数不正确(例如,具有6个小数点的值将变为5个小数点)。我希望B值精确地跟随A值,其中包括小数点。
我该怎么做呢?
更新资料
这显示了我实际数据集中存在的问题,当我使用mutate()函数时,B会四舍五入,如下面的@akrun所示。
A B
1 7.933333 16.01667
2 16.016667 24.53333
3 24.533333 34.70000
4 34.700000 NA
我们可以使用lead
同mutate
在dplyr
library(dplyr)
data %>%
mutate(B = lead(A))
# A B
#1 3.132324 12.343908
#2 12.343908 3.343430
#3 3.343430 5.123905
#4 5.123905 6.343230
#5 6.343230 3.342334
#6 3.342334 9.342343
#7 9.342343 134.132433
#8 134.132433 13.123432
#9 13.123432 23.343230
#10 23.343230 NA
根据OP的代码,让我们尝试 list
slotfinal <- list(data, data)
for(i in seq_along(slotfinal)) slotfinal[[i]] <- slotfinal[[i]] %>%
mutate(B = lead(A))
slotfinal
#[[1]]
# A B
#1 3.132324 12.343908
#2 12.343908 3.343430
#3 3.343430 5.123905
#4 5.123905 6.343230
#5 6.343230 3.342334
#6 3.342334 9.342343
#7 9.342343 134.132433
#8 134.132433 13.123432
#9 13.123432 23.343230
#10 23.343230 NA
#[[2]]
# A B
#1 3.132324 12.343908
#2 12.343908 3.343430
#3 3.343430 5.123905
#4 5.123905 6.343230
#5 6.343230 3.342334
#6 3.342334 9.342343
#7 9.342343 134.132433
#8 134.132433 13.123432
#9 13.123432 23.343230
#10 23.343230 NA
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句