problem-9.11
problem-9.11
The accident data can be entered in using cbind as
follows:
> accidents = cbind(
+ none=c(67,42,75,56,57),
+ minor=c(10,6,8,4,15),
+ major=c(5,5,4,6,1))
> rownames(accidents)=c("<18","18-25","26-40","40-65","65>")
> accidents
none minor major
<18 67 10 5
18-25 42 6 5
26-40 75 8 4
40-65 56 4 6
65> 57 15 1
> chisq.test(accidents)
Pearson's Chi-squared test
data: accidents
X-squared = 12.59, df = 8, p-value = 0.1269
Warning message:
Chi-squared approximation may be incorrect in: chisq.test(accidents)