r - 在包中创建二进制运算符函数

Question

我正在尝试将二进制运算符函数添加到我的程序包中，但未随程序包一起加载。例如，我定义此函数并将其保存为名为“wo.R”的文件

`%wo%` <- function(x, y) {
    x[!x %in% y]
}

并创建文档文件“wo.Rd”

\name{\%wo\%}
\alias{\%wo\%}
\title{Without}
\description{Elements in one vector without matching elements in a second vector.}
\usage{x \%wo\% y}
\arguments{
  \item{x}{A vector.}
  \item{y}{A vector.}
}
\value{A vector.}
\author{me, based on example in the \code{\link{match}} function documentation.}
\examples{
(1:10) \%wo\% c(3,7,12)
}

当我运行 R CMD check myPackage时，在检查文档示例: Error: could not find function "%wo%" Execution halted时给出此错误。我可以删除示例，并成功安装我的软件包，但是％wo％函数未随我的软件包一起加载。我可以在R session 中获取“wo.R”文件，并且可以正常工作。我也可以将函数定义为 wo <- function(x, y) x[!x %in% y]，这似乎工作正常。我查看了其他软件包(例如“operators”)的源代码，而我的源文件和文档文件似乎与它们一致，但是我显然忽略了一些东西。

Answer 1

您需要在NAMESPACE中导出该函数。

在您的文档文件中添加export语句:

export("%wo%")