R Nouvelle colonne t Test p-valeur

data$PValue = apply(data, 1, function(x) t.test(x[1:3], x[4:6])$p.value)
Scary Swan