search for: myema30

...EMA(CLV(HLC(x)))[,1] myMACD <- function(x) 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) +...