如何在.Rprofile中为View函数设置title参数默认值？

方法一：直接重写View函数 #

在.Rprofile里添加以下代码，直接包装原生的utils::View，指定默认title为.：

View <- function(x, title = ".", ...) {
  utils::View(x, title = title, ...)
}

之后不管直接调用View()还是用管道调用，只要不手动指定title，就会默认用.作为标题，完全覆盖原生默认行为。

方法二：用钩子解决加载顺序问题 #

如果担心.Rprofile加载时utils包还未完成加载，可以用钩子机制，等utils加载完成后再重定义View：

# 等待utils包加载完成后再设置默认参数
setHook(packageEvent("utils", "onLoad"), function(...) {
  assign("View", function(x, title = ".", ...) {
    utils::View(x, title = title, ...)
  }, envir = .GlobalEnv)
})

这个钩子会在utils包加载完成的瞬间，自动在全局环境中重写View函数，彻底避开加载顺序的坑。

为啥之前用partial的方法没生效？ #

用purrr::partial(utils::View, title = ".")创建的偏函数语法本身没问题，但后续可能遇到utils包加载后的隐性重置、其他包的干扰等情况，导致这个偏函数被覆盖。直接重写函数的方式更稳定，明确指定默认参数，不会轻易被冲掉。

最后注意：修改.Rprofile后必须重启R会话才能生效。

内容的提问来源于stack exchange，提问作者John-Henry