R 对表中的几个变量应用t检验和Wilcoxon检验

我想对数据表中除分组变量和Obs.Number外的所有变量的两个子组应用均值t检验和中值Wilcoxon检验。我有两个组：组0和组1。我的数据如下所示：

Obs.Number     Var1         Var2      Var3     Var4      Var5       Var6   GroupingVar
     1        32153.00    48516.00   0.3687    0.0160   12.4288   28646.0       0     
     2        22465.00    34494.00   0.1804    0.0213   10.5003   20988.0       1
     3         1393.10     4257.40  10.1413    0.0359   53.2323     127.3       1      
     4            0.99      164.07   0.4906    0.0817 -989.5800       0.0       1
     5         4745.60     5712.80   0.4914    0.1766   62.5905    2488.7       1
     6        10222.80     9898.20   0.8993    0.0115   15.6440    7665.1       0
        ...

              Test-Statistic    Test-Statistic               p-value        p-value
              for Mean T-test   for Wilcoxon Median-test     of Mean-test   of Median-test

Variable 1     ?                  ?                            ?             ?
Variable 2     ?                  ?                            ?             ?
...

现在我想对所有变量应用两个测试，以获得如下输出：

Obs.Number     Var1         Var2      Var3     Var4      Var5       Var6   GroupingVar
     1        32153.00    48516.00   0.3687    0.0160   12.4288   28646.0       0     
     2        22465.00    34494.00   0.1804    0.0213   10.5003   20988.0       1
     3         1393.10     4257.40  10.1413    0.0359   53.2323     127.3       1      
     4            0.99      164.07   0.4906    0.0817 -989.5800       0.0       1
     5         4745.60     5712.80   0.4914    0.1766   62.5905    2488.7       1
     6        10222.80     9898.20   0.8993    0.0115   15.6440    7665.1       0
        ...

              Test-Statistic    Test-Statistic               p-value        p-value
              for Mean T-test   for Wilcoxon Median-test     of Mean-test   of Median-test

Variable 1     ?                  ?                            ?             ?
Variable 2     ?                  ?                            ?             ?
...

我将t.test（）和wilcox.test（）与sapply（）一起使用，但没有成功。你知道如何得到结果吗？

这就完成了工作（尽管非常不雅观）：

---

你能告诉我们你用了什么代码吗？

sapply

？你能对你的数据做一个

dput（）

吗如果它是一个大数据帧，请做

head（dput（youredata））

我的数据文件很大。我认为在这里显示head（dput（））输出不是一个好主意？问题第一个框中的示例是我的data.frame的一个片段。