如何将xts对象的每个值设置为所有先前值的最小值？

Question

这就是我想要的，但我认为这不是正确的做法......

for (n in 1:length(z)) {
     if (z[n,] > min(z[1:n,]) ) {
         z[n,] = min(z[1:n,])
     }
 }

Answer 1

您在寻找cummin吗？

set.seed(1)
z <- sample(1:10)
z
# [1]  3  4  5  7  2  8  9  6 10  1

cummin(z)
# [1] 3 3 3 3 2 2 2 2 2 1