对于股票了解的不是很深，但也听说过，就一直感觉这种投资风险比较大，尤其是在中国的这种股票市场环境下，但是正如猴子说的：长期投资一个像腾讯、阿里这种类型的公司的股票也是会给自己带来被动收入的，所以感觉有必要学习一下这方面的知识。因为还在上学，并没有足够的资金来投资股票，不过试着用R语言分析一下股票也是蛮有意思的，所以尝试用quantmod包来分析股票。

最近在新闻上看到茅台酒业的市值已经达到7000亿，中国白酒产销的数据连续几年持续攀升，当然还有很多其他的白酒企业业绩也相当不错，所以在这里选择了：贵州茅台（SH600519）、五粮液（SZ000858）、洋河股份（SZ002304）这三家白酒企业分析一下。

实践

1、首先载入安装好quantmod包，读取这三家企业历史的股票数据:

library(quantmod)
#获取数据
#贵州茅台
setSymbolLookup(GZMT=list(name='600519.ss',src='yahoo'))
getSymbols("GZMT")
chartSeries(GZMT)
#五粮液
setSymbolLookup(WLY=list(name='000858.sZ',src='yahoo'))
getSymbols("WLY")
chartSeries(WLY)
#洋河股份
setSymbolLookup(YHGF=list(name='600519.ss',src='yahoo'))
getSymbols("YHGF")
chartSeries(YHGF)

贵州茅台：

五粮液：

洋河股份：

贵州茅台自不必说，自上市以来一直保持高歌猛进的状态，而其它两个企业大概都是从14年左右的时候开始保持一直增长的趋势，且最高价都超过了历史最高。

2、接下来用quantmod包的chart_series()函数分别绘制这三只股票的收盘价波动曲线图

chart_Series(Cl(GZMT),name = "贵州茅台")
chart_Series(Cl(WLY),name = "五粮液")
chart_Series(Cl(YHGF),name = "洋河股份")

贵州茅台依旧保持增长，而五粮液和洋河股份大概是从2014年开始保持增长的，也只有3年的时间，时间并不是很长，不知道未来会不会有和茅台一样的增长趋势。

（3）绘制月K线图

在R语言中chartSeries（）函数，可以绘制包含最高、最低、开盘和收盘四个价格的月K线图，看其波动情况：

因为没怎么接触过金融这方面的东西，所以只是简单的分析了一下三只股票的简单变化，当然不准确，毕竟还有很多其他的指标影响着股票的变化，总之一句话：股市有风险，投资需谨慎。

学完第三关，了解到了下面一些知识：

1、为大概率坚持，为小概率备份

2、只做超过50%的事情，在这个前提下用期望做出自己的选择。

3、黑天鹅：小概率事件，不可预测，危险系数大

灰犀牛：大概率，潜伏期长，危险系数大

4、虽然股票是一种风险投资，但长期投资还是很有用的，可以作为自己被动收入的一部分，短期预测困难，长期预测并不难。

5、墨菲定律：凡事只要有可能出错，那一定会出错。任何一个事件，只要具有大于零的概率，时间够长（样本够大），就可确定他必会发生，所以未来是充满很多不确定性的，但是用统计概率的思维去思考将来做的事情，可以做出很多对自己来说是正确或者说是最佳的选择，避免陷入不必要的麻烦中去！

ITPub博客

R语言分析股票

实践

最新文章