"message=FALSE" 不起作用时如何在 R markdown 中隐藏消息

Question

我正在使用 R Markdown 和 text2vec，并希望抑制来自运行函数 glove$fit_transform() 的消息。我已经尝试了 message=FALSE 和 warning=FALSE，并进行了多次尝试来解决问题，但都无济于事。我会如此，非常感谢您对这个问题的看法。

library(gutenbergr)
library(tidyverse)
library(text2vec)

h_g_wells <- gutenberg_download(35)

h_g_wells <- h_g_wells %>%
  sample_n(20)

vocab_list = list(h_g_wells$text)

it = itoken(vocab_list, progressbar = FALSE)

vocab = create_vocabulary(it)

vocab = prune_vocabulary(vocab, term_count_min = 1)

vectorizer = vocab_vectorizer(vocab)

tcm = create_tcm(it, vectorizer, skip_grams_window = 5)

glove = GlobalVectors$new(rank = 4, x_max = 100)
    
wv_main = glove$fit_transform(tcm, n_iter = 1000, convergence_tol = 0.00000001, n_threads = 24)

非常感谢您的帮助。

Answer 1

我不知道这个功能。也许它会触发 cat。我会尝试使用这个功能：

quiet <- function(x) {
  sink(tempfile())
  on.exit(sink())
  invisible(force(x))
}

像这样：

quiet(glove$fit_transform(tcm, n_iter = 1000, ......))

"message=FALSE" 不起作用时如何在 R markdown 中隐藏消息

How can I hide messages in R markdown when "message=FALSE" doesn't work

printing

r

r-markdown

text2vec