No estoy completamente seguro de que mi respuesta sea correcta, pero diría que no hay una relación general. Aquí está mi punto:
Estudiemos el caso donde el intervalo de confianza de la varianza se entiende bien, a saber. muestreo de una distribución normal (como se indica en la etiqueta de la pregunta, pero no realmente la pregunta en sí). Vea la discusión aquí y aquí .
Un intervalo de confianza para σ2 se desprende del pivote T=nσ^2/σ2∼χ2n−1, dónde σ^2=1/n∑i(Xi−X¯)2. (Esta es solo otra forma de escribir la expresión posiblemente más familiarT=(n−1)s2/σ2∼χ2n−1, dónde s2=1/(n−1)∑i(Xi−X¯)2.)
Así tenemos
1 - α= Pr {Cn - 1l< T<Cn - 1tu}= Pr {Cn - 1lnorteσ^2<1σ2<Cn - 1tunorteσ^2}= Pr {norteσ^2Cn - 1tu<σ2<norteσ^2Cn - 1l}
Por lo tanto, un intervalo de confianza es . Podemos elegir y como los cuantiles y .
( nσ^2/ /Cn - 1tu, nσ^2/ /Cn - 1l)Cn - 1lCn - 1tuCn - 1tu=χ2n - 1 , 1 - α / 2Cn - 1l=χ2n - 1 , α / 2
(Observe de pasada que para cualquier variación estima que, como la está sesgada, los cuantiles generarán un ci con la probabilidad de cobertura correcta, pero no serán óptimos, es decir, no serán los más cortos posibles. para que el intervalo sea lo más corto posible, necesitamos que la densidad sea idéntica en el extremo inferior y superior del ci, dadas algunas condiciones adicionales como la unimodalidad. No sé si usar ese ci óptimo cambiaría las cosas en esta respuesta).χ2
Como se explica en los enlaces, , donde usa lo conocido media. Por lo tanto, obtenemos otro intervalo de confianza válido
Aquí, y serán cuantiles de la 2_n.T′= ns20 0/ /σ2∼χ2nortes20 0=1norte∑yo(Xyo- μ)2
1 - α= Pr {Cnortel<T′<Cnortetu}= Pr {nortes20 0Cnortetu<σ2<nortes20 0Cnortel}
CnortelCnortetuχ2norte
Los anchos de los intervalos de confianza son
y
El ancho relativo es
Sabemos que como la media muestral minimiza la suma de las desviaciones al cuadrado. Más allá de eso, veo pocos resultados generales con respecto al ancho del intervalo, ya que no estoy al tanto de resultados claros sobre cómo se comportan las diferencias y los productos de los cuantiles superiores e inferiores a medida que aumentamos los grados de libertad en uno (pero vea la figura a continuación).
wT=norteσ^2(Cn - 1tu-Cn - 1l)Cn - 1lCn - 1tu
wT′=nortes20 0(Cnortetu-Cnortel)CnortelCnortetu
wTwT′=σ^2s20 0Cn - 1tu-Cn - 1lCnortetu-CnortelCnortelCnortetuCn - 1lCn - 1tu
σ^2/ /s20 0≤ 1χ2
Por ejemplo, dejando
rnorte: =Cn - 1tu-Cn - 1lCnortetu-CnortelCnortelCnortetuCn - 1lCn - 1tu,
tenemos
r10≈ 1.226
para y , lo que significa que el ci basado en será más corto si
α = 0.05n = 10σ^2σ^2≤s20 01.226
Usando el siguiente código, realicé un pequeño estudio de simulación que sugiere que el intervalo basado en ganará la mayor parte del tiempo. (Ver el enlace publicado en la respuesta de Aksakal para una racionalización de este resultado en una gran muestra).s20 0
La probabilidad parece estabilizarse en , pero no conozco una explicación analítica de muestras finitas:norte
rm(list=ls())
IntervalLengthsSigma2 <- function(n,alpha=0.05,reps=100000,mu=1) {
cl_a <- qchisq(alpha/2,df = n-1)
cu_a <- qchisq(1-alpha/2,df = n-1)
cl_b <- qchisq(alpha/2,df = n)
cu_b <- qchisq(1-alpha/2,df = n)
winners02 <- rep(NA,reps)
for (i in 1:reps) {
x <- rnorm(n,mean=mu)
xbar <- mean(x)
s2 <- 1/n*sum((x-xbar)^2)
s02 <- 1/n*sum((x-mu)^2)
ci_a <- c(n*s2/cu_a,n*s2/cl_a)
ci_b <- c(n*s02/cu_b,n*s02/cl_b)
winners02[i] <- ifelse(ci_a[2]-ci_a[1]>ci_b[2]-ci_b[1],1,0)
}
mean(winners02)
}
nvalues <- matrix(seq(5,200,by=10))
plot(nvalues,apply(nvalues,1,IntervalLengthsSigma2),pch=19,col="lightblue",type="b")
La siguiente figura traza contra , revelando (como sugeriría la intuición) que la relación tiende a 1. Como, además, para grande, la diferencia entre los anchos de los dos cis será por lo tanto desaparecer como . (Vea nuevamente el enlace publicado en la respuesta de Aksakal para una racionalización de este resultado en una gran muestra).rnortenorteX¯→pagsμnorten → ∞