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

shengying

检验吸烟与肺癌是否有关系有如下数据：
肺癌 有 无
. Q/ t8 f/ W* g* C吸烟 8 5
不吸烟 3 10
* j. j* g1 Q8 w- @) J7 m& }* i求出检验的p值，并在显著性水平为0.05时给出结论
3 n0 u. Q6 `9 H' I$ r8 u. s
R的检验程序这么写的：
( P8 g8 D2 g, i  W' o x=c(8,3,5,10);
> data<-matrix(x, nrow=2);
8 u2 _. P% w9 S- w; t+ b5 j5 }> fisher.test(data)
> chisq.test(data)
对吗？