coverage probability 用R怎么写程序？在一般的重复试验下的数据，如何画coverage probability?