如何在包加载时加载主题和默认值答案

【问题标题】：How to load themes and defaults on package load如何在包加载时加载主题和默认值
【发布时间】：2013-04-21 00:39:51
【问题描述】：

我创建了具有特定于与我合作的不同公司的功能的便利包。我希望能够在加载这些库时加载 ggplot2 主题和 geom 默认值。

例如：

update_geom_defaults("line",   list(size = 2))
update_geom_defaults("bar",    list(fill="#BEBADA",colour="#000000"))
update_geom_defaults("text",   list(colour="#333333"))
scale_colour_discrete <- function(...) scale_colour_brewer(..., palette="Set2")
scale_fill_discrete <- function(...) scale_fill_brewer(... , palette="Set2")

现在，我必须记住每次进行快速分析时都要重新输入，我想让它更干。

当包加载时，我将如何强制这些元素加载？

伪代码：

library(convenience.lib)
## run the above ##

【问题讨论】：

看看这里的第一个答案Easy wait to list my data ...

标签： r

【解决方案1】：

简单的在你的包中添加一个 .onLoad 函数，例如：

.onLoad <- function(libname = find.package("mypackage"), pkgname = "mypackage") {
    update_geom_defaults("line",   list(size = 2))
    update_geom_defaults("bar",    list(fill="#BEBADA",colour="#000000"))
    update_geom_defaults("text",   list(colour="#333333"))
    scale_colour_discrete <- function(...) scale_colour_brewer(..., palette="Set2")
    scale_fill_discrete <- function(...) scale_fill_brewer(... , palette="Set2")
}

【讨论】：