Hello,

I wrote a class like so:

> rcfdpsuperclass <- setRefClass(
> Class="rcfdpsuperclass",
>   fields = list(
>    RcfpdVersion = "character"),
>  methods = list(
>    initialize = function(){
>      'Populates fields with defaults and lock as appropriate'
>      initFields(
>        RcfpdVersion = as.character(packageVersion("RCFPD")))
>      lockBinding(sym="RcfpdVersion",env=.self)
>      }))

And a second one like this:

> sequencesuperclass <- setRefClass(
>  Class="sequencesuperclass",
>  fields = list(
>    test="character"),
>  contains="rcfpdsuperclass")

Executing the latter I get:
> Error in getClass(what, where = where) : 
>  "rcfpdsuperclass" is not a defined class

Does someone have an idea what I am doing wrong?

Thank you for your consideration.

Sincerely, Joh

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to