R语言中打印NA值统计结果时如何去除末尾NULL？

嘿，我来帮你搞定这个小问题～你看到的NULL其实是因为print()和cat()的搭配用错啦！

问题原因 #

cat()函数本身就会直接把内容输出到控制台，但它的返回值是NULL。当你用print()去包裹cat()的时候，程序会先执行cat()输出「NA Value: 0」，然后print()又把cat()返回的NULL给打印出来，所以就出现了「NA Value: 0NULL」的奇怪结果。

两种解决方案 #

方案1：直接使用cat()（最贴合你的期望输出）

去掉外层的print()，直接调用cat()就行，如果想要输出后自动换行，可以加个\n：

pclassNaValue <- sum(is.na(titanic$Pclass))
cat("NA Value: ", pclassNaValue, "\n")

执行后就会输出干净的「NA Value: 0」啦。如果不想让数字前面有空格，也可以用paste0()拼接后再输出：

cat(paste0("NA Value: ", pclassNaValue), "\n")

方案2：用paste()拼接后再print()

如果你习惯用print()，可以先把文本和数值拼接成一个完整的字符串，再打印：

pclassNaValue <- sum(is.na(titanic$Pclass))
print(paste("NA Value: ", pclassNaValue))

这种方式的输出会是「[1] "NA Value: 0"」，如果不需要前面的[1]和引号，方案1会更适合你。

内容的提问来源于stack exchange，提问作者MichaelDev