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