version 1.01

Mathias-Fuchs · Mathias-Fuchs · commit 96dfb0877f7b · 2019-03-06T11:06:38.000+01:00
diff --git a/confIntVariance/DESCRIPTION b/confIntVariance/DESCRIPTION
@@ -1,8 +1,8 @@
 Package: ConfIntVariance
 Type: Package		
 Title: ConfIntVariance	
-Version: 1.0		
-Date: 2019-03-01
+Version: 1.01		
+Date: 2019-03-06
 Author: Mathias Fuchs
 Maintainer: <mathias@mathiasfuchs.de>
 Description: Surrounds the usual sample variance of a univariate numeric sample with a confidence interval.
diff --git a/confIntVariance/R/main.R b/confIntVariance/R/main.R
@@ -23,7 +23,7 @@ varianceOfSampleVariance <- function(x) {
     n <- length(x)
     					# expectation of square minus square of expectation, and analogously for the estimators
     					# the first term estimates its expectation, the second term the square of the expectation of the unbiased sample variance, i.e., the square of the population variance
-    var(x)^2 - lsepvs2(x)
+    var(x)^2 - lsepvs(x)
 }
 
                                         # the confidence interval for the population variance around the usual unbiased sample variance

Original file line number	Diff line number	Diff line change
`@@ -23,7 +23,7 @@ varianceOfSampleVariance <- function(x) {`
`23`	`23`	`n <- length(x)`
`24`	`24`	`# expectation of square minus square of expectation, and analogously for the estimators`
`25`	`25`	`# the first term estimates its expectation, the second term the square of the expectation of the unbiased sample variance, i.e., the square of the population variance`
`26`		`- var(x)^2 - lsepvs2(x)`
	`26`	`+ var(x)^2 - lsepvs(x)`
`27`	`27`	`}`
`28`	`28`
`29`	`29`	`# the confidence interval for the population variance around the usual unbiased sample variance`