01.11.2014 Views

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 ...

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

82 10. Tests <strong>de</strong> bondad <strong>de</strong> ajuste<br />

10.2. Conjunto <strong>de</strong> datos: Tiempo <strong>de</strong> acesso a la web <strong>de</strong>s<strong>de</strong><br />

biblioteca<br />

10.2.1. Análisis exploratorio <strong>de</strong> los datos<br />

Lo primero que vamos a hacer es importar un fichero <strong>de</strong> datos que se <strong>en</strong>cu<strong>en</strong>tra <strong>en</strong><br />

WebCT. Para ello, <strong>de</strong>bemos escribir:<br />

> tiem=read.table("c:/temp/Tiempoaccesoweb.txt",<strong>de</strong>c=",")<br />

> tiempos=as.vector(tiem$V2,mo<strong>de</strong>="numeric")<br />

Vemos que t<strong>en</strong>emos una variable <strong>de</strong> 55 datos correspondi<strong>en</strong>tes a los tiempos <strong>de</strong> acesso a<br />

la página web. Repres<strong>en</strong>tamos <strong>en</strong> primer lugar un histograma <strong>de</strong> los datos:<br />

> n.cl=8<br />

> puntos=min(tiempos)+(0:n.cl)*(max(tiempos)-min(tiempos))/n.cl<br />

> hist(tiempos,breaks=puntos,freq=FALSE)<br />

y observamos que la variable es bastante simétrica. Calculamos las principales medidas<br />

estadísticas:<br />

> mean(tiempos)<br />

[1] 1.425455<br />

> median(tiempos)<br />

[1] 1.42<br />

Vemos que la media y la mediana son muy próximas indicando que la variable pue<strong>de</strong><br />

ser bastante simétrica. Veamos algunos cuantiles:<br />

> c.tiempo=as.numeric(quantile(tiempos,probs=c(.1,.25,.5,.75,.9)))<br />

> c.tiempo<br />

1.268 1.345 1.420 1.495 1.606<br />

Las difer<strong>en</strong>cias <strong>en</strong>tre los cuantiles a la mediana son bastante parecidas para cuantiles<br />

emparejados lo que pue<strong>de</strong> confirmar la simetría:<br />

> c.tiempo[2]-c.tiempo[3]<br />

[1] -0.075<br />

> c.tiempo[3]-c.tiempo[4]<br />

[1] -0.075<br />

> c.tiempo[1]-c.tiempo[3]<br />

[1] -0.152<br />

> c.tiempo[3]-c.tiempo[5]<br />

[1] -0.186

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!