45286人阅读
金融之路（42）
追加：对应的quantmod包相关说明参考&
quantmod 包默认是访问 yahoo finance 的数据，其中包括上证和深证的股票数据，还有港股数据。
上证代码是 ss，深证代码是 sz，港股代码是 hk
比如茅台：6000519.ss，万科 000002.sz，长江实业 0001.hk
在R的控制台里使用如下命令：
& library(quantmod)
& setSymbolLookup(WK=list(name='000002.sz',src='yahoo'))
& getSymbols(&WK&)
& chartSeries(WK)
贵州茅台的测试如下：
& setSymbolLookup(GZMT=list(name='600519.ss',src='yahoo'))
& getSymbols(&GZMT&)
[1] &GZMT&
& chartSeries(GZMT)
长江实业的测试如下：
& setSymbolLookup(CJSY=list(name=&00001.hk&,src=&yahoo&))
& getSymbols(&CJSY&)
& chartSeries(CJSY, up.col='red', dn.col='green', TA=&addVo(); addMACD(); addSMA(n=10)&)
上证指数：
& getSymbols(&^SSEC&)
& chartSeries(SSEC, up.col='red', dn.col='green', TA=&addVo(); addMACD(); addSMA(n=10)&)
访问：2736744次
积分：30988
排名：第185名
原创：433篇
转载：1011篇
译文：147篇
评论：101条
(24)(19)(20)(10)(22)(51)(22)(1)(1)(17)(9)(11)(65)(8)(29)(27)(1)(6)(32)(57)(29)(8)(3)(37)(89)(109)(51)(165)(92)(105)(220)(171)(34)(6)(19)(4)(1)(8)(6)(1)(1)Currently browsing category豆丁微信公众号
君，已阅读到文档的结尾了呢~~
介绍R语言利用quantmod包获取金融数据的方法
扫扫二维码，随身浏览文档
手机或平板扫扫即可继续访问
怎样利用quantmod包获取金融数据
举报该文档为侵权文档。
举报该文档含有违规或不良信息。
反馈该文档无法正常浏览。
举报该文档为重复文档。
推荐理由：
将文档分享至：
分享完整地址
文档地址：
粘贴到BBS或博客
flash地址：
支持嵌入FLASH地址的网站使用
html代码：
&embed src='http://www.docin.com/DocinViewer-4.swf' width='100%' height='600' type=application/x-shockwave-flash ALLOWFULLSCREEN='true' ALLOWSCRIPTACCESS='always'&&/embed&
450px*300px480px*400px650px*490px
支持嵌入HTML代码的网站使用
您的内容已经提交成功
您所提交的内容需要审核后才能发布，请您等待！
3秒自动关闭窗口38被浏览1,338分享邀请回答0添加评论分享收藏感谢收起#这个例子，fun1/fun2/fun3相当于有三个指标是你自定义的，通过这个办法可以绘制出来，里面的addBBands()是自带的指标，可以把这四个指标一起绘制出来。
#参数x可以是个哑元，在一个实例文件里，fun1/fun2/fun3可以直接处理全局变量。我就是这么做的，不用把一个大数组传参。
fun1 &- function(x)
# your logic
return(rt1.xts)
fun2 &- function(x)
# your logic
return(rt2.xts)
fun3 &- function(x)
# your logic
return(rt3.xts)
ta1 &- newTA(FUN=fun1,on=1,...)
ta2 &- newTA(FUN=fun2,...)
ta3 &- newTA(FUN=fun3,...)
cn.theme &- chartTheme(up.col = "red",dn.col = "green")
chartSeries(rc.xts,name="",theme=cn.theme,TA=c(ta1(),ta2(),ta3(),addBBands(n=26)))
07 条评论分享收藏感谢收起写回答38被浏览1,338分享邀请回答#这个例子，fun1/fun2/fun3相当于有三个指标是你自定义的，通过这个办法可以绘制出来，里面的addBBands()是自带的指标，可以把这四个指标一起绘制出来。
#参数x可以是个哑元，在一个实例文件里，fun1/fun2/fun3可以直接处理全局变量。我就是这么做的，不用把一个大数组传参。
fun1 &- function(x)
# your logic
return(rt1.xts)
fun2 &- function(x)
# your logic
return(rt2.xts)
fun3 &- function(x)
# your logic
return(rt3.xts)
ta1 &- newTA(FUN=fun1,on=1,...)
ta2 &- newTA(FUN=fun2,...)
ta3 &- newTA(FUN=fun3,...)
cn.theme &- chartTheme(up.col = "red",dn.col = "green")
chartSeries(rc.xts,name="",theme=cn.theme,TA=c(ta1(),ta2(),ta3(),addBBands(n=26)))
07 条评论分享收藏感谢收起}