具有排列p值的自举t检验

Question

我想对排列的p值进行自举t检验。我有两个不相等的样本（第一个样本有80个人，第二个样本有35个人）。有人可以提供代码帮助吗？我是统计学的入门者，不知道该怎么做。

library(readxl)
rain <- read_excel('rain.xlsx')
mix <- read_excel('mix.xlsx')
rain       mix
0.738      1.50
0.725      2.13
2.64       2.46
0.877      1.52  
1.61       1.47
1.48       ...
1.45 
1.51 
1.89 
0.48 
...