现代统计图形 - 科学网—博客
现代统计图形 - 科学网—博客
现代统计图形 - 科学网—博客
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
92 第五章 图库<br />
1 > # 以紧凑形式展现出来的UCB录取数据<br />
2 > ftable(UCBAdmissions)<br />
Dept A B C D E F<br />
Admit Gender<br />
Admitted Male 512 353 120 138 53 22<br />
Female 89 17 202 131 94 24<br />
Rejected Male 313 207 205 279 138 351<br />
Female 19 8 391 244 299 317<br />
1 > # 四瓣图,2行3列排版<br />
2 > fourfoldplot(UCBAdmissions, mfcol = c(2, 3))<br />
3 > # 对每个系的录取数据进行卡方检验分别得到P值<br />
4 > round(apply(UCBAdmissions, 3, function(x) chisq.test(x)$p.value),<br />
5 + 3)<br />
A B C D E F<br />
0.000 0.771 0.426 0.638 0.369 0.640<br />
Gender: Male<br />
Gender: Male<br />
Dept: A<br />
Admit: Admitted<br />
512<br />
89<br />
313<br />
Admit: Rejected<br />
19<br />
Dept: D<br />
Admit: Admitted<br />
138<br />
131<br />
279<br />
Admit: Rejected<br />
244<br />
Gender: Female<br />
Gender: Female<br />
Gender: Male<br />
Gender: Male<br />
Dept: B<br />
Admit: Admitted<br />
353<br />
17<br />
207<br />
53<br />
138<br />
Admit: Rejected<br />
Dept: E<br />
Admit: Admitted<br />
Admit: Rejected<br />
8<br />
94<br />
299<br />
Gender: Female<br />
Gender: Female<br />
Gender: Male<br />
Gender: Male<br />
Dept: C<br />
Admit: Admitted<br />
120<br />
202<br />
205<br />
22<br />
351<br />
图 5.18: 加州伯克利分校录取数据四瓣图<br />
Admit: Rejected<br />
Dept: F<br />
Admit: Admitted<br />
Admit: Rejected<br />
391<br />
24<br />
317<br />
Gender: Female<br />
Gender: Female