Я хотел бы выполнить парный t-тест с начальной загрузкой в R. Я пробовал это для нескольких наборов данных, которые возвращали p‹.05 при использовании параметрического парного t-теста, однако, когда я запускаю бутстрап, я получаю значения p между 0,4 и 0,5 . Я запускаю это неправильно?
differences<-groupA-groupB
t.test(differences) #To get the t-statistic e.g. 1.96
Repnumber <- 10000
tstat.values <- numeric(Repnumber)
for (i in 1:Repnumber) {
group1 = sample(differences, size=length(differences), replace=T)
tstat.values[i] = t.test(group1)$statistic
}
#### To get the bootstrap p-value compare the # of tstat.values
greater (or lesser) than or equal to the original t-statistic divided
by # of reps:
sum(tstat.values<=-1.96)/Repnumber
Благодарю вас!