powered by
A dataset from a cross-sectional survey in 1993 examining hookworm infection
data(HW93)
A data frame with 637 observations on the following 6 variables.
id
a numeric vector for personal identification number
epg
a numeric vector for eggs per gram of faeces
age
a numeric vector for age in years
shoe
a factor for shoe wearing with levels no yes
no
yes
intense
a factor for intensity of infection in epg. with levels 0 1-1,999 2,000+
0
1-1,999
2,000+
agegr
a factor for age group with levels <15 yrs 15-59 yrs 60+ yrs
<15 yrs
15-59 yrs
60+ yrs
# NOT RUN { data(HW93) des(HW93) .data <- HW93 .data$order.intense <- ordered(.data$intense) ord.hw <- polr(ordered(intense) ~ agegr + shoe, data=.data) summary(ord.hw) ordinal.or.display(ord.hw) # }
Run the code above in your browser using DataLab