打印没有行和列索引的矩阵

Question

如果我打印一个矩阵,它会在控制台中显示行和列索引.例如

> print(diag(3))
     [,1] [,2] [,3]
[1,]    1    0    0
[2,]    0    1    0
[3,]    0    0    1

如何抑制列和行索引？就是这样的:

> print(diag(3), indices=FALSE)
1    0    0
0    1    0
0    0    1

我可以看到cwhmisc包应该包含一个printM函数来根据文档执行此操作但是当我加载cwhmisc时它不存在.此外,这似乎是你应该能够在基地R的东西.

Answer 1

该功能prmatrix在base包装可以工作了这一点,它可以接受的参数collab和rowlab:

prmatrix(diag(3), rowlab=rep("",3), collab=rep("",3))

 1 0 0
 0 1 0
 0 0 1

Answer 2

另一种功能解决方案 write.table

write.table(diag(3), row.names=F, col.names=F)

您可以通过使用制表分隔列来使其更漂亮

write.table(matrix(sample(1000,9),3,3), row.names=F, col.names=F, sep="\t")