[英]Using “Matrix” package methods in a custom R package
以下代码是自定义R包中的函数。
#' @import Matrix
#' @export
asdf <- function(){
u <- Matrix(0,5,5)
rowSums(u)
}
当我加载包并执行它时,我得到以下输出。
> library(devtools); document(clean=TRUE); load_all()
Loading required package: roxygen2
Updating gm documentation
Loading gm
Loading required namespace: Matrix
Loading required package: Matrix
Writing gm.generate.Rd
Loading gm
> asdf
function(){
u <- Matrix(0,5,5)
rowSums(u)
}
<environment: namespace:gm>
>
> asdf()
Error in rowSums(u) (from tmp.R#5) : 'x' must be an array of at least two dimensions
因此,即使矩阵包被加载, rowSums
在矩阵包是没有得到派出即使矩阵封装在进口NAMESPACE
:
export(asdf)
import(Matrix)
在全局环境中,确实加载了Matrix包,并且可以使用rowSums
函数。
> showMethods(rowSums)
Function: rowSums (package base)
x="ANY"
x="CsparseMatrix"
x="ddenseMatrix"
x="denseMatrix"
x="dgCMatrix"
x="dgeMatrix"
x="diagonalMatrix"
x="dsCMatrix"
(inherited from: x="CsparseMatrix")
x="igCMatrix"
x="indMatrix"
x="lgCMatrix"
x="ngCMatrix"
x="RsparseMatrix"
x="TsparseMatrix"
但是,如果我在全局环境中定义相同的函数,一切都正常:
> qwer <- function(){
u <- Matrix(0,5,5)
rowSums(u)
}
qwer <- function(){
+ u <- Matrix(0,5,5)
+ rowSums(u)
+ }
> qwer()
[1] 0 0 0 0 0
我很困惑。 我究竟做错了什么?
================================================== ==============
在NAMESPACE
文件中:
Package: hola
Type: Package
Title: What the package does (short line)
Version: 1.0
Date: 2014-01-03
Author: Who wrote it
Maintainer: Who to complain to <yourfault@somewhere.net>
Description: More about what it does (maybe more than one line)
License: What license is it under?
在DESCRIPTION
文件中:
export(asdf)
import(Matrix)
importFrom(Matrix,Matrix)
importFrom(Matrix,rowSums)
在R/asdf.R
文件中:
#' @import Matrix
#' @importFrom Matrix Matrix
#' @importFrom Matrix rowSums
#' @export
asdf <- function(){
u <- Matrix(0,5,5)
rowSums(u)
}
您应该阅读带有S4类和方法的1.5.6命名空间
将其添加到您的NAMESPACE文件中:
import(Matrix)
或更好:
importFrom(Matrix, rowSums)
此外,还需要Imports: Matrix
描述文件中的Imports: Matrix
。
裸体最低包装如下:
DESCRIPTION
文件:
Package: hola
Type: Package
Title: What the package does (short line)
Version: 1.0
Date: 2014-01-03
Author: Who wrote it
Maintainer: Who to complain to <yourfault@somewhere.net>
Description: More about what it does (maybe more than one line)
License: What license is it under?
Imports:
Matrix
NAMESPACE
文件:
export(asdf)
importFrom(Matrix,Matrix)
importFrom(Matrix,rowSums)
R/asdf.R
文件:
#' @importFrom Matrix Matrix
#' @importFrom Matrix rowSums
#' @export
asdf <- function(){
u <- Matrix(0,5,5)
rowSums(u)
}
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.