I works, great !
So using your code, we can define 'as','as<-' and 'is' with setIt. Is
there still any interest using setAs ?
Christophe
>
> It seems to me your problem here is simply that you did not define a
> coerce cal in setIs, so it does not know how to turn a C object into a
> B object, which is what you ask it to do here. It knows how to test if
> C object is also a B object, because of the test function you
> provided, and it can do the replacement you ask it in as(c,"B") <-b
> because of the replace command you provided, but the third part is
> missing. Perhaps something like this:
> setIs("C","B",
> test=function(object){return([EMAIL PROTECTED]>0)},
> replace=function(from,values){
> [EMAIL PROTECTED] <- [EMAIL PROTECTED]
> return(from)
> },
> coerce=function(from) {
> new("B",[EMAIL PROTECTED](1/3))
> }
> )
______________________________________________
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.
