Description Usage Arguments Value Author(s) See Also Examples
Extracts the number of observations in the intReg model
1 2 | ## S3 method for class 'intReg'
nObs(x, ...)
|
x |
object of class ‘intReg’, estimated interval regression model |
... |
other parameters for different methods |
Integer, number of observations
Ott Toomet otoomet@gmail.com
summary.intReg
which provides related functionality.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | ## Example of observation-specific boundaries
## Estimate the willingness to pay for the Kakadu National Park
## Data given in intervals -- 'lower' for lower bound and 'upper' for upper bound.
## Note that dichotomous-coice answers are already coded to 'lower' and 'upper'
data(Kakadu, package="Ecdat")
Kakadu <- Kakadu[sample(nrow(Kakadu), 500),]
# subsample to speed up the estimation
## Estimate in log form, change 999 to Inf
lb <- log(Kakadu$lower)
ub <- Kakadu$upper
ub[ub > 998] <- Inf
ub <- log(ub)
y <- cbind(lb, ub)
m <- intReg(y ~ sex + log(income) + age + schooling +
recparks + jobs + lowrisk + wildlife + future + aboriginal + finben +
mineparks + moreparks + gov +
envcon + vparks + tvenv + major, data=Kakadu)
## You may want to compare the results to Werner (1999),
## Journal of Business and Economics Statistics 17(4), pp 479-486
print(nObs(m))
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.