made <- c(3, 5, 10, 6, 3, 7, 1) attempted <- c(9, 10, 18, 12, 11, 12, 11) total <- made / attempted mean(total)