R：如何將移動平均線應用於數據框中的列子集？

Question

我有一個數據框（training.set），它是83個變量的150個觀察值。 我想用一些移動平均值來轉換這些列中的82個。 問題是結果最終只能是150個數字值（即1列）。

如何將移動平均函數分別應用於數據中的每一列，並使第83列保持不變？ 我覺得這很簡單，但是我找不到解決方案。

我當前的代碼

# apply moving average on training.set data to 82 of 83 rows
library(TTR)  #load TTR library for SMA functions
ts.sma <- SMA(training.set[,1:82], n = 10)
ts.sma

謝謝你的幫助。

Answer 1

apply(training.set[,1:82], 2, SMA, n=10)

請注意，這會將data.frame轉換為矩陣-如果您需要將輸出作為data.frame， data.frame(...)其包裝在data.frame(...) 。