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

shengying

检验吸烟与肺癌是否有关系有如下数据：
  w9 u& E# J4 @1 E: x6 e肺癌 有 无
吸烟 8 5
不吸烟 3 10
' ^$ l5 t& v8 a) h" e- ?* L& R5 A求出检验的p值，并在显著性水平为0.05时给出结论

5 o( Q! \/ b- T$ H0 T% f$ MR的检验程序这么写的：
x=c(8,3,5,10);
# ]: C- T& |. }) B5 k0 @> data<-matrix(x, nrow=2);
> fisher.test(data)
> chisq.test(data)
对吗？