我有作为时间函数的整数变量。但是,存在值在第二天减小的错误,这是由于人为错误造成的。即
Date Cases
2020-03-03 24
2020-03-02 21
2020-03-01 23
在“案例”中,21 是一个错误。如何用插值替换我的列中小于它们之前的行的值?
最佳答案
你可以试试
wrong <- c(0, diff(df$Cases)) < 0
df$Cases[wrong] <- df$Cases[which(wrong) - 1]
结果:
df
#> Date Cases
#> 1 2020-03-03 24
#> 2 2020-03-02 24
#> 3 2020-03-01 23
关于用内插值替换值比它之前的行值更小的行,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/61212406/