r - 平台中立呼吁新情节

Question

我有一个调用多个窗口(新图形设备窗口)的函数。为了做到这一点，我使用了 windows()。这行得通，但因为这是一个包，我如何使它成为平台中立的，以便在离开旧窗口的同时在新窗口中绘制每个图？

我目前拥有的:

WORD.C <- function(WORDS){
require(wordcloud)

L2 <- lapply(WORDS, function(x) as.data.frame(table(x), stringsAsFactors = FALSE))

    FUN <- function(X){
        windows()  #how to make this platform neutral
        wordcloud(X[, 1], X[, 2], min.freq=1)
    }
    lapply(L2, FUN)
}

WORD.C(list.xy)

Answer 1

dev.new() 能满足您的需求吗？它会打开一个在您的控制台 session 中设置的默认类型的图形窗口。