rep() 函数中的函数

Question

为什么

rep(message("TEST"),3)
rep(c(message("TEST")),3)

>
TEST
NULL
> 

不一样

c(message("TEST"),message("TEST"),message("TEST"))

>
TEST
TEST
TEST
NULL
> 

然后如何使用rep() 函数获得第二个结果？

编辑：

我们可以使用非常“方便”：

invisible(lapply((rep(c(quote(message("TEST"))),3)),eval))
> 
TEST
TEST
TEST
> 

Answer 1

来自?rep：

‘rep’复制‘x’中的值。

message("TEST") 中的 值为 NULL。

你可以用例如检查这个

m <- message("TEST");
m;
#NULL
rep(m, 3);
#NULL
rep(NULL, 3);
#NULL

关于您的第二个问题，请参阅@docendodiscimus 的评论。