非参数统计练习三答案

练习三1> su<-c(22,9,4,5,1,16,15,26,47,8,31,7)> binom.test(min(sum(su>10),sum(su<10)),sum(su!=10),0.5)Ex