函数在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'评论。