R语言-创建数据集

2.2.1向量
向量是用于存储数值型、字符型火逻辑型数据的一维数组。
> a <- c(1,2,5,3,6,2,4)
> a
[1] 1 2 5 3 6 2 4
> a[3]
[1] 5
> a[c(1,2,3)]
[1] 1 2 5
> a[c(1:4)]
[1] 1 2 5 3


2.2.2矩阵
矩阵式一个二维数组,只是每个元素都拥有相同的模式(数值型,字符型或逻辑型),可通过函数matrix创建矩阵。


创建矩阵
> y<-matrix(1:20,nrow=5,ncol=4)
> y
     [,1] [,2] [,3] [,4]
[1,]    1    6   11   16
[2,]    2    7   12   17
[3,]    3    8   13   18
[4,]    4    9   14   19
[5,]    5   10   15   20
> cells<-c(1:4)
> rnames<-c("R1","R2")
> cnames<-c("C1","C2")
>  mamatrix<-matrix(cells,nrow=2,ncol=2,byrow=TRUE,dimnames=list(cnames,rnames))
> mamatrix
   R1 R2
C1  1  2
C2  3  4
>  mamatrix<-matrix(cells,nrow=2,ncol=2,byrow=FALSE,dimnames=list(cnames,rnames))
> mamatrix
   R1 R2
C1  1  3
C2  2  4

矩阵下标使用
> x<-matrix(1:10,nrow=2)
> x
     [,1] [,2] [,3] [,4] [,5]
[1,]    1    3    5    7    9
[2,]    2    4    6    8   10
> x[2,]
[1]  2  4  6  8 10
> x[,2]
[1] 3 4
> x[1,4]
[1] 7
> x[1,c(2:4)]
[1] 3 5 7


2.2.3数组
数组(array)与矩阵类似,但是维度可以大于2,数组可通过array函数创建。


dim1<-c("A1","A2")
dim2<-c("B1","B2","B3")
dim3<-c("C1","C2","C3","C4")
z<-array(1:24,c(2,3,4),dimnames=list(dim1,dim2,dim3))
> z
, , C1


   B1 B2 B3
A1  1  3  5
A2  2  4  6


, , C2


   B1 B2 B3
A1  7  9 11
A2  8 10 12


, , C3


   B1 B2 B3
A1 13 15 17
A2 14 16 18


, , C4


   B1 B2 B3
A1 19 21 23
A2 20 22 24


2.2.4数据框
由于不同的列可以包含不同模式的数据,数据框的概念较矩阵来说更为一般。


作图
dose <- c(20,30,40,45,60)
drugA <- c(16,20,27,40,60)
plot(dose,drugA, type="b",
col="red",lty=2, pch=2,lwd=2,
main="大clinical trials for drug A",
sub="this is hypothetical data",
xlab="doseage", ylab="drug response",
xlim=c(0,60), ylim=c(0,70))



创建leadership数据框

manager <- c(1,2,3,4,5)
data <- c("10/24/08","10/28/08","10/1/08","10/12/08","5/1/09")
country <- c("US", "US", "UK", "UK", "UK")
gender <- c("M", "F", "F", "M", "F")
age <- c(32,45,25,39,99)
q1 <-c(5,3,3,3,2)
q2 <- c(4,5,5,3,2)
q3 <- c(5,2,5,4,1)
q4 <- c(5,5,5,NA,2)
q5 <- c(5,5,2,NA,1)
leadership <- data.frame(manager,data,country,gender,age,q1,q2,q3,q4,q5,stringsAsFactors=FALSE)

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值