r - 如何使用 apply、cat 和 print，而不获取 NULL

Question

我正在尝试使用 cat() 作为 apply() 中的函数。我几乎可以让R做我想做的事，但是在返回结束时我得到了一些非常令人困惑的(对我来说)NULL。这是一个愚蠢的示例，以突出显示我所得到的内容。

val1 <- 1:10
val2 <- 25:34
values <- data.frame(val1, val2)
apply(values, 1, function(x) cat(x[1], x[2], fill=TRUE))

这“有效”，因为 R 接受它并运行，但我不明白结果。

> apply(values, 1, function(x) cat(x[1], x[2], fill=TRUE))
1 25
2 26
3 27
4 28
5 29
6 30
7 31
8 32
9 33
10 34
NULL

但是，我想得到:

> apply(values, 1, function(x) cat(x[1], x[2], fill=TRUE))
1 25
2 26
3 27
4 28
5 29
6 30
7 31
8 32
9 33
10 34

那么，如何删除最后的 NULL？

Answer 1

NULL 是 R 解释器打印您输入的表达式的值 - apply。您可以将其分配到某个地方:

junk = apply(values, 1, function(x) cat(x[1], x[2], fill=TRUE))

在这种情况下，它不会被打印，或者将其包装在“invisible”中:

invisible(apply(values, 1, function(x) cat(x[1], x[2], fill=TRUE)))

请注意，只有当您以交互方式运行此命令时，才会打印每一行，如果它位于函数中，您将看不到它。