library(MASS)#载入package MASS data(package="MASS") #查看MASS中的数据集 data(SP500,package="MASS") #载入MASS中的SP500数据集 data(SP500) #简化写法 getwd() #返回当前工作目录 setwd("d:/r/r-data") #将当前工作路径修改为
data=("d:/r/r-data/",header=T) data #没有设置工作目录
setwd("d:/r/r-data") data1=("",header=T) data1 #设定工作目录
data2=("",header=T) data2 #读入CSV文件
data3=scan("",skip=1,what=list(City="",Work=0,Price=0,Salary=0)) data3 #不存在header参数，skip=1说明读取时跳过表示名称的第一行
mode(data) #显示对象的类型
names(data) #显示对象中的标签
dim(data) #显示对象的维度
data$Salary #通过$符号来选择字段
attach(data) Salary detach(data) #attach（）可以直接通过变量名称来获取变量信息，detach()用来撤销
("d:/r/r-data/",widths=c(2,4,4,3),("w","x","y","z")) data.fwf #widths用来指定4个变量的宽度，指定4个变量的名称
("clipboard") #clipboard即剪贴板 data.excel #通过剪贴板的方式来读取excel中的内容
("RODBC")
library(RODBC) channel=odbcConnectExcel2007("") #通过RODBC包来连接EXCEL文件 sqlTables(channel) #列出Excel中的表格 (channel,"Sheet1") #读取sheet1 =sqlQuery(channel,"select * from[Sheet1$]") #在channel中使用sql close(channel) #关闭channel的连接 mode();dim()
library(RMySQL) con=dbConnect(MySQL(),user="root",password="xjs123",dbname="mysql") #打开一个MySQL的连接 (con) #将数据库中的表名存入table.names field.names=dbListField(con,"event") dbReadTable(con,"event") #获取全表 query=dbSendQuery(con,"select *from event") fetch(query) #显示SQL的结果 dbRemoveTable(con,"event") #删除表 dbDisconnect(con) #关闭连接
load("d:/r/r-data/") #读入R格式文件 head(data,5) #显示数据集前五行
cat(c("AB","C"),c("E","F"),"n",sep="") #cat()可以连接字符串、数字向量等
i=1:5 cat("i=",i,"n",sep=",") #sep=“，”是以逗号为分隔符
cat(c("AB","C"),c("E","F"),file="d:/r/r-data/",sep=".") readLines("d:/r/r-data/") #以行的形式读取文本
cat(i,file="d:/r/r-data/",append=TRUE) readLines("d:/r/r-data/") #append=TRUE表示追加内容，不覆盖之前内容
a=file("d:/r/r-data/") #通过file先打开一个连接 cat("1 2 3 4 ","2 3 5 7","11 13 15 17", file=a, sep="\n") #\n表示换行 (a)
data1=("d:/r/r-data/",header=T) (data1,file="d:/r/r-data/",=T,quote=F) #写入数据
(data1,file="d:/r/r-data/",) =("d:/r/r-data/") dim() #写入CSV文件
save(data,file="d:/r/r-data/") #保存R文件 load("d:/r/r-data/") #读入R文件 head(data,5)
