Hello Duncan,
thank for your advice, but it doesn't work like expected:
setClass(Class="A", representation=representation(slotA="numeric",
slotB="numeric"));
setMethod("$", "A", function(x, name) {return(slot(x, name));})
setGeneric(".DollarNames")
setMethod(".DollarNames", signature(x="A"), function(x,
pattern)grep(pattern=pattern, x=c("slotA", "slotB"), value=T))
a <- new("A", slotA=1, slotB=2)
a$sl <TAB>
# doesn't print slotA/slotB
> a$
What I'm doing wrong?
Bye,
Sebastian
______________________________________________
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.
