R语言已知sigma求置信区间