search for: myema50

...MACD(Cl(x))[,2] mySAR <- function(x) SAR(x[,c('High','Close')]) [,1] myVolat <- function(x) volatility(OHLC(x),calc="garman")[,1] myEMA10 <- function(x) EMA(Cl(x),n=10)[,1] myEMA20 <- function(x) EMA(Cl(x),n=20)[,1] myEMA30 <- function(x) EMA(Cl(x),n=30)[,1] myEMA50 <- function(x) EMA(Cl(x),n=50)[,1] myEMA60 <- function(x) EMA(Cl(x),n=60)[,1] data.model <- specifyModel(Delt(Cl(EURUSD)) ~ myATR(EURUSD) + mySMI(EURUSD) + myADX(EURUSD) + myAroon(EURUSD) + myBB(EURUSD) + myChaikinVol(EURUSD) + myCLV(EURUSD) +myEMA10(EURUSD) +myEMA20(EURUSD) +myEMA30(EURU...