数据，其中data是要进行wilcox test的数据，33个变量，1700多个观测值；group是分类变量。
以下代码能正常进行wilcox test：
d<-read_csv("data.csv")
group<-read_csv("group.csv")
group<-as.vector(unlist(group))
wilcox.test(d$DRBC ~ g, d)
但是使用sapply或apply就报错，提示d必须是数值：
sapply(d, wilcox.test, group)
错误于wilcox.test.default(X[[i]], ...): 'y'必需是数值
使用class(d)查看发现d是数据框，但是用mode(d)发现是list，怀疑这里有问题？因为d$DRBC取出的是数值型向量？
