KST(price, n = c(10, 15, 20, 30), ma1 = list("SMA", n=10), ma2 = ma1, ma3 = ma1,
ma4 = list("SMA", n=15), ma.sig = list("SMA", n=10), wts = 1:4)ma (not including ma.sig) for eachma1.ma1.ma1.n, of the weight for each period
(need not sum to one).EMA, SMA, etc. for moving average options; and note
Warning section. See ROC for the rate-of-change function.
See oscillator for other oscillators.data(ttrc)
kst <- KST(ttrc[,"Close"])Run the code above in your browser using DataLab