在上次 tushare正确爬取 指数数据文章后,看到后台有人留言说是希望能分享一个R语言版,那么好,你们要的R语言版今天来了。
首先,R语言只支持tushare pro,不支持tushare,因此在使用tushare获取数据之前,需要注册后才能使用。
library(Tushare)
pro <- pro_api(token = '********** token *********')
股票数据
以平安银行为例:
> pro(api_name = 'daily', ts_code='000001.SZ', start_date='20200101', end_date='20200723')
ts_code trade_date open high low close pre_close change pct_chg vol amount1 000001.SZ 20200723 14.24 14.29 13.81 14.01 14.41 -0.40 -2.7759 2027525.9 2838535.22 000001.SZ 20200722 14.49 14.65 14.27 14.41 14.49 -0.08 -0.5521 1312951.6 1895447.23 000001.SZ 20200721 14.68 14.68 14.40 14.49 14.73 -0.24 -1.6293 1252865.7 1815570.34 000001.SZ 20200720 14.23 14.77 14.10 14.73 14.14 0.59 4.1726 1979632.0 2872758.1
如果需要爬取指数的数据,需要200积分,这里就不演示了,原因你懂得。
如果需要查看指数说明,可以使用index_basic接口。
> pro(api_name = 'index_basic', ts_code='000001.sh', start_date='20200101', end_date='20200723')
ts_code name market publisher category base_date base_point list_date1 000001.SH 上证指数 SSE 中证公司 综合指数 19901219 100 19910715
期货数据
同样,因为积分问题,这里只以期货的交易日历为例,获取上海期货交易所的日历数据。
> pro(api_name = 'trade_cal', ts_code='DCE', start_date='20200101', end_date='20200701')
exchange cal_date is_open1 SSE 20200101 02 SSE 20200102 13 SSE 20200103 14 SSE 20200104 05 SSE 20200105 06 SSE 20200106 17 SSE 20200107 1
IPO新股列表
tushare提供了一个接口,可以查询新股上市列表数据。
> pro(api_name = 'new_share', start_date='20200701', end_date='20200722')
ts_code sub_code name ipo_date issue_date amount market_amount price pe limit_amount funds ballot1 688311.SH 787311 盟升电子 20200722 2867 1092 41.58 68.31 0.80 5.850 0.032 002991.SZ 002991 甘源食品 20200722 2330 2097 38.76 22.99 0.90 9.033 0.023 002995.SZ 002995 天地在线 20200722 1617 1617 33.84 22.99 1.60 5.472 0.014 688586.SH 787586 江航装备 20200722 10094 2746 10.27 47.17 1.80 5.945 0.045 605318.SH 707318 法狮龙 20200721 3229 2906 13.09 22.99 1.20 4.227 0.036 605222.SH 707222 起帆电缆 20200721 5000 4500 18.43 22.98 1.50 9.215 0.047 601456.SH 780456 国联证券 20200721 47572 42815 4.25 19.60 14.20 0.000 0.15
电影数据
tushare提供了电影月度、周度、日度票房数据查询,奈何积分问题,这里就分享一个电影剧本备案数据吧。
pro(api_name = 'film_record', start_date='201900131', end_date='20200722')# 数据太多,这里就看一下数据结构> str(pro(api_name = 'film_record', start_date='201900131', end_date='20200722')
+ )'data.frame': 500 obs. of 9 variables:
$ rec_no : chr "影剧备字[2018]第175号" "影剧备字[2018]第2691号" "影剧备字[2018]第3140号" "影剧备字[2018]第3264号" ...
$ film_name : chr "分裂" "远东特快" "春分夜" "一目了然" ...
$ rec_org : chr "北京天工联合影业有限公司" "晶喜影业(北京)有限公司" "北京海润影业股份有限公司" "北京耳东明樾影业制作有限公司" ...
$ script_writer: chr "李菁菁" "罗登" "舒浩仑" "吴越刘诣" ...
$ rec_result : chr "修改后同意拍摄" "同意拍摄" "修改后同意拍摄" "同意拍摄" ...
$ rec_area : chr "北京市" "北京市" "北京市" "北京市" ...
$ classified : chr "故事影片" "故事影片" "故事影片" "故事影片" ...
$ date_range : chr " 2019年04月21日-04月30日" " 2019年04月21日-04月30日" " 2019年04月21日-04月30日" " 2019年04月21日-04月30日" ...
$ ann_date : chr "2019-06-18 16:32 " "2019-06-18 16:32 " "2019-06-18 16:32 " "2019-06-18 16:32 " ...
新冠疫情数据
提供了两个接口,ncov_num和ncov_global,分别查询国内和国际的新冠疫情数据,不过根据公告日期,数据并不是每天的都有。
首先来查看国内各个省份的数据
> pro(api_name = 'ncov_num',level=3)
ann_date area_name parent_name level confirmed_num suspected_num confirmed_num_now suspected_num_now cured_num dead_num1 20200124 云南省 中国内地 3 5 NA NA NA 0 02 20200124 内蒙古自治区 中国内地 3 2 NA NA NA 0 03 20200124 北京市 中国内地 3 36 NA NA NA 1 0
美国的感染速度可谓是飙升,现在来查一下美国数据。
> pro(api_name = 'ncov_global',country='美国',update_time='20200723')# 由于数据太多,看一下结构> str(pro(api_name = 'ncov_global',country='美国',update_time='20200723'))'data.frame': 277 obs. of 12 variables:
$ publish_date : chr "20200619" "20200618" "20200617" "20200616" ...
$ country : chr "美国" "美国" "美国" "美国" ...
$ country_enname : chr "United States of America" "United States of America" "United States of America" "United States of America" ...
$ province : chr "美国" "美国" "美国" "美国" ...
$ province_short : chr "美国" "美国" "美国" "美国" ...
$ province_enname : chr "United States of America" "United States of America" "United States of America" "United States of America" ...
$ confirmed_num : int 2185873 2164071 2137731 2113366 2092850 2075840 2053606 2023347 2000464 1979971 ...
$ confirmed_num_now: int 1468424 1454152 1437265 1420897 1415313 1403776 1391436 1369235 1354036 1343110 ...
$ suspected_num : int 0 0 0 0 0 0 0 0 0 0 ...
$ cured_num : int 599115 592191 583503 576334 561816 556606 547386 540292 533504 524855 ...
$ dead_num : int 118334 117728 116963 116135 115721 115458 114784 113820 112924 112006 ...
$ update_time : chr "2020-06-19 10:01:28" "2020-06-18 22:33:33" "2020-06-17 15:58:45" "2020-06-16 09:30:34" ...
好了今天就分享到这,希望能帮到你。
另外,我爬取了官方网页,做了一个离线版帮助文档(叫官方文档应该没问题吧),方便大家找接口,可以在后台留言:tushare 即可获取下载链接。
用了几次tushare pro版,总结一下:
两个字:好用,
三个字:真好用,
四个字:积分不够。
如果你也想使用pro版,可以点击阅读原文,用我的注册链接进行注册,顺便帮我也涨涨积分,哈哈哈。
转载请注明:
微信公众号:数据志
简书:数据志
博客园:https://www.cnblogs.com/wheng/
CSDN:https://blog.csdn.net/wzgl__wh
来源:oschina
链接:https://my.oschina.net/u/4308002/blog/4449138