powered by
$param$nObs
nObs(x, ...) ## S3 method for class 'default': nObs(x, \dots) ## S3 method for class 'lm': nObs(x, \dots)
lm
x$param$nObs
summary.lm
nParam
## Do a trivial probit example and find number of observations x <- runif(100) y <- x + rnorm(100) > 0 p <- probit(y ~ x) nObs(p)
Run the code above in your browser using DataLab