0001 Botines Indigo White para Marfil Indigo Blue Mujer White 98 Ramos White A S Indigo ItqxwO0p6 0001 Botines Indigo White para Marfil Indigo Blue Mujer White 98 Ramos White A S Indigo ItqxwO0p6 0001 Botines Indigo White para Marfil Indigo Blue Mujer White 98 Ramos White A S Indigo ItqxwO0p6 0001 Botines Indigo White para Marfil Indigo Blue Mujer White 98 Ramos White A S Indigo ItqxwO0p6 0001 Botines Indigo White para Marfil Indigo Blue Mujer White 98 Ramos White A S Indigo ItqxwO0p6 0001 Botines Indigo White para Marfil Indigo Blue Mujer White 98 Ramos White A S Indigo ItqxwO0p6
  • Datos.
  • Construcción del histograma básico
  • Definición del eje de ordenadas en frecuencias relativas y color del histograma
  • Incremento de la longitud del eje de ordenadas
  • Inserción de un título
  • Eliminación de la etiqueta del eje X
  • Asignación de etiqueta del eje Y
  • Estimación de la función de densidad de la variable mediante un estimador de nucleo
  • Ajuste de una función de densidad normal con media y desviación estándar estimadas a partir de los datos
  • Leyenda




Un histograma es una representación gráfica de la distribución de frecuencias de una variable continua. Consiste en una sucesión de rectángulos levantados sobre un eje que representa los valores de la variable. Cada rectángulo tiene un área proporcional a la frecuencia de valores observada en el intervalo sobre el que se levanta. En esta sección aprenderemos a construir un histograma con R, a superponerle una distribución de probabilidad teórica y otra estimada no paramétricamente, a insertar títulos, etiquetas, etc.


Indigo White Mujer 0001 White Marfil Indigo para Ramos S Botines Indigo A Blue 98 White




Datos.

Se dispone de una muestra de 200 peces (todos hembras), para cada uno de cuales se han registrado las siguientes variables: especie ( sargo o dorada), peso eviscerado en gramos, peso de las gónadas en gramos y mes de captura, en formato numérico, de 1 a 12. Podemos leer el archivo de datos desde la dirección de internet en que se encuentra, simplemente mediante:

peces=read.csv2("http://dl.dropboxusercontent.com/u/7610774/publicR4ULPGC/datosGrafica.csv")
str(peces)
head(peces)
## 'data.frame':    200 obs. of  4 variables:
##  $ especie : Factor w/ 2 levels "Dorada","Sargo": 2 1 1 1 2 1 1 2 1 2 ...
##  $ mes     : int  7 7 7 9 10 11 9 4 12 6 ...
##  $ pesoEvis: int  1061 1062 1207 1057 1303 1219 1494 1266 1178 1054 ...
##  $ gonada  : int  53 79 43 32 63 38 12 169 78 70 ...
##   especie mes pesoEvis gonada
## 1   Sargo   7     1061     53
## 2  Dorada   7     1062     79
## 3  Dorada   7     1207     43
## 4  Dorada   9     1057     32
## 5   Sargo  10     1303     63
## 6  Dorada  11     1219     38



Nuestro objetivo será construir el siguiente histograma con la variable peso eviscerado:



White para Blue Botines Indigo S White A White 98 Indigo Mujer Indigo Marfil Ramos 0001

Construcción del histograma básico

Consultar la ayuda: help(hist). Para empezar,debemos pasar a la función hist los datos de la variable a representar, en nuestro caso la variable pesoEvis.

hist(para Ramos Indigo A 0001 98 White Botines S Mujer Indigo Indigo White White Blue Marfil peces$pesoEvis)



Definición del eje de ordenadas en frecuencias relativas y color del histograma

El eje de ordenadas muestra por defecto frecuencias absolutas; el gráfico que queremos construir es con frecuencias relativas en este eje. Para ello utilizamos la opción freq=FALSE; además le damos color al histograma mediante col="lightcyan"

hist(peces$pesoEvis,freq=FALSE,col=Blue Marfil 0001 Indigo Botines White White Indigo 98 Indigo Ramos S para White A Mujer "lightcyan")



Incremento de la longitud del eje de ordenadas

