R創建列作爲運行另一列的平均值

Question

我想在R中創建一列，這只是另一列的所有先前值的平均值。例如：

D 
    X 
1 1 
2 2 
3 3 
4 4 
5 5 
6 6 
7 7 
8 8 
9 9 
10 10 

我想d $ Y是d $ X的前平均也就是說，d $ Y是d $ X之前的所有觀測值的平均值。我知道如何使用遍歷每一行的for循環來做到這一點，但有沒有更高效的方式？

我有一個很大的數據集和硬件不符合該任務！

謝謝 瑞安

Answer 1

可以產生這樣的載體的累積方式：

set.seed(123) 
x<-sample(20) 
x 
## [1] 6 15 8 16 17 1 18 12 7 20 10 5 11 9 19 13 14 4 3 2 
xmeans<-cumsum(x)/1:length(x) 
xmeans 
## [1] 6.000000 10.500000 9.666667 11.250000 12.400000 10.500000 11.571429 
## [8] 11.625000 11.111111 12.000000 11.818182 11.250000 11.230769 11.071429 
## [15] 11.600000 11.687500 11.823529 11.388889 10.947368 10.500000 

所以D$Y<-cumsum(D$X)/1:nrow(D)應該工作。