编写名称（对象）<- R 中的赋值方法

Question

我正在为 S4 class 编写方法。我写了一个 "names" 方法如下：

setMethod("names","markovchain", 
       function(x) {
        out <- x@states
        return(out)
      }
)

从而返回构成 S4 马尔可夫链对象的槽 x@states。现在我想给 names 方法添加设置 x@states 值的能力。我该怎么做？提前致谢。

Answer 1

定义一个names<-方法：

setMethod("names<-","markovchain", 
   function(x,value) {
    x@states<-value
    return(x)
   }
)

writing names(object) <- assignment method in R