r - 如何在 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

我们可以在print中使用na.print

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