小编oli*_*roy的帖子

我有一个函数可以生成不需要的警告，但保留该值。

f <- function(a) { 
  
  if (a > 1) { 
    warning("an uninformative warning")
  }
  a
}

g1 <- function(b) {
  
  withCallingHandlers(
    x <-f(b),
    warning = function(w) {
      warning("A more informative warning")
    })
  
  x
}
g1(2)
#> Warning in (function (w) : A more informative warning
#> Warning in f(b): an uninformative warning
#> [1] 2

^{创建于 2023 年 12 月 12 日，使用reprex v2.0.2}

不幸的是，这会出现 2 个警告。

tryCatch()不保留 x 。和withCallingHandlers()，两个警告都会被抛出。

R markdown 中是否存在复制到剪贴板的按钮？

它存在于四开本中（带有code-copy选项）

以及pkgdown网站 但是否可以将其添加到 R markdown 或 R 笔记本文档中？