如何在R中打印矩阵并隐藏NA值？

Question

我有一个包含一些NA元素的矩阵(例如mat下面),我想创建一个新函数,用NA隐藏的值打印它(fun如下所示).我怎样才能做到这一点？

mat <- cbind(c(1,2,NA,NA),c(3,3,3,NA),c(NA,4,4,4),c(NA,NA,5,5))
print(mat)

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

fun(mat)

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

Answer 1

我们可以用na.print在print

print(mat, na.print = "")
#      [,1] [,2] [,3] [,4]
#[1,]    1    3          
#[2,]    2    3    4     
#[3,]         3    4    5
#[4,]              4    5