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

shengying

检验吸烟与肺癌是否有关系有如下数据：
, G: o; `3 i( o$ u! |8 e: l肺癌 有 无
吸烟 8 5
) e0 W* W9 G  N( E7 H) [不吸烟 3 10
) X) t# ~/ m7 J# }, {3 _1 @' Y求出检验的p值，并在显著性水平为0.05时给出结论

R的检验程序这么写的：
+ e, O; u8 R; J* [ x=c(8,3,5,10);
> data<-matrix(x, nrow=2);
> fisher.test(data)
> chisq.test(data)
! j. `' ~; V, t* _" |; r对吗？