如何沉默来自`map_dfc()`的“新名称”消息？

Question

因此，我有一个返回data.frame的函数，如下所示：

foo<-function(sd){
  data.frame(
    first=rnorm(2,0,sd),
    second=rnorm(2,0,sd/2)
  )
}

现在，当我使用purrr:map_dfc()从由foo生成的data.frame创建单个data.frame时，我得到：

map_dfc(1:2, foo)

New names:
* first -> first...1
* second -> second...2
* first -> first...3
* second -> second...4
  first...1 second...2 first...3 second...4
1 0,6905908  0,1499820 -0,685636  1,0323695
2 1,7293986 -0,4653913 -2,049278 -0,2364952

这很好，但是是否有一种方法可以使控制台中的“新名称”消息保持沉默呢？

编辑我知道suppressMessages()，但它会沉默所有可能的消息，而我希望只使用“新名称”消息。

Answer 1

您可以删除第一次收到这些消息的原因。

foo <- function(sd, name){
  tibble::tibble(
    'first_{{name}}' := rnorm(2,0,sd),
    'second_{{name}}' := rnorm(2,0,sd/2)
  )
}

purrr::imap_dfc(1:2, foo)

#  first_1L second_1L first_2L second_2L
#     <dbl>     <dbl>    <dbl>     <dbl>
#1    0.683    -1.25    -2.03      0.801
#2   -1.17      0.530   -0.170    -0.148