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)