# Simple t-test between two equally large groups.
# Let us generate some data.
apples <- rnorm(20, mean = 1.5, sd = .1)
pears <- rnorm(20, mean = 1.6, sd = .1)
print(t.test(pears, apples))