R：我有一个带有不可见返回值的函数，如何将其向量化而不得到巨大的null输出？]

Question

我编写了一个相当简单的函数，我相信不会返回任何内容：

bar<-function(a,b)
{
  if(foo(a,b)){print(c(a,b))}
  return(invisible())
}

我想在一个巨大的矩阵上调用此函数，例如outer(1:100,1:100,Vectorize(bar))。这样做时，我得到了想要的打印效果，但是我也得到了大量NULL值的输出。如何调整此代码以摆脱大量的NULL，而又不丢失我想要的打印内容？

我编写了一个相当简单的函数，我相信不会返回任何东西：bar

Answer 1

无论a和b的大小如何，此布置都将返回单个NULL。就像在...