R语言动态获取股票价格

Author: Lv Wenjuan

可以调用新浪提供的接口

步骤：

一、获取关于股票价格的字符信息，以"sz002312"为例

> url<-"http://hq.sinajs.cn/list=sz002312"

> a<-url(url)

> html<-readLines(a)

> html

[1] "var hq_str_sz002312=\"三泰控股,86.00,82.50,90.75,90.75,82.11,90.75,0.00,14078448,1244537538.70,177518,90.75,300,90.70,900,90.60,2300,90.58,1400,90.57,0,0.00,0,0.00,0,0.00,0,0.00,0,0.00,2015-05-29,15:05:14,00\";"

PS：查找不同股票对应的价格只需要改变url中最后的股票代号即可

二、将获取的页面字符和该股票的价格页面作比较，进行字符串截取



> str<-strsplit(html,",")

> str<-unlist(str)[4]

> str

[1] "90.75"

PS：可以根据需要提取自己所需要的股票价格数值