
This data set contains a survey result about liability insurance purchase decision by hunters and anglers in Mississippi. There are 1653 observations for 14 variables.
Y |
Binary dependent variable = 1 if had liability insurance; 0 otherwise |
Injury |
Times of bodily injuries or property damages in the past three years |
HuntYrs |
Years of hunting |
Nonres |
Dummy = 1 if nonresidents; 0 if Mississippi residents |
Lspman |
Dummy = 1 if purchased the license of resident sportsman; 0 otherwise |
Lnong |
Dummy = 1 if purchased the license of nonresident all game; 0 otherwise |
Gender |
Dummy = 1 if male; 0 otherwise |
Age |
Age of the hunter or angler |
Race |
Dummy = 1 if Caucasian; 0 otherwise |
Marital |
Dummy = 1 if married; 0 otherwise |
Edu |
Years of education |
Inc |
Household income in 2004 (1,000 dollars) |
TownPop |
Population size of the residence town (1,000) |
FishYrs |
Years of fishing |
data(daIns)
A cross sectional data with 1653 observations and 14 variables.
The data set is from a telephone survey conducted in 2005 in Mississippi.
# NOT RUN {
data(daIns)
class(daIns); dim(daIns)
head(daIns); tail(daIns)
ra <- glm(formula = Y ~ Injury + HuntYrs + Nonres +
Lspman + Lnong + Gender + Age +
Race + Marital + Edu + Inc + TownPop,
family = binomial(link="logit"),
data = daIns, x = TRUE, y= TRUE)
names(ra); summary(ra)
(ins.me <- maBina(w = ra))
(ins.mt <- maTrend(q=ins.me, nam.c="Age", nam.d="Nonres"))
plot(ins.mt)
# }
Run the code above in your browser using DataLab