基于R平台的2012 三季报数据

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

股市惨淡，但做数据分析的不能惨淡，要有正能量。声明：本次数据来源公开合法，不设版权保护，如需要声明数据来源，只需指明人大经济论坛即可。

现发布基于R平台的数据。可以直接在R中引用(见下面使用指南)。
截止于2012 三季报发布，包含全 部股票的下列数据：

              ":: 每股收益",
              ":: 每股净资产",
              ":: 净资产收益率",
              ":: 每股资本公积金",
              ":: 每股未分配利润",
              ":: 净利润增长率",
              ":: 主营收入增长率",
              ":: 五日换手率",
              ":: 五日表现",
              ":: 十日换手率",
              ":: 十日表现",
              ":: 一年高点",
              ":: 一年低点",
              ":: 流通股本",
              ":: 总股本"

使用方法：下载文件后，
在R 平台上，load("basicinfo.zip")

即有：
> ls()
[1] "all20121116"

> colnames(all20121116)
[1] "stk"      "yield"    "netasset" "yaratio"  "capacc"   "undpro"  
[7] "progro"   "mbgro"    "d5tu"     "d5pre"    "d10tu"    "d10pre"  
[13] "yhigh"    "ylow"     "incir"    "tot"

使用举例1如: 要查询所有股票盈利总和 ：
> sum(as.numeric(all20121116[,"yield"])*as.numeric(all20121116[,"tot"]))
[1] 150905661（万元）

如要查询总盈利前100名的股票

una<-all20121116[order(as.numeric(all20121116[,"yield"])*as.numeric(all20121116[,"tot"]),decreasing=T),"stk"]
unlist(una[1:100])

等等。

本数据使用不设限，只需2论坛币啊，包邮有木有，亲。

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：三季报 numeric 净资产收益率 人大经济论坛 yield 平台 2012 净资产 收益率

好东西 感谢楼主

学习一下