R语言bootstrap置信区间估计函数,通过三种方法估计置信区间