在 R 中调用函数时如何抑制绘图的创建？答案

【问题标题】：How can I suppress the creation of a plot while calling a function in R?在 R 中调用函数时如何抑制绘图的创建？
【发布时间】：2013-12-03 22:45:49
【问题描述】：

我正在使用 R 中的一个函数（特别是 limma::plotMDS），它会生成一个绘图并返回一个有用的值。我想在不产生情节的情况下获得返回值。有没有一种简单的方法来调用函数但抑制它创建的情节？

【问题讨论】：

您可以尝试将pdf("NULL") 和dev.off 放在绘图函数/对象周围。
这不会创建一个名为“NULL”的 PDF 文件吗？
会的。对于那个很抱歉。在调用绘图函数/对象之前尝试调用suppressWarnings(windows("NULL"))。但请注意，此解决方案是特定于 Windows 的。
@Jota pdf(file = NULL) 应该可以工作，没有引号。

标签： r

【解决方案1】：

你可以像这样包装函数调用：

plotMDS.invisible <- function(...){
    ff <- tempfile()
    png(filename=ff)
    res <- plotMDS(...)
    dev.off()
    unlink(ff)
    res
}

调用示例：

x <- matrix(rnorm(1000*6,sd=0.5),1000,6)
rownames(x) <- paste("Gene",1:1000)
x[1:50,4:6] <- x[1:50,4:6] + 2
# without labels, indexes of samples are plotted.
mds <- plotMDS.invisible(x,  col=c(rep("black",3), rep("red",3)) )

【讨论】：

似乎没有必要创建一个临时文件。我可以改用 /dev/null 吗？