问题的标题几乎都说明了。
给出here的解决方案并不总是有效。例如,
> class(facet_grid)
[1] "function"
> attr(facet_grid, "srcref")
NULL
> attributes(facet_grid)
NULL
答案 0 :(得分:2)
environment() - 函数将返回一个函数位于"位于"加载后。
> environment(facet_grid)
<environment: namespace:ggplot2>
从CRAN(或者github)下载ggplot2_version_whatever.tag.gz并展开它之后,您可以找到(使用您的系统文本搜索工具)名为facet-grid.r的文件,该文件的定义从第125行开始:< / p>
facet_grid <- function(facets, margins = FALSE, scales = "fixed", space = "fixed", shrink = TRUE, labeller = "label_value", as.table = TRUE, switch = NULL, drop = TRUE) {
您应该找到更多评论。在编译期间删除注释,除非您特别努力保留它们。