Poblacion

DISPONIBILIDAD Y USO DE LAS TECNOLOGÍAS DE LA INFORMACIÓN EN LOS HOGARES MEXICANOS
De acuerdo al INEGI, obtenemos la siguiente tabla que muestra el número de personas que realizaron alguna comprapor Internet en los años 2005-2008.
AÑO | Usuarios que han realizado compras por Internet |
2005 | 542,642 |
2006 | 649,234 |
2007 | 1,108,240 |
2008 | 1,281,059 |

De Acuerdo a estainformación, se busca ajustar una función de la forma: v (t)=a+ bekt , en donde a,b,k son constantes que se determinarán, y t es el tiempo, para esto se seguirán los sig. Pasos:
1. Formar una Lista deDatos y guardarla en la variable “datos”, mediante la siguiente instrucción:
datos= {{0,542642},{1,649234},{2,1108240},{3,1281059}}

2. Seguimos con la Gráfica de estos puntos:
graficadedatos =ListPlot[datos, PlotStyle -> PointSize[0.018]]

3. Para encontrar los valores usamos la siguiente instrucción:
FindFit[datos,a+b*Exp[k*t],{a,b,k},t]{a-1.78802×106,b2.29529×106,k0.0999685}
4. La ecuación quedó de la siguiente manera:

V[t_]=-1.78802×106+2.29529×106 0.0999685t

5. Gráfica de la ecuación:

ajuste=Plot[v[t],{t,0,3}]

6. Gráfica de los datos y la ecuación en elmismo plano:
Show[ajuste,graficadedatos]

Podemos ver que la gráfica no pasa por los puntos de la Tabla 1, pero el modelo se acerca bastante a los puntos y eso nos dará una estimación confiable7. Con el modelo obtenido, podemos calcular el número de personas estimado que comprarán en Internet para el año 2015:
(Para estimar el valor, solo evaluamos la función con t=10, que es el valorque “t” toma en el año 2015)
V[10]=4.44927×106

8. También podemos estimar en que año habrá tres millones de personas que compren en internet, para eso necesitamos resolvemos la ecuaciónv[t]=3, 000,000, lo cual en código quedaría así:
Solve[-1.7880154940763866*106+2.2952937912904316*106 0.09996849005399285t3000000,t,InverseFunctionsTrue]
El programa nos devolvió el...