求教R语言抓取数据

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

http://vip.stock.finance.sina.co ... radedate=2016-08-23
想抓取融资融券数据的买入额，是什么思路？

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：抓取数据 R语言 Finance Financ Finan

用 httr和rvest包

1. if(!require(rvest))
   
2.   install.packages("rvest")
   
3. library(rvest)
   
4. 
   
5. ## 获取表格数据
   
6. stock.finance <- read_html(paste0('http://vip.stock.finance.sina.com.cn/q',
   
7.   '/go.php/vInvestConsult/kind/rzrq/index.phtml?tradedate=2016-08-23'))
   
8. stock.table <- html_table(stock.finance, fill = TRUE, header = FALSE)
   
9. stock.table <- stock.table[[2]] ## 表格2
   
10. 
    
11. ## 各股票交易明细
    
12. stock.info <- stock.table[-3:-1,]
    
13. names(stock.info) <- c(stock.table[2,1:3], stock.table[3,1:8])

复制代码

学习学习