search for: myvolat

...function(x) BBands(HLC(x))[,'pctB'] myChaikinVol<-function(x)Delt(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] da...