R语言怎样抓取某网站JSON数据的代码

R语言怎样抓取某网站JSON数据的代码,针对这个问题,这篇文章详细介绍了相对应的分析和解答,希望可以帮助更多想解决这个问题的小伙伴找到更简单易行的方法。

为湘桥等地区用户提供了全套网页设计制作服务,及湘桥网站建设行业解决方案。主营业务为网站建设、做网站、湘桥网站设计,以传统方式定制建设网站,并提供域名空间备案等一条龙服务,秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求,就会得到认可,从而选择与我们长期合作。这样,我们也可以走得更远!

R语言抓取某网站JSON数据的代码如下:

library(RCurl)
library(bitops)
library(jsonlite)
url<-"http://www.***.com/content/list"
x=1
for( x in 1:55643){
        web[[x]]<-fromJSON(postForm(url,page=x,category=-1,.opts=curlOptions(url=url,ssl.verifyhost=FALSE,ssl.verifypeer=FALSE)))
}
title<-as.character(sapply(web,function(x) x$data$contentBeans$title)) 
category<-as.character(sapply(web,function(x) x$data$contentBeans$category))
time<-as.character(sapply(web,function(x) x$data$contentBeans$time))
name<-as.character(sapply(web,function(x) x$data$contentBeans$name))
avatar<-as.character(sapply(web,function(x) x$data$contentBeans$avatar))
readCount<-as.character(sapply(web,function(x) x$data$contentBeans$readCount))
get_data<-data.frame(title,name,category,time,readCount,avatar)
write.csv(get_data,"~/Desktop/data2.csv")

关于R语言怎样抓取某网站JSON数据的代码问题的解答就分享到这里了,希望以上内容可以对大家有一定的帮助,如果你还有很多疑惑没有解开,可以关注创新互联行业资讯频道了解更多相关知识。


当前文章:R语言怎样抓取某网站JSON数据的代码
文章起源:http://pwwzsj.com/article/jcpddj.html