Prácticas de Estadística en R - Departamento de Estadística e ...
Prácticas de Estadística en R - Departamento de Estadística e ...
Prácticas de Estadística en R - Departamento de Estadística e ...
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
66 7. Transformaciones <strong>de</strong> variables aleatorias<br />
.......<br />
> mean(IMC.tip)<br />
[1] -3.437685e-16<br />
> sd(IMC.tip)<br />
[1] 1<br />
En principio el hecho <strong>de</strong> tipificar no <strong>de</strong>be afectar <strong>en</strong> la forma <strong>de</strong>l histograma siempre<br />
que seleccionemos el mismo número <strong>de</strong> clases. Por ejemplo:<br />
> par(mfrow=c(1,2))<br />
> n.clases=7<br />
> puntos=min(IMC)+(0:n.clases)*(max(IMC)-min(IMC))/n.clases<br />
> hist(IMC, breaks=puntos)\begin{verbatim}<br />
> n.clases=7<br />
> puntos=min(IMC.tip)+(0:n.clases)*(max(IMC.tip)-min(IMC.tip))/n.clases<br />
> hist(IMC.tip, breaks=puntos)<br />
7.3. Transformaciones <strong>de</strong> Box-Cox<br />
Por lo g<strong>en</strong>eral, la teoría estadística va a ser más s<strong>en</strong>cilla cuanto mayor sea la simetría<br />
<strong>de</strong> la variable, es <strong>de</strong>cir, si la asimetría es lo más próxima a cero. Para obt<strong>en</strong>er una<br />
variable lo más simétrica posible disponemos <strong>de</strong> las transformaciones <strong>de</strong> Box-Cox que<br />
están <strong>de</strong>finidas por: {<br />
(x i +m) λ −1<br />
z i = λ<br />
si λ ≠ 0,<br />
log (x i + m) si λ = 0,<br />
don<strong>de</strong> m es tal que x i +m > 0, para todo valor <strong>de</strong> x i . La transformación se elige <strong>de</strong> esta<br />
manera para que sea continua <strong>en</strong> 0, ya que:<br />
(x i + m) λ − 1 (x i + m) λ log (x i + m)<br />
lím = lím<br />
= log (x i + m).<br />
λ→0 λ λ→0 1<br />
Para valores <strong>de</strong> λ mayores que uno, se corrige la asimetría a la izquierda y para<br />
valores <strong>de</strong> λ m<strong>en</strong>ores que uno, se corrige asimetría a la <strong>de</strong>recha. Por ejemplo, la variable<br />
IMC es ligeram<strong>en</strong>te asimétrica a la <strong>de</strong>recha. Po<strong>de</strong>mos int<strong>en</strong>tar corregir esta asimetría<br />
utilizando la transformación <strong>de</strong> Box-Cox. Utilizamos tres transformaciones:<br />
> n.clases=7<br />
> puntos=min(IMC)+(0:n.clases)*(max(IMC)-min(IMC))/n.clases<br />
> hist(IMC, breaks=puntos)<br />
> IMC.bc1=((IMC)^(1/2)-1)/(1/2)<br />
> IMC.bc2=log(IMC)<br />
> IMC.bc3=((IMC)^(-1/2)-1)/(-1/2)<br />
> IMC.bc4=((IMC)^(-1)-1)/(-1)