用R做fisher exact test和卡方检验，大家帮忙看看啊

shengying

检验吸烟与肺癌是否有关系有如下数据：
肺癌 有 无
" ]3 b( G0 O- S; h9 I! Y$ y吸烟 8 5
不吸烟 3 10
4 S. Y- S2 O, P& `$ v9 X求出检验的p值，并在显著性水平为0.05时给出结论

& S0 B9 B7 U& E8 ?: j, oR的检验程序这么写的：
x=c(8,3,5,10);
> data<-matrix(x, nrow=2);
' r% N! l; ^/ i7 h# P> fisher.test(data)
; X! R# o2 \. d2 A1 o) w; E! d2 e+ D/ c> chisq.test(data)
对吗？
/ f# h" u  v- G. a1 Z
  I" Q; t" y" H2 s