search for: myema10

...elt(chaikinVolatility(x[,c("High","Low")]))[,1] myCLV <- function(x) 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(EURUS...