>>279
R使って
x=c(7.5, 5.5, 4, 7, 8.5, 5, 9, 9.5)
mean(x)
var(x)
sd(x)
qt(1-0.1/2,df=7)
t.test(x,conf.level = 0.9)
で終了。