How to properly document S4 “[” and “[<-“ methods using roxygen?

前端 未结 3 1575
借酒劲吻你
借酒劲吻你 2020-12-14 02:33

Below I posted a mini example in which I want do write documentation for an “[“ method for a S4 class. Does someone know how to properly document a method for t

3条回答
  •  爱一瞬间的悲伤
    2020-12-14 03:10

    For what it's worth, in the case of a replacement function, you'll want something like the following:

    #' An S4 class that stores a list.
    #' @export
        setClass("testClass", 
          representation(a="list"))
    
    #' extract parts of testClass
    #'
    #' @name [
    #' @aliases [,testClass-method
    #' @docType methods
    #' @rdname extract-methods
    setMethod("[", signature(x = "testClass", i = "ANY", j="ANY"),
      function (x, i, j, ..., drop) {
         x@a[i]
      }
    )
    
    #' replace names of testClass
    #'
    #' @name [
    #' @aliases [<-,testClass-method
    #' @docType methods
    #' @rdname extract-methods
    setReplaceMethod("names", signature(x = "testClass", value = "ANY"), definition = function (x, value) {
      names(x@a) <- value
      x
    })
    

提交回复
热议问题