相當於 RStudio 查看器窗格中“掃帚”圖標的代碼？

Question

要清除 RStudio 中的查看器窗格，我們可以單擊“掃帚”圖標。

有沒有辦法使用 R 代碼來做到這一點？

更新：這是如何在查看器窗格中隨機呈現某些內容的示例（我的問題是我們如何使用代碼清除查看器窗格？）

sometext <- "<p>This text will render in the viewer pane</p>"

dir <- tempfile()
dir.create(dir)
TextFile <- file.path(dir, "TextFile.html")

writeLines(sometext, con = TextFile)
rstudioapi::viewer(TextFile) 

Answer 1

對於任何想知道的人，這有效：

clear_viewer_pane <- function() {
  dir <- tempfile()
  dir.create(dir)
  TextFile <- file.path(dir, "blank.html")
  writeLines("", con = TextFile)
  rstudioapi::viewer(TextFile) 
}

clear_viewer_pane()