【发布时间】:2016-02-17 20:01:37
【问题描述】:
当我在顶级对象上调度时,所有函数都导出到命名空间。一切都如我所愿。
myfun <- function(obj) {
UseMethod("myfun",obj)
}
#' @export
myfun.this <- function()
命名空间:
S3Method(myfun,this)
export(myfun)
但是,当我尝试在我的对象中调度一个元素时......
#' Subsets recoded data by a condition
#'
#' This function filters a list, data.frame or vector by a condition
#'
#' @param so A surv3 object
#' @param condition A positively stated condition or logical vector
#' @export
subset.surv3 <- function(so, condition) {
UseMethod("subset.surv3",so$recoded) # THIS PART
}
#' @export
subset.surv3.categorical <- function(so, condition) {
....
return(so)
}
#' @export
subset.surv3.continuous <- function(so, condition) {
...
return(so)
}
命名空间:
S3method(subset,surv3.categorical)
S3method(subset,surv3.continuous)
但是,不会导出函数。
我早就料到了:
export(subset.surv3.categorical)
export(subset.surv3.continuous)
我做错了什么?
【问题讨论】: