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

shengying

检验吸烟与肺癌是否有关系有如下数据：
3 \/ B  i5 ]2 \- a$ Y  p9 Q% I肺癌 有 无
吸烟 8 5
/ Y1 U3 A! C8 E不吸烟 3 10
求出检验的p值，并在显著性水平为0.05时给出结论

R的检验程序这么写的：
x=c(8,3,5,10);
> data<-matrix(x, nrow=2);
> fisher.test(data)
> chisq.test(data)
  ^' E  t7 O( g% i1 w对吗？