我试图在一个包中包含以下 ggplot2 辅助函数 [它将标签包装在 grid_facet(.~variable, labeller = "plot.label.wrap")] 中:
#' Label wrapper for ggplot
#'
#' Include in the facet_grid option of ggplot.
#' @param variable
#' @param value
#' @return wrapper
#' @export
plot.label.wrap <- function(variable, value) {
lapply(strwrap(as.character(value), width=15, simplify=FALSE),
paste, collapse="\n")
}
我的描述文件包括:导入:ggplot2。使用该函数的脚本包括:library(ggplot2)。
该包构建、重新加载并在 ?plot.label.wrap 上提供文档。可以找到:
> getAnywhere(plot.label.wrap)
A single object matching ‘plot.label.wrap’ was found
It was found in the following places
registered S3 method for plot from namespace mypackage
namespace:mypackage
with value
function(variable, value) {
lapply(strwrap(as.character(value), width=15, simplify=FALSE),
paste, collapse="\n")
}
<environment: namespace:mypackage>
然而:
> plot.label.wrap
Error: object 'plot.label.wrap' not found
所以我的问题是,为什么这个函数可以在 mypackage 的命名空间中找到,而不是在命令行本身中找到?
最佳答案
评论中的解决方案是更具体地说明如下导出
#' Label wrapper for ggplot
#'
#' Include in the facet_grid option of ggplot.
#' @param variable
#' @param value
#' @return wrapper
#' @export plot.label.wrap
plot.label.wrap <- function(variable, value) {
lapply(strwrap(as.character(value), width=15, simplify=FALSE),
paste, collapse="\n")
}
roxygen 试图在
@usage
之类的事情上变得聪明, @details
, 和 @exports
使事情更简单,但有时,就像在这个例子中一样,它并不总是有效。plot
是 S3 通用方法,可以定义为 plot.someclass
这将为某些对象创建绘图方法 x
与 class
“someclass”,可以简单地通过 plot(x)
调用.roxygen 认为
someclass
您的包裹是“label.wrap”并导出 plot.label.wrap
作为 S3 方法而不是普通函数,期望您将其用作 plot(x)
哪里class(x)
是“label.wrap”而不是试图使用 plot.label.wrap
直接尝试(并发现它不起作用)。或者,就像提到的@shadow 一样,您可以通过不在函数名称中使用句点来避免这种混淆,例如
plot_label_wrap
, plot_label.wrap
, plot_labelwrap
等。您不必这样做,但在极少数情况下,使用句点会导致意外行为。
关于r - 在包中包含 ggplot2 函数,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/29968335/