当我输入以下代码时：
library(foriegn)
library(apa)
GSS <- read.spss("C:/Users/Brett/Downloads/2013_GSS_Full.sav",
to.data.frame=TRUE)
testxtab <- data.frame(a=GSS$incmhsd, b=GSS$amb_01)
xtab(a~b, testxtab, html = FALSE, chisq=TRUE, phi=FALSE)
#
chisq_apa(testxtab, print_n = TRUE, format = c("docx"),
info = FALSE, print = TRUE)
我收到一条错误消息： if（！inherits（x，“ htest”）&&！grepl（“卡方检验”， x $ method））{：缺少值，需要TRUE / FALSE