Когда я хочу создать один график (с красной линией, предоставленной функцией SMA), этот код работает очень хорошо для меня
sma <- SMA(df$col_name, n = 200)
plot(df$colname)
lines(sma, col = "red")
Все, что я хочу, это l oop по всем столбцам в моем DF, поэтому мне не нужно вводить все имена столбцов и повторять весь код.
Это то, что я пытался до сих пор:
for(i in colnames(df)) {
sma <- SMA(df[,i], n = 200)
plot(df[,i])
lines(sma, col = "red")
}
Но я ничего не получил.