【R每日一贴】R矩阵那些事（二）？

R矩阵那些事，我继续来说。

事情三：矩阵行列命名。R使用rownames()和colnames()函数给矩阵的行列命名。举例说明如下。

> mat1 <- matrix(1:4, 2, 2, byrow=TRUE)

> mat1

     [,1] [,2]

[1,]    1    2

[2,]    3    4

> rownames(mat1) <- c("r1", "r2")

> mat1

   [,1] [,2]

r1    1    2

r2    3    4

> colnames(mat1) <- c("c1", "c2")

> mat1

   c1 c2

r1  1  2

r2  3  4

说明：也可以使用matrix()函数中的dimnames 参数来给行或者列命名，例如。

> mat2 <- matrix(1:4, nrow=2, ncol=2, byrow=TRUE, dimnames=list(c("r1","r2"), c("c1", "c2")))

> print(mat2)

   c1 c2

r1  1  2

r2  3  4

事情四：矩阵行或列获取，举例说明如下。

> mat3 <- matrix(c(0, 1, 180, 360), 2, 2)

> print(mat3)

     [,1] [,2]

[1,]    0  180

[2,]    1  360

> mat3[1,]#第一行

[1]   0 180

> mat3[,2]#第二列

[1] 180 360

注意：采用上述方法获取矩阵行或者列，会移除维数属性。若要保留，设置参数drop=FASLE，例如。

> mat3[1,,drop=FALSE]

     [,1] [,2]

[1,]    0  180

> mat3[, 2, drop=FALSE]

     [,1]

[1,]  180

[2,]  360

【想一想】

1 有哪些方法可以对函数的行列进行命名，举例说明？

2 如何获取矩阵中的子元素？

【做一做】

1 用R帮助文档查看matrix函数及实例？

【温馨话语】

君子和而不同，小人同而不和。

我是陆勤，微信号：wangluqing360，你们在R路上的朋友，一起欣赏R路上的风景。PPV课R语言群：342699237，欢迎朋友们加入，共建最好的R社区。

赠人玫瑰，手有余香。若是觉得此文有用，欢迎分享给更多的人，让更多的人受用。

你若安好，便是晴天。若是朋友们有什么想法或建议，欢迎给我留言或者私信于我。