lib/statsample/srs.rb in statsample-0.6.1 vs lib/statsample/srs.rb in statsample-0.6.2

- old
+ new

@@ -54,10 +54,10 @@ # Proportion confidence interval with x value # Uses estimated proportion, sample without replacement def proportion_confidence_interval(p, sam,pop , x) f=sam.quo(pop) - one_range=x * Math::sqrt((qf(sam, pop) * p * (1-p)).quo (sam-1)) + (1.quo(sam * 2.0)) + one_range=x * Math::sqrt((qf(sam, pop) * p * (1-p)).quo(sam-1)) + (1.quo(sam * 2.0)) [p-one_range, p+one_range] end # Standard deviation for sample distribution of a proportion # Know proportion, sample with replacement. # Based on http://stattrek.com/Lesson6/SRS.aspx