1、基本数据类型(numeric,logical,character,NA,double,complex,integer)
2、日期变量
常用函数
Sys.Date()-返回系统当前的日期,Sys.time()-返回系统当前的日期和时间,date()-返回系统当前的日期和时间,
as.Date()-将字符串形式的日期值转换为日期变量,as.Date(x,format="",...)
as.POSIXllt()-将字符串转化为包含时间及时区的日期变量,as.POSIXllt(x,tz="",format)
strptime()-将字符串变量转换为包含时间的日期变量,strptime(x,format,tz="")
strfttime()-将日期变量转换为指定格式的字符串变量,strfttime(x,format)
format()-将日期变量转换为指定格式的字符串变量,format(x,...)
3、查看对象的类型
class()、mode()、typeof()
4、数据结构
(1)向量
向量创建:c()函数创建向量
向量索引:#下标方式索引 vector<-c(1,2,3,4) vector[1] vector[c(1:3)]
#按名称索引 names(vector)<-c("one","two","three","four") vector[c("one","two")]
#which方式索引 which(vector==1) which(vector==c(1,2)) which.max(vector)
#subser方式索引 subset(vector,vector>2&vector<4)
#%in%方式索引 c(1,5)%in%vector
向量编辑 : #向量扩展(x<-c(x,c(5,6,7))) #单个元素的删除 x<-x[-1] #多个元素的删除 (x<-x[c(3:5)])
向量排序:sort(x,decreasing = FALSE,na.last = TRUE...) 倒序——rev()函数
等差数列的建立:seq(from = 1, to = 1, by = ((to - from)/length.out - 1),length.out = NULL,...) seq(1,-9,by = -2)
重复数列的建立:rep(x,times=1,length.out=NA,each=1) rep(1:3, each=2, times=2) 112233112233112233
(2)矩阵
创建矩阵:matrix(data=NA,nrow=1,ncol=1,byrow=FALSE,dimnames=NULL)
x<-c(1:9)
a<-matrix(x,nrow=5,ncol=2,byrow=FAlSE,dimnames=list(c("r1","r2","r3","r4","r5"),c("c1","c2")))
矩阵和转换为向量:as.vector(),转换为向量时元素按列读取数据
矩阵索引:#根据位置索引 a[2,1]
#根据行和列的名称索引 a["r2","c2"]
#使用一维下标索引 a[,2]
#使用数值型向量索引 a[c(3:5),2]
矩阵编辑:#矩阵合并(a1<-rbind(a,c(11,12))) (a2<-rbind(a,c(11:15)))
#删除矩阵中元素 a5<-a[-1,] #删除矩阵中的第一行
矩阵的运算:colSums()-对矩阵的各列求和 rowSums()-对矩阵的各行求和 colMeans()-对矩阵各列求均值 rowMeans()-对矩阵各行求均值
t()-矩阵行列转换 det()-求解矩阵的行列式 crossprod()-求解两个矩阵的内积 outer()-求解矩阵的外积 %*%-矩阵乘法
diag()-对矩阵取对角元素 solve()-对矩阵求解逆矩阵 eigen()-对矩阵求解特征值和特征向量
(3)数组
创建数组:array(data,dim=length(data),dimnames=NULL)
x<-c(1:9)
dim1<-c("A1","A2","A3")
dim2<-c("B1","B2","B3","B4","B5")
dim3<-c("C1","C2")
a<-array(x,dim=c(3,5,2),dimnames=list(dim1,dim2,dim3))
数组索引:#按下标索引 a[2,4,2]
#按维度名称索引a["A2","B3","C1"]
#查看数组的维度 dim(a)
(4)数据框
创建数据框:data.frame()
#向量组成数据框
data_iris<-data.frame(s.length=c(1,1,1,1),s.width=c(2,2,2,2),w.length=c(3,3,3,3),w.width=c(4,4,4,4))
#矩阵组成数据框
data_matrix<-matrix(c(1:8),c(4,2))
data_iris2<-data.frame(data_matrix)
数据框索引:#列索引 data_iris[,1] || data_iris$s.length || data_iris["s,length"]
#行索引 data_iris[1,] || data_iris[1:3,]
#元素索引 data_iris[1,1] data_iris$s.length[1] data_iris["s,length"][1]
#subset索引 subset(data_iris, s.length=1)
#sqldf函数索引 library(sqldf) newdf<-sqldf("select * from mtcars where carb=1 order by mpg",row.names=TRUE)
数据框编辑:#增加新的样本数据 data_iris<-rbind(data_iris,list(9,9,9,9))
#增加数据集的新属性变量 data_iris<-rbind(data_iris,Species=rep(7,5))
#数据框列名的编辑 names(data_iris)
(5)因子
创建因子序列 :
将statistics分解成因子型变量,水平为26个小写字母 (ff<-factor(substring("statistics"),1:10,1:10,levels=letters))
去除没有包含在向量中的水平 f<-factor(ff)
#创建因子型向量,水平名称为letter factor(letters[1:20],labels="letter")
#创建有序的因子序列 z<-factor(LETTERS[1:4],ordered=TRUE)
通过gl()函数创建因子序列 gl(n,k,length=n*k,labels=seq_len(n),ordered=TRUE)
n-表示因子水平的个数
k-表示每个水平的重复数
length-表示生成的序列的长度
labels-一个n维向量,表示因子水平
ordered-一个逻辑值,为TRUE表示有序因子,为FALSE则表示无序因子
gl(2,3,labels=c("T","F"))
因子的存储方式:
> status<-c("Poor","Improved","Excellent","Poor")
> class(status) #查看向量的类型
[1] "character"
> s<-factor(status,ordered=TRUE)
> s
[1] Poor Improved Excellent Poor
Levels: Excellent < Improved < Poor
> class(s)
[1] "ordered" "factor" #查看数据的类型
> storage.mode(s) #查看存储类型,可以看出因子是按整数存储的
[1] "integer"
> as.numeric(s) #转换为数值型向量
[1] 3 2 1 3
> levels(s) #查看因子的水平
[1] "Excellent" "Improved" "Poor"
(6)列表
创建列表:list(object1,object2,...)
data<-list(a=c(1,2,3,4),b=c("true","false"),c=c("one","two","three","four"),d=(1+3i))
列表索引:#列索引 data[[1]] || data$a ||data[["a"]]
#元素索引 data[[1]][1]
列表编辑:列表的编辑和向量类似,使用c()函数进行合并。
#增加名称为e的一列
data1<-c(data,list(e=c(3,4,5)))
或者data1<-c(data,e=list(c(3,4,5)))