R 抑制打印到屏幕上的平稳性测试的输出

如何从in R获得

平稳性测试，以不在屏幕上打印任何输出

例如，当使用
shapiro.wilk
测试将结果设置为变量时，它不会给出任何如下输出

lg.day.ret.vec <- rnorm(100, mean = 5, sd = 3)

shap.p <- shapiro.test(lg.day.ret.vec)$p.value

事实上，您可以通过重新路由来抑制到R控制台的输出。在实用程序中有两种方法可用，
sink
和
capture.output
。这两种方法都旨在将输出发送到文件

由于要抑制单个表达式的输出，因此可以使用
capture.output
，使用
file=NULL
（默认值）。这将以字符串形式返回您的输出。要防止在R控制台中显示此返回字符串，可以使用
不可见

最终代码可以是：

library(fractal)

lg.day.ret.vec <- rnorm(100, mean = 5, sd = 3)
shap.p <- shapiro.test(lg.day.ret.vec)$p.value

invisible(capture.output(
    stat.p <- attr(stationarity(lg.day.ret.vec),"pvals")[1]
))

库（分形）
lg.day.ret.vec@user20650谢谢，是的，编辑是正确的
library(fractal)

lg.day.ret.vec <- rnorm(100, mean = 5, sd = 3)
shap.p <- shapiro.test(lg.day.ret.vec)$p.value

invisible(capture.output(
    stat.p <- attr(stationarity(lg.day.ret.vec),"pvals")[1]
))