| setFun<- | R Documentation |
Set the model format/link function (identity/inverse/log/exponential). Only used when FacModel == TRUE.
setFun(this, ...) <- value ## S4 replacement method for signature 'DevFac,character' setFun(this) <- value
this |
DevFac Object |
... |
Additional function arguments |
value |
String Value (default:"identity") |
xIBNERFactor <- new("DevFac")
setID(xIBNERFactor)<-"IF1"
setFacModel(xIBNERFactor)<-TRUE
setFun(xIBNERFactor)<-"identity"
setXname(xIBNERFactor)<- c("x1","x2","x3")
setParas(xIBNERFactor)<-c(0.6,-0.2,0.01,-0.3,0.02,0.03,0.01,0.02)
xIBNERFactor<-setDevFac(xIBNERFactor)
xIBNERFactor
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.