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

shengying

检验吸烟与肺癌是否有关系有如下数据：
- Z2 G0 k! T- F/ D' d. f肺癌 有 无
吸烟 8 5
) |! o; W- m9 q' k3 j0 }不吸烟 3 10
求出检验的p值，并在显著性水平为0.05时给出结论
/ B+ B* x) c$ i
R的检验程序这么写的：
x=c(8,3,5,10);
> data<-matrix(x, nrow=2);
! S+ _( X: U% u/ `  a# B1 M0 ]> fisher.test(data)
/ v  L9 @6 [; @* D7 |> chisq.test(data)
0 W  ~) E0 V9 V2 A对吗？