mapply中打印的奇怪行为

Question

当在mapply()中封装的函数中包含print()作为副作用时，我看到了一些意想不到的行为(至少对我而言)。

例如，这按预期工作(是的，我知道这不是我们添加向量的方式)：

mapply(function(i,j) i+j, i=1:3, j=4:6) # returns [1] 5 7 9

也是这样做的：

mapply(function(i,j) paste(i, "plus", j, "equals", i+j), i=1:3, j=4:6) 
# returns [1] "1 plus 4 equals 5" "2 plus 5 equals 7" "3 plus 6 equals 9"

但这不是：

mapply(function(i,j) print(paste(i, "plus", j, "equals", i+j)), i=1:3, j=4:6)
# returns:
# [1] "1 plus 4 equals 5"
# [1] "2 plus 5 equals 7"
# [1] "3 plus 6 equals 9"
# [1] "1 plus 4 equals 5" "2 plus 5 equals 7" "3 plus 6 equals 9"

这里发生了什么事？我已经有一段时间没有使用mapply()了，所以这可能是不需要动脑筋的…我使用的是R版本3.4.0。

Answer 1

print打印它的参数并返回它的值。

p <- print("abc")
# [1] "abc"
p
# [2] "abc"

所以每个元素都被打印出来，然后向量返回(并打印)。例如，尝试使用invisible(mapply(...))或m <- mapply(...)进行比较。

半成品cat()返回NULL ...