R5参照クラスのクラスメソッドとクラス変数の正しい定義方法を知りたいです。
次に例を示します。
> # define R5 class XX
> # member variable: ma
> # member method: mfa
> XX <- setRefClass("XX",
+ fields = list(ma = "character"),
+ methods = list(
+ mfa = function() return(paste(ma, "*"))
+ ))
>
> XX
Generator object for class "XX":
Class fields:
Name: ma
Class: character
Class Methods:
"callSuper", "copy", "export", "field", "getClass", "getRefClass", "import", "initFields",
"mfa"
Reference Superclasses:
"envRefClass"
> # create an instance of XX
> x <- XX$new(ma="ma")
>
> # call member method refering to the member variable.
> x$mfa()
[1] "ma *"
>
> # here, I define *class* variable
> XX$cc <- "cc"
> # contents of XX
> ls(XX)
[1] "cc" "className" "def" "methods" "new"
> # here, I define member method referring to the class var.
> XX$methods(mfc = function() {
+ return(XX$cc)
+ })
> # it does work.
> x$mfc()
[1] "cc"
は XX のクラス変数であるかのXX$cc <- "cc"
ように動作しcc
ますが、これが正しい方法かどうかはわかりません。
たとえば、XX$def <- "hoge" は XX クラス ジェネレーターを壊す可能性があります。
それで、クラス変数とメソッドを定義する標準的な方法があるかどうか知りたいです。
前もって感謝します。