用R语言模拟出随机数，然后用随机数进行两种检验，得到p值，将大于0.05的p值记为0，小于0.05记为1，重复模拟1000次，求1000次的和（计算的值只有1和0），我用replicate进行模拟，得到的结果只有第二个检验的，第一个的结果被覆盖了