Displaying 1 result from an estimated 1 matches for "flpar".
Did you mean:
lpar
2007 Apr 19
2
setClass inside a function
...Validity(name, validity)
# constructors
eval(parse(text=paste("setGeneric('", name,
"', function(object, ...) standardGeneric('", name, "'))", sep="")))
setMethod(name, signature(object='ANY'),
function(object, ...)
return(FLPar(object, ..., class=name))
)
setMethod(name, signature(object='missing'),
function(...) {
return(FLPar(..., class=name))
}
)
}
---
Iago Mosqueira
Systems Modelling
Cefas
Pakefield Rd.
Lowestoft NR33 0HT
U.K.
Tel +44 (0) 1502 558003
**********************************************...