File: coef.eRm.R

package info (click to toggle)
r-cran-erm 1.0-6-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 1,952 kB
  • sloc: f90: 401; ansic: 103; makefile: 8
file content (9 lines) | stat: -rwxr-xr-x 251 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
8
9
 
`coef.eRm` <-
function(object, parm = "beta", ...) {         # option "beta" added rh 2010-03-07
   if(parm == "beta")
       object$betapar
   else if(parm == "eta")
       object$etapar
   else
       stop("'parm' incorrectly specified")
}