A Simple R Script

Rplot.png

#Ken Utau Technical Analysis Script 2017
#https://myinvestjourney.com/
#initialising library files
library(quantmod)
library(ggplot2)
library(TTR)
library(PerformanceAnalytics)
# Get data
getSymbols(“KLSE%3AMAYBANK”,src=”google”)
# Delimit data range
mbb <-window(`KLSE%3AMAYBANK`[‘2011-01-01::2017-06-30’])
barChart(mbb)
# Bollinger Band
addBBands(n=20,sd=2.25)
# Moving Averages Covergence/Divergence MACD(3,10,16)
addMACD(3,10,16)
#RSI 
addRSI(n=14)

DISCLAIMER: THIS IS A PERSONAL BLOG AND SHALL NOT BE RELIED IN WHATSOEVER MANNER BY ANYONE. ALL ARTICLES CONTAINED IN THIS SITE ARE STRICTLY FOR INFORMATION AND ILLUSTRATIVE PURPOSES ONLY AND DOES NOT PURPORT TO SHOW ACTUAL RESULTS. IT IS NOT, AND SHOULD NOT BE REGARDED AS INVESTMENT ADVICE OR AS A RECOMMENDATION REGARDING ANY PARTICULAR SECURITY OR COURSE OF ACTION. SOURCES USED IN THIS SITE HAVE NOT BEEN INDEPENDENTLY VERIFIED FOR ACCURACY, COMPLETENESS AND TIMELINESS. YOU SHOULD SEEK INDEPENDENT AND PROFESSIONAL INVESTMENT ADVICE IN REGARD TO YOUR INVESTMENT DECISIONS. THE AUTHOR MAY HOLD POSITIONS IN THE SECURITIES MENTIONED IN THE ARTICLES