如何在不使用print（）的情况下打印函数的结果？

Question

我需要在包装的功能范围内打印Tukey测试结果的结果。但是，CRAN回答说我不能使用print（）/ cat（）。如果我使用message（），则消息不会以所需的格式显示出来，就像在print（）中一样。

res.aov <- aov(y ~ x, data= data)
  tukey<-TukeyHSD(res.aov)

print(tukey$`x[, 1]`)

使用print（），结果显示出来，就像我希望它出现在控制台上一样：

         diff         lwr        upr      p adj
2-1 0.0188276 0.003123183 0.03453202 0.01922062

但是使用message（），结果看起来像这样：

0.01882759965134230.003123182712210140.03453201659047440.0192206190347084

对结果与印刷（）一样有建议吗？谢谢。

Answer 1

您可以使用values-night函数将打印结果的所需结果保存到变量中。然后，您可以正确格式化字符串并将其传递给values。请参见下面的示例：

capture.output()