EJEMPLO 1: alimentos infantiles

x=[3.0, 5.8, 5.6, 4.8, 5.1, 3.6, 5.5, 4.7, 5.7, 5.0, 5.9, 5.7, 4.4, 5.4, 4.2, 5.3]



----------------


EJERC 1: pH

x=[7.4, 6.7, 7.0 ,7.2, 6.7, 6.1, 7.5, 6.3, 7.0, 6.5, 7.8, 6.0, 7.5, 6.9, 7.3, 8.1, 7.2, 5.1]



EJERC 2: notas de clase

g1 = [6, 6.8,7,7.5,8.4,8.6,9.0,9.1,9.2,9.4,9.4,9.6, 10.0, 10.0]
g2= [6.0, 6.0, 7.0, 7.1, 7.3, 7.3, 7.5, 7.6, 7.7, 8.4, 8.5, 8.6, 9.1, 9.2]



EJERC 3: enzimas

x= [380,321,366,356,283,349,402,462,356,410,329,399,350,384,316,272,345,455,360,431]
y=[361,447,401,375,434,403,393,426,406,318,467,407,427,420,477,392,430,339,410,326]



EJERC 4: consumo vehiculos

x=[8.3,5.1,6.1,6.4,5.7,7.3,7.3,6.8,5.7,6.1,6.8,6.5,7.3,5.7,6.8,6.5,8.8,8.3,6.8,7.3,5.1,7.8,7.8, 10.1,6.8, 14.8,6.8,6.4,6.1,6.8]



EJERC 5: perimetros craneales

33.0,34.6,34.2,36.1,34.2,35.6,34.5,35.8,34.5,34.2,34.3,35.2,33.7,36,34.2,34.7,34.6,34.3,33.4,34.9,33.8,33.6,35.2,34.6,33.7,34.8,33.9,34.7,35.1,34.2,36.6,34.1,34,35.1,35.3,35.6,35.8,36,36.1,36.6

  33 | 04
  33 | 67789
  34 | 012222233
  34 | 556667789
  35 | 11223
  35 | 68
  36 | 01
  36 | 6


EJERC 6: concentr glucosa (datos agrupados en intervalos)

Debemos crear una lista con los ptos medios de cada intervalo
repetidos tantas veces como indica la frecuencia.

Para crear una lista con un numero repetido varias veces
puede usarse "makelist", y para pegar las listas "append"

a1:makelist(50,1);
a2:makelist(55,8);
a3:makelist(60,24);
a4:makelist(65,21);
a5:makelist(70,15);
a6:makelist(75,1);

a:append(a1,a2,a3,a4,a5,a6);


EJERC 7: edad madres (datos agrupados en intervalos)

b:append(makelist(17.5,10589),makelist(22.5,38615),makelist(27.5,92158),makelist(32.5,178517),makelist(37.5,123909),makelist(42.5,24526),makelist(47.5,1580))$

length(b)= 469894


Nota: esta lista tiene tantos datos que maxima no consigue dibujar el histograma.

---

OPCIONAL 1: dibujar las barras del histograma con draw2d y la opcion "bars":


La opcion "bars" funciona con [centro1, altura1, lado1], [centro2, altura2, lado2], ...
En este caso bastaria poner

wxdraw2d( bars([17.5,10589,5],[22.5,38615,5],[27.5,92158,5],[32.5,178517,5],
[37.5,123909,5],[
42.5,24526,5],[47.5,1580,5]) )



OPCIONAL 2: Dibujar encima de las barras una "curva normal ajustada":

En Maxima la funcion   pdf_normal(x,m,s) define una normal de media "m" y sdt "s".
Para pintar la curva con draw2d (digamos en el rango m +- 3*s) primero introduce en la memoria

m: mean(b); s:std(b)

wxdraw2d( explicit(pdf_normal(x,m,s),x,m-3*s,m+3*s) )

Para dibujar simultaneamente barras y curva, combina ambas opciones bajo el mismo draw2d
(Nota: la altura de las barras hay que ajustarlas a las unidades del histograma de densidades.
Recuerda que  h_i = n_i * 1/(N*L), con N=numero datos, L= long intervalos).