求助用R进行融资融券数据的网页抓取

daishen 发表于 2015-1-9 12:08
dat$成交额 = str_extract(dat[,7],"\\d+")

我建shiny遇到的错误提示：

1. The following potential problems were identified in the project files:
   
2. 
   
3. ------
   
4. main.R
   
5. ------
   
6. The following lines contain absolute paths:
   
7. 41:   g1 <- "\\d{4}-\\d{2}-\\d{2}"
   
8. 42:   g2 <- "\\d+"
   
9. 43:   g3 <- "\\d+"
   
10. 
    
11. Paths should be to files within the project directory.
    
12. Do you want to proceed with deployment? [Y/n]:

复制代码

用 [[:digit:]] 替代 \\d 试一试。
dat$成交额 = str_extract(dat[,7],"[[:digit:]]+")

daishen 发表于 2015-1-9 13:15
用 [[:digit:]] 替代 \\d 试一试。
dat$成交额 = str_extract(dat[,7],"[[:digit:]]+")

那个日期和成交量好像也不能含有//，能否改一下？

daishen 发表于 2015-1-9 13:15
用 [[:digit:]] 替代 \\d 试一试。
dat$成交额 = str_extract(dat[,7],"[[:digit:]]+")

这个好像也能抓取，但是会产生很多重复的观测值。麻烦您看看。谢谢！

dat$成交额 = str_extract(dat[,7],"[[:digit:]]+")

dat$日期 = str_extract(dat[,1],"[[:digit:]]{4}-[[:digit:]]{2}-[[:digit:]]{2}")

daishen 发表于 2015-1-9 14:10
dat$日期 = str_extract(dat[,1],"[[:digit:]]{4}-[[:digit:]]{2}-[[:digit:]]{2}")

谢谢！！！

Thank you

谢谢分享

dataorz 发表于 2015-1-8 10:55
网页 2
u = "http://app.finance.ifeng.com/hq/stock_daily.php?code=sh600030"
url = htmlParse(u, enco ...

你好，我试了一下这个code，它可以在Rstudio中运行，但是无法在Shiny端上运行，因为shiny只支持js格式的读取，用这个会出现下面的错误：ERROR:Error in make.names(vnames, unique = TRUE) : invalid multibyte string 5。

您看能否帮助一下？谢谢！！！