用quantmod包分析股票

近期學習了R語言中的quantmod包，利用這個包分析下近期感興趣的三支股票：深物業A、格力電器、比亞迪。

首先是下載三支股票的歷史數據，因為想知道長達十年的數據，因此深物業A和格力電器都是下載近十年的數據，而比亞迪則是上市以來的歷史數據。

library(quantmod)n##獲取股票的歷史數據nSWYA <- getSymbols("000011.sz",src="yahoo",from="2007-01-01",to="2017-9-30",auto.assign = FALSE)nGLDQ <- getSymbols("000651.sz",src="yahoo",from="2007-01-01",to="2017-9-30",auto.assign = FALSE)nBYD <- getSymbols("040002",src="yahoo",from="2011-06-30",to="2017-9-30",auto.assign = FALSE)n

得到的數據包含了開盤價、最高價、最低價、收盤價、交易量、調整價。

接著是從數據中選取三支股票的每天收盤價，繪製時間序列圖：

chart_Series(Cl(SWYA),name = "深物業A") ##Cl(SWYA)為獲取深物業A的收盤價，以下同樣。 nchart_Series(Cl(GLDQ),name = "格力電器")nchart_Series(Cl(BYD),name = "比亞迪")n

從2015年開始，深物業A的股票開始呈現上升趨勢，雖然中途由於股災下跌過，但總體趨勢是上升的。

格力電器是十年來呈現上升趨勢，也就是說從一開始就持有格力電器，現在收益是杠杠滴，不過現在說也沒用。

之所以選擇看看比亞迪的股票，一來是因為身為比亞迪人，還是有必要了解下公司的股價行情的，二來是因為9月份以來股價上漲迅速，從去年關注到今天9月份，突然就漲了快50%了。從上圖也可以看出，2016年年底進入低迷期，期間股價波動不大，到了9月份才突飛猛進。也正是因為前期波動不大，所以就算關注了這支股票，也只是偶爾看看，等發現的時候已經漲起來了。

最後是繪製月K線圖：

用chartSeries（）函數繪製包含最高、最低、開盤和收盤四個價格的月K線圖，看其波動情況。

chartSeries(to.monthly(SWYA),name = "深物業A",theme = "white")nchartSeries(to.monthly(GLDQ),name = "格力電器",theme = "white")nchartSeries(to.monthly(BYD),name = "比亞迪",theme = "white")n

深物業A和格力電器到了後期交易量大，也就是到了後期關注這兩個股票的人較多，股票交易比較活躍。而比亞迪很明顯在股價波動不大的時候，交易量並不大，猜測是在9月左右交易量變大，也就是這個時候股票交易變得比較活躍，關注的人也多了。

結論：在購買股票前進行詳細的分析是很有必要的，可以避免盲目買進賣出。由於對股票了解甚少，分析也不是很到位，歡迎指導，謝謝！

最後，利用quantmod包可以獲取很多的信息，這裡只是運用了一些的函數，還有很多函數沒有運用，感興趣的可以搜索。