# Two independent samples t-test
t_apa(t_test(1:10, y = c(7:20)))
# Two dependent samples t-test
sleep2 <- reshape(sleep, direction = "wide", idvar = "ID", timevar = "group")
t_apa(t_test(Pair(extra.1, extra.2) ~ 1, sleep2))
Run the code above in your browser using DataLab