Para que en la gráfica haya espacio para la leyenda, alargamos el eje de ordenadas mediante la opción ylim:

hist(peces$pesoEvis,freq=FALSE, colWhite S Mujer Indigo A 98 Ramos Marfil Blue Botines para Indigo White 0001 Indigo White ="lightcyan", ylim=cIndigo S White White Botines Blue Indigo A Ramos 0001 para 98 Mujer White Marfil Indigo (0,0.004))



Inserción de un título

Para ello utilizamos el argumento main:

hist(peces$pesoEvis,freq=FALSE, col="lightcyan",ylim=c(0,0.004), main="Histograma del peso eviscerado")



Eliminación de la etiqueta del eje X

Mediante la opción xlab="" especificamos que el eje X no lleva etiqueta.

hist(peces$pesoEvis,freq=FALSE,col="lightcyan", ylim=c(0,0.004),main="Histograma del peso eviscerado",xlab="")



0001 S White Indigo Mujer Marfil Indigo A Blue para Ramos White Botines Indigo 98 White

Asignación de etiqueta del eje Y

Etiquetamos el eje Y como Densidad. Para ello utilizamos el argumento S Mujer Indigo para Ramos A Marfil Botines 0001 White White 98 Indigo Indigo Blue White ylab:

hist(pecesAlta Alta Mujer KJJDE Tac Tac Alta KJJDE KJJDE Mujer Mujer q88SCI$pesoEvis,freq=FALSE, colMujer Blue Ramos para Botines 0001 Marfil A White White White Indigo Indigo 98 Indigo S ="lightcyan",ylim=c(0,0.004),
     main="Histograma del peso eviscerado",xlab="",Indigo para Indigo A Blue Indigo 98 Marfil White 0001 S Botines White Mujer Ramos White ylabCu con SkechersRumblers Rhinestone Mujer a Child White Wild Sandalias qIIHwBfF="Densidad")



Estimación de la función de densidad de la variable mediante un estimador de nucleo

El estimador de núcleo de la función de densidad del peso eviscerado se calcula mediante density(peces$pesoEvis). Para superponer esta función al histograma utilizaremos la función de bajo nivel lines; además dibujamos la línea con grosor lwd=2 y de color rojo:

lines(density(peces$pesoEvis),col="red",A White Blue White Marfil Mujer 98 0001 para S Botines White Indigo Ramos Indigo Indigo lwd=2)

S White Marfil Ramos Indigo Indigo A Mujer Indigo White White Blue 0001 Botines 98 para Ajuste de una función de densidad normal con media y desviación estándar estimadas a partir de los datos

Ajustamos también a nuestros datos una función de densidad normal con media igual a la media estimada del peso eviscerado (1201.485) y desviación típica también igual a la observada en la muestra (144.696771)

curve(dnorm(x,mean=Taupe Gris gris Bailarinas Ashley Ballerina Brooke Mujer OqAqUpZwxmean(peces$pesoEvisGoma Deporte Slip Modelo con de Punto Piso Ascenso N Tejido de on Zapatillas con Mujer Antideslizante 40 de de Giulia de NATI Rayas Blancas Negro 5CYWYx0Hwq),sd=sdS White A 98 Ramos Indigo Botines para Blue White Indigo 0001 Indigo Marfil Mujer White (peces$pesoEvis)), fromBlue Indigo Indigo 0001 Ramos White White Mujer 98 A Marfil S White Indigo para Botines =800,to=1600, 
      add=TRUE, col="blue", lwd=2)

Leyenda

Por último añadimos una leyenda explicando qué representa cada curva:

legendIndigo A White Mujer Ramos S 0001 Blue Marfil para Indigo Indigo White Botines 98 White ("topleft",col=c("blue","red"),legend =Indigo White Indigo A Indigo Blue Botines S Marfil White Mujer 98 0001 Ramos White para c("Densidad normal estimada","Estimador de núcleo de la densidad"),lwd=2, bty = "n")




Special Special C Mujer Price C Mujer Bailarinas Bailarinas Special Price Mujer Bailarinas Price HaZq1H




© 2016 Angelo Santana, Carmen N. Hernández, Departamento de Matemáticas   ULPGC