自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+

原创 R-web爬取一般步骤

R网页爬取步骤library(XML)#第一步:读取url并解析成R结构url1=“http:。。。。"url=htmlParse(url1,encoding="UTF-8")#第二步:找网页节点test#第三步:读取节点内容test_text_listtest_text#第四步:读取节点属性content1content1

2014-01-20 16:20:10 2489

转载 R语言—豆瓣搜索电影

豆瓣搜索想要的电影名并返回电影评分,走起library(RCurl)library(XML)movieScore <- function(x) { stopifnot(is.character(x)) # 提交搜索豆瓣表单 search <- getForm("http://movie.douban.com/subject_search", search_text

2014-01-20 15:51:52 1934 1

原创 R-自画蜡烛图R CandleChart

getCandleChart x<-na.omit(x) xax<-x$DATETIME print(paste("xax[1]=",xax[1])) Opens <- as.numeric(x$Open) Highs <- as.numeric(x$High) Lows <- as.numeric(x$Low)

2014-01-06 17:15:31 3464

原创 R-自画蜡烛图CandleChart

getCandleChart<-function(x,theme='white'){ x<-na.omit(x) xax<-x$DATETIME print(paste("xax[1]=",xax[1])) Opens <- as.numeric(x$Open) Highs <- as.numeric(x$High)

2014-01-06 17:13:09 3546

提示
确定要删除当前文章?
取消 删除