# 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))