最近因为投资分析需要接触R语言,需要获取A股上市公司数据。从同花顺下载效率太低,就到处找途径。分享下方法,共其他小白参考,请大神指正。
R语言自带的quantmod数据不错,不过国内A股数据不全,而且时常出错,而且由于谷歌已经终止了提供财务数据,更影响了使用,因此只能作为不错。当然,雅虎财经最近也上线了财务数据板块,不过个人还不懂得爬虫抓取,还等大神分享方法。
网上也有一些讲解从新浪财经抓取数据的方法,不过个人觉得还是从网易财经抓取股票数据和财务数据最简单,虽然可能相比其他方法效率也不快,而且网易财经的股价都是除权的。
结合看的两本书,写了个源文件,从网易财经下载财务数据或股票成交数据到指定文件夹,再批量整合,或者读取指定股票,方法如下:
#脚本名称:RStock.R
#从网易财经抓取公司财务数据(主要指标,其他部分可参考,简单修改url),20191208
#参考《量化投资基础、方法与策略:R语言实战指南》,付志刚,沈慧娟
getStockFin <- function(data,...){
for(i in 1:length(data)){
symbol <- data[i]
url <-paste0("http://quotes.money.163.com/service/zycwzb_",as.character(symbol),".html?type=year")
savefile <- paste0("E://Data_Analysis//StockFinancial//",as.character(symbol),".csv")
download.file(url,dest