我有一个"测试"数据框架,其中3家公司(Ciknum变量(和每家公司提交年度报告(FYEARQ(的年份:
ciknum fyearq
1 1408356 2012
2 1557255 2012
3 1557255 2013
4 1557255 2014
5 1557255 2015
6 1557255 2016
7 1555538 2013
8 1555538 2014
9 1555538 2015
10 1555538 2016
获得了MasterIndex文件夹并运行此代码(请参阅建议的解决方案(,我使用R Edgar软件包获取10-K文件。我运行以下代码:
for (i in 1:nrow(test)){
firm<-test[i,"ciknum"] #edit: seems like mistake can be here since new firm data only contains 1 obs of 1 variable
year<-test[i,"fyearq"] #edit: seems like mistake can be here since new year data only contains 1 obs of 1 variable
my_getFilings(firm,'10-K',year,downl.permit="y")
}
,它一直在吐出以下错误:Error: Input year(s) is not numeric
。我检查了变量类型,看来我的fyearq变量是数字。
sapply(test,class)
ciknum fyearq
"numeric" "numeric"
并不真正理解为什么MY_GETFILINGS函数不读取" Numeric" FyeARQ变量。任何帮助将不胜感激。
预先感谢您。
马丁斯订购似乎很重要。我通过使用该函数的描述符解决了这个问题,因此
my_getFilings(firm,'10-K',year,downl.permit="y")
您写的正如您所写的
my_getFilings(cik.no = firm, form.def = '10-K', filing.year = 2016, downl.permit = "y")
谢谢你 @bartosz25和m grace,
我终于通过以下代码使它起作用:
for (row in 1:nrow(test)){
firm <- as.numeric(test[row, "ciknum"])
year <- as.numeric(test[row, "fyearq"])
my_getFilings(firm, c('10-K'), year, downl.permit="y")
}
很抱歉不发布它。