如何在R中的矩阵中添加新列?

数据收集过程是数据分析项目中的初始且非常重要的任务之一,有时我们会遗漏一些东西。因此,我们需要稍后收集该数据,并将其添加到原始收集的数据中。对于矩阵数据也可能会发生此错误,因此我们可能需要在原始矩阵中添加新列,这可以通过使用cbind函数来完成。

例1

> M1<-matrix(1:25,nrow=5)

> M1

输出结果

   [,1] [,2] [,3] [,4] [,5]

[1,] 1 6 11 16 21

[2,] 2 7 12 17 22

[3,] 3 8 13 18 23

[4,] 4 9 14 19 24

[5,] 5 10 15 20 25

示例

> V1<-26:30

> M1<-cbind(M1,V1)

> M1

输出结果

V1

[1,] 1 6 11 16 21 26

[2,] 2 7 12 17 22 27

[3,] 3 8 13 18 23 28

[4,] 4 9 14 19 24 29

[5,] 5 10 15 20 25 30

例2

> M2<-matrix(rpois(81,5),ncol=9)

> M2

输出结果

[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9]

[1,] 7 3 3 4 2 3 6 3 6

[2,] 7 5 6 6 4 4 4 5 3

[3,] 5 6 3 9 4 3 4 6 4

[4,] 4 4 3 6 1 3 6 9 4

[5,] 2 4 4 5 9 2 3 4 4

[6,] 6 5 5 3 3 4 3 9 5

[7,] 11 5 5 6 4 5 3 4 4

[8,] 4 3 1 1 9 3 5 4 3

[9,] 14 7 5 1 6 4 4 6 5

示例

> V2<-rpois(9,10)

> M2<-cbind(M2,V2)

> M2

输出结果

V2

[1,] 7 3 3 4 2 3 6 3 6 14

[2,] 7 5 6 6 4 4 4 5 3 9

[3,] 5 6 3 9 4 3 4 6 4 7

[4,] 4 4 3 6 1 3 6 9 4 10

[5,] 2 4 4 5 9 2 3 4 4 6

[6,] 6 5 5 3 3 4 3 9 5 11

[7,] 11 5 5 6 4 5 3 4 4 10

[8,] 4 3 1 1 9 3 5 4 3 12

[9,] 14 7 5 1 6 4 4 6 5 13

例子3

> M3<-matrix(rnorm(25,2,0.36),nrow=5)

> M3

输出结果

[,1] [,2] [,3] [,4] [,5]

[1,] 1.696484 1.269688 1.607353 1.913940 2.463333

[2,] 2.485409 2.107897 1.989745 2.072183 1.120741

[3,] 2.202257 1.715435 2.027664 1.230764 2.435480

[4,] 1.845053 2.132015 1.845209 1.480105 1.870550

[5,] 2.286963 1.776010 1.691820 1.634944 2.091766

示例

> V3<-rnorm(5,5,1)

> M3<-cbind(M3,V3)

> M3

输出结果

V3

[1,] 1.696484 1.269688 1.607353 1.913940 2.463333 4.961799

[2,] 2.485409 2.107897 1.989745 2.072183 1.120741 5.243562

[3,] 2.202257 1.715435 2.027664 1.230764 2.435480 4.393539

[4,] 1.845053 2.132015 1.845209 1.480105 1.870550 6.008758

[5,] 2.286963 1.776010 1.691820 1.634944 2.091766 5.988232

例子4

> M4<-matrix(round(runif(64,2,5),0),ncol=8)

> M4

输出结果

[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8]

[1,] 3 5 5 3 4 3 4 3

[2,] 3 3 4 3 3 3 4 3

[3,] 3 4 3 4 4 4 4 2

[4,] 3 2 3 2 5 2 5 4

[5,] 4 4 2 5 3 3 2 3

[6,] 3 4 3 3 4 2 4 5

[7,] 4 3 3 3 4 4 3 2

[8,] 4 3 4 3 4 4 2 5

示例

> V4<-round(runif(8,1,5),0)

> M4<-cbind(M4,V4)

> M4

输出结果

V4

[1,] 3 5 5 3 4 3 4 3 5

[2,] 3 3 4 3 3 3 4 3 5

[3,] 3 4 3 4 4 4 4 2 4

[4,] 3 2 3 2 5 2 5 4 2

[5,] 4 4 2 5 3 3 2 3 5

[6,] 3 4 3 3 4 2 4 5 4

[7,] 4 3 3 3 4 4 3 2 2

[8,] 4 3 4 3 4 4 2 5 3

范例5

> M5<-matrix(round(rexp(36,1.22),2),ncol=6)

> M5

输出结果

[,1] [,2] [,3] [,4] [,5] [,6]

[1,] 1.55 0.02 1.27 0.31 0.10 0.08

[2,] 1.13 0.26 0.46 0.06 0.90 0.43

[3,] 0.14 1.26 0.89 0.12 0.16 0.63

[4,] 0.33 0.79 1.03 2.72 0.17 0.49

[5,] 0.17 4.59 0.04 0.26 0.18 1.52

[6,] 0.46 1.05 0.10 0.96 0.64 0.31

示例

> V5<-round(rexp(6,2.1),2)

> M5<-cbind(M5,V5)

> M5

输出结果

V5

[1,] 1.55 0.02 1.27 0.31 0.10 0.08 0.07

[2,] 1.13 0.26 0.46 0.06 0.90 0.43 0.00

[3,] 0.14 1.26 0.89 0.12 0.16 0.63 0.40

[4,] 0.33 0.79 1.03 2.72 0.17 0.49 0.23

[5,] 0.17 4.59 0.04 0.26 0.18 1.52 0.32

[6,] 0.46 1.05 0.10 0.96 0.64 0.31 0.64

以上是 如何在R中的矩阵中添加新列? 的全部内容, 来源链接: utcz.com/z/343274.html

回到顶部