优雅的方式getOption或在函数中设置默认值

Question

是否有一种优雅的方式进行设置，以便函数检查是否设置了选项，如果没有 - 使用默认值？

构建函数时，您可以设置默认值：

test1 <- function(x = NULL) { 
  return(x) 
} 

> test1()
NULL

您还可以查找选项

options("test2.x" = NULL)
test2 <-  function(x = getOption("test2.x")) {
   return(x) 
}

> test2()
NULL 

Answer 1

getOption有一个参数default，可自动执行此操作。例如：

test1 <- function(x = getOption("test1.x", default = NULL)) { return(x) } 
> test1()
NULL

@BenBolker的帽子提示