#From the work of John Verzani
#Paired or dependent t-test

rater1 <- c(3, 0, 5, 2, 5, 5, 5, 4, 4, 5)
rater2 <- c(2, 1, 4, 1, 4, 3, 3, 2, 3, 5)
t.test(rater1,rater2,paired=TRUE)