library(quantmod)
getSymbols("LLOY.L",
from = datefrom,
to = dateto,
auto.assign = TRUE)
LLOY.L$MovingAverages <- 0
e <- movavg(LLOY.L$LLOY.L.Close, 5, type = c("e"))
LLOY.L[, 7] <- e
Есть ли способ создать новый столбец этого набора данных, который означает, что если столбец 4 больше, чем столбец 7, он печатает «Buy Stock» в каждой строке, иначе выдает «Sell Stock», я пытался использовать циклы безуспешно