R之杂谈

浏览: 1576

1.读取Excel方式

1>read.table

2>read.csv

3>read.xlsx-----XLSX包,加入Encoding="UTF-8"使中文显示正常

4>read_excel-----readxl包

2.读取数据库

1>RODBC

   创建odbc驱动连接

  conn<-odbcConnect("DSN_Name",uid="Login_Name",pwd="Password")

  查数据

  sqlQuery(conn,"sql statement")

  避免中文乱码

  dbSendQuery(conn,"SET NAMES gbk")

3.利用readLines函数爬取拉手网数据

 url<-"http://shanghai.lashou.com/cate/dianying"

web<-readLines(url,encoding="UTF-8"

good_name<-web[grep("classs=\"goods-name\"",web)]

tg<-substr(good_name,regexpr("title=\"",good_name)+7,regexpr("\">",good_name)-1)

4.3.利用rvest包爬取拉手网数据

library(rvest)

url<-"http://shanghai.lashou.com/cate/dianying"

web1<-read_html(url)
tg5<-web1%>%html_nodes("a.goods-name")%>%html_text()

5.利用DT实现数据交互式查询

DT::datatable(result)
PS:以上为学习天善智能R语言课程的记录!!

6.subset取数据集子集

  subset(data_frame,condition,result)--如果result为空,则取满足condition的所有结果subset(data_frame,condition,)

7.读取股票数据

install.packages("quantmod")

getSymbols("MSTR",src="google")#the default yahoo finance

8.添加图例

legend("topright",lty=1,col=c(1,2,3),legend=c("test1","test2","test3")

9.add line

lines(...,col=1)

推荐 1
本文由 bountytian 创作,采用 知识共享署名-相同方式共享 3.0 中国大陆许可协议 进行许可。
转载、引用前需联系作者,并署名作者且注明文章出处。
本站文章版权归原作者及原出处所有 。内容为作者个人观点, 并不代表本站赞同其观点和对其真实性负责。本站是一个个人学习交流的平台,并不用于任何商业目的,如果有任何问题,请及时联系我们,我们将根据著作权人的要求,立即更正或者删除有关内容。本站拥有对此声明的最终解释权。

0 个评论

要回复文章请先登录注册