R Nowa kolumna Test P-Wartość p

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