<?xml version="1.0"?>
<feed xmlns="http://www.w3.org/2005/Atom" xml:lang="es">
		<id>https://mat.caminos.upm.es/w/api.php?action=feedcontributions&amp;feedformat=atom&amp;user=Pablo+Retamar</id>
		<title>MateWiki - Contribuciones del usuario [es]</title>
		<link rel="self" type="application/atom+xml" href="https://mat.caminos.upm.es/w/api.php?action=feedcontributions&amp;feedformat=atom&amp;user=Pablo+Retamar"/>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/wiki/Especial:Contribuciones/Pablo_Retamar"/>
		<updated>2026-05-02T05:39:14Z</updated>
		<subtitle>Contribuciones del usuario</subtitle>
		<generator>MediaWiki 1.26.2</generator>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41077</id>
		<title>Trayectos en bici hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41077"/>
				<updated>2018-05-25T16:49:59Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: /* Bibliografía */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoSIG | Trayectos en bici hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia&lt;br /&gt;
Pablo Retamar Leboutet | [[:Categoría:SIGAIC_17/18|Curso 17/18]] }}&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El objetivo del trabajo es encontrar las rutas óptimas desde diferentes puntos de la ciudad de Madrid hasta la Escuela Técnica Superior de Ingenieros de Caminos, Canales y Puertos. La finalidad es encontrar diferentes caminos para que estudiantes, profesores y demás trabajadores de la universidad puedan llegar a la escuela en bici. Se buscará la circulación por caminos que disminuyan el peligro que supone desplazarse por calles con un alto nivel de tráfico y la dificultad de recorrer calles estrechas.&lt;br /&gt;
Para el desarrollo del trabajo se tendrán en cuenta los carriles bici ya existentes, incorporando tanto calles peatonales como carriles ciclables y el resto de calles, tratando de evitar en todo momento las principales que no estén habilitadas para este tipo de vehículos. Para ello se incorporará un criterio de velocidades en cada tipo de vía en función de los diferentes aspectos comentados. &lt;br /&gt;
Los recorridos que se van a realizar abarcan la almendra de Madrid, es decir, el interior de la m-30. Los recorridos tendrán su origen en el centroide de los distintos barrios de la ciudad, terminando todos ellos en el parking de la escuela. &lt;br /&gt;
Partiendo de un mapa general con todas las vías existentes, se realizarán dos mapas temáticos en función de la congestión del tráfico, lo que limitará el uso de unas u otras vías.&lt;br /&gt;
&lt;br /&gt;
== Metodología ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos partido de tres capas vectoriales básicas para nuestro trabajo en las que se encuentran el callejero de Madrid, los carribles bici y los carriles ciclables. &lt;br /&gt;
A cada capa le hemos dado un atributo de velocidad diferente para las situaciones de tráfico en hora punta y en hora no punta. &lt;br /&gt;
A cada tipo de vía le hemos asignado un factor por el que multiplicar la velocidad media de circulación en bici, cuyos valores se pueden observar en la siguiente tabla:&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Factores de velocidad !! Hora Punta !! Hora No Punta&lt;br /&gt;
|-&lt;br /&gt;
| Calles || 1 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles ciclables || 2 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles Bici || 4 || 5&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
A continuación hemos asignado dicho factor multiplicado por una velocidad media de 12km/h a cada capa para más tarde unificarlas. De este modo conseguimos que la circulación por carriles bici y carriles ciclables tenga preferencia ante las calles no adaptadas. &lt;br /&gt;
A la hora de juntar las vías hemos creado una nueva capa vectorial de nombre “Unificada” en la que hemos copiado las vías de cada una de las capas anteriores. Para ello, ha sido necesario crear dos atributos en la nueva capa cuyos nombres coincidiesen con los atributos de las velocidades de las capas originales, y para que el programa pudiese tener referencia de cada uno de los elementos copiados se ha añadido un atributo ya existente en la capa original, como se puede observar en la siguiente imagen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:TablaAtributos.jpg|800px|thumb|center|Tabla de atributos]]&lt;br /&gt;
&lt;br /&gt;
A la hora de realizar las rutas nos hemos apoyado en la herramienta de QGIS de la ruta más corta. Para ello hemos configurado el grafo de rutas dos veces para que tomase como valor de la velocidad el correspondiente de los atributos de “velocidad” (para tráficos densos) y “vNoPunta” (para tráficos menos densos), manteniéndonos siempre en la capa de nombre “Unificada”.&lt;br /&gt;
Los puntos de inicio y final de las rutas son los centroides de cada uno de los barrios de Madrid y el parking de la ETSICCP, respectivamente. Las rutas han sido creadas tomando criterios de longitud y tiempo mínimos, diferenciando en este último caso los criterios de velocidades. Las rutas obtenidas se han exportado a tres capas en las que se agrupan en función del criterio, llamadas &amp;quot;Longitud&amp;quot;, &amp;quot;TiempoPunta&amp;quot; y &amp;quot;TiempoNoPunta&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Resultados ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar incluimos la situación inicial de la que partimos en nuestro trabajo, seguido de las diferentes rutas en función de cada criterio explicado anteriormente.       &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mapabasebicis.jpg|800px|thumb|center|Mapa base]]&lt;br /&gt;
[[Archivo:TiempoNoPunta.jpg|800px|thumb|center|Mapa con rutas en hora no punta]]&lt;br /&gt;
[[Archivo:TiempoPunta.jpg|800px|thumb|center|Mapa con rutas en hora punta]]&lt;br /&gt;
[[Archivo:Longitud.jpg|800px|thumb|center|Mapa con rutas más cortas]]&lt;br /&gt;
&lt;br /&gt;
La tabla incluida en los anejos recoge los tiempos y longitudes de cada uno de los recorridos estudiados.&lt;br /&gt;
&lt;br /&gt;
A continuación hemos realizado los perfiles de las rutas más representativas, que destacamos en la siguiente imagen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MapaPerfiles.jpg|800px|thumb|center|Mapa con las rutas en hora punta más significativas]]&lt;br /&gt;
&lt;br /&gt;
Para la obtención de los perfiles hemos trabajado con la capa ráster de la zona de la Comunidad de Madrid y la herramienta ProfileTool.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Perfillapaz.jpg|800px|thumb|center|Perfil desde el barrio de La Paz]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Perfilfberro.jpg|800px|thumb|center|Perfil desde el barrio de Fuente del Berro]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Perfillegazpi.jpg|800px|thumb|center|Perfil desde el barrio de Legazpi]]&lt;br /&gt;
&lt;br /&gt;
== Conclusiones ==&lt;br /&gt;
&lt;br /&gt;
Conclusiones&lt;br /&gt;
Comparando las diferentes rutas analizadas llegamos a la conclusión de que es preferible seguir las rutas que priorizan la circulación por los carriles adaptados. Por un lado, se puede observar que los tiempos de recorrido son inferiores que en las rutas de menor longitud y, además, este tipo de vías son más seguras para los ciclistas y ofrecen un trayecto más cómodo.&lt;br /&gt;
En nuestra opinión, resulta rentable circular por las vías adaptadas y si se fomenta su uso se podrán realizar en un futuro un mayor número de carriles bici dentro de la almendra de Madrid. Esto tendrá consecuencias positivas tanto en el Medio Ambiente como en la salud y seguridad de los ciudadanos. &lt;br /&gt;
&lt;br /&gt;
== Anejos ==&lt;br /&gt;
&lt;br /&gt;
La siguiente tabla recoge los tiempos y longitudes de cada uno de los recorridos estudiados:&lt;br /&gt;
[[Archivo:Tablaveltiempo.jpg|800px|thumb|center|Tabla resumen de las rutas]]&lt;br /&gt;
&lt;br /&gt;
== Bibliografía ==&lt;br /&gt;
&lt;br /&gt;
Vias ciclistas: http://datos.gob.es/catalogo/l01280796-bici-vias-ciclistas&lt;br /&gt;
&lt;br /&gt;
CartoCiudad: http://datos.gob.es/es/catalogo/e00125901-cartociudad&lt;br /&gt;
&lt;br /&gt;
Ciclocarriles: http://datos.gob.es/catalogo/l01280796-bici-ciclocarriles &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:SIGAIC_17/18]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41076</id>
		<title>Trayectos en bici hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41076"/>
				<updated>2018-05-25T16:49:08Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoSIG | Trayectos en bici hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia&lt;br /&gt;
Pablo Retamar Leboutet | [[:Categoría:SIGAIC_17/18|Curso 17/18]] }}&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El objetivo del trabajo es encontrar las rutas óptimas desde diferentes puntos de la ciudad de Madrid hasta la Escuela Técnica Superior de Ingenieros de Caminos, Canales y Puertos. La finalidad es encontrar diferentes caminos para que estudiantes, profesores y demás trabajadores de la universidad puedan llegar a la escuela en bici. Se buscará la circulación por caminos que disminuyan el peligro que supone desplazarse por calles con un alto nivel de tráfico y la dificultad de recorrer calles estrechas.&lt;br /&gt;
Para el desarrollo del trabajo se tendrán en cuenta los carriles bici ya existentes, incorporando tanto calles peatonales como carriles ciclables y el resto de calles, tratando de evitar en todo momento las principales que no estén habilitadas para este tipo de vehículos. Para ello se incorporará un criterio de velocidades en cada tipo de vía en función de los diferentes aspectos comentados. &lt;br /&gt;
Los recorridos que se van a realizar abarcan la almendra de Madrid, es decir, el interior de la m-30. Los recorridos tendrán su origen en el centroide de los distintos barrios de la ciudad, terminando todos ellos en el parking de la escuela. &lt;br /&gt;
Partiendo de un mapa general con todas las vías existentes, se realizarán dos mapas temáticos en función de la congestión del tráfico, lo que limitará el uso de unas u otras vías.&lt;br /&gt;
&lt;br /&gt;
== Metodología ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos partido de tres capas vectoriales básicas para nuestro trabajo en las que se encuentran el callejero de Madrid, los carribles bici y los carriles ciclables. &lt;br /&gt;
A cada capa le hemos dado un atributo de velocidad diferente para las situaciones de tráfico en hora punta y en hora no punta. &lt;br /&gt;
A cada tipo de vía le hemos asignado un factor por el que multiplicar la velocidad media de circulación en bici, cuyos valores se pueden observar en la siguiente tabla:&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Factores de velocidad !! Hora Punta !! Hora No Punta&lt;br /&gt;
|-&lt;br /&gt;
| Calles || 1 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles ciclables || 2 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles Bici || 4 || 5&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
A continuación hemos asignado dicho factor multiplicado por una velocidad media de 12km/h a cada capa para más tarde unificarlas. De este modo conseguimos que la circulación por carriles bici y carriles ciclables tenga preferencia ante las calles no adaptadas. &lt;br /&gt;
A la hora de juntar las vías hemos creado una nueva capa vectorial de nombre “Unificada” en la que hemos copiado las vías de cada una de las capas anteriores. Para ello, ha sido necesario crear dos atributos en la nueva capa cuyos nombres coincidiesen con los atributos de las velocidades de las capas originales, y para que el programa pudiese tener referencia de cada uno de los elementos copiados se ha añadido un atributo ya existente en la capa original, como se puede observar en la siguiente imagen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:TablaAtributos.jpg|800px|thumb|center|Tabla de atributos]]&lt;br /&gt;
&lt;br /&gt;
A la hora de realizar las rutas nos hemos apoyado en la herramienta de QGIS de la ruta más corta. Para ello hemos configurado el grafo de rutas dos veces para que tomase como valor de la velocidad el correspondiente de los atributos de “velocidad” (para tráficos densos) y “vNoPunta” (para tráficos menos densos), manteniéndonos siempre en la capa de nombre “Unificada”.&lt;br /&gt;
Los puntos de inicio y final de las rutas son los centroides de cada uno de los barrios de Madrid y el parking de la ETSICCP, respectivamente. Las rutas han sido creadas tomando criterios de longitud y tiempo mínimos, diferenciando en este último caso los criterios de velocidades. Las rutas obtenidas se han exportado a tres capas en las que se agrupan en función del criterio, llamadas &amp;quot;Longitud&amp;quot;, &amp;quot;TiempoPunta&amp;quot; y &amp;quot;TiempoNoPunta&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Resultados ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar incluimos la situación inicial de la que partimos en nuestro trabajo, seguido de las diferentes rutas en función de cada criterio explicado anteriormente.       &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mapabasebicis.jpg|800px|thumb|center|Mapa base]]&lt;br /&gt;
[[Archivo:TiempoNoPunta.jpg|800px|thumb|center|Mapa con rutas en hora no punta]]&lt;br /&gt;
[[Archivo:TiempoPunta.jpg|800px|thumb|center|Mapa con rutas en hora punta]]&lt;br /&gt;
[[Archivo:Longitud.jpg|800px|thumb|center|Mapa con rutas más cortas]]&lt;br /&gt;
&lt;br /&gt;
La tabla incluida en los anejos recoge los tiempos y longitudes de cada uno de los recorridos estudiados.&lt;br /&gt;
&lt;br /&gt;
A continuación hemos realizado los perfiles de las rutas más representativas, que destacamos en la siguiente imagen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MapaPerfiles.jpg|800px|thumb|center|Mapa con las rutas en hora punta más significativas]]&lt;br /&gt;
&lt;br /&gt;
Para la obtención de los perfiles hemos trabajado con la capa ráster de la zona de la Comunidad de Madrid y la herramienta ProfileTool.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Perfillapaz.jpg|800px|thumb|center|Perfil desde el barrio de La Paz]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Perfilfberro.jpg|800px|thumb|center|Perfil desde el barrio de Fuente del Berro]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Perfillegazpi.jpg|800px|thumb|center|Perfil desde el barrio de Legazpi]]&lt;br /&gt;
&lt;br /&gt;
== Conclusiones ==&lt;br /&gt;
&lt;br /&gt;
Conclusiones&lt;br /&gt;
Comparando las diferentes rutas analizadas llegamos a la conclusión de que es preferible seguir las rutas que priorizan la circulación por los carriles adaptados. Por un lado, se puede observar que los tiempos de recorrido son inferiores que en las rutas de menor longitud y, además, este tipo de vías son más seguras para los ciclistas y ofrecen un trayecto más cómodo.&lt;br /&gt;
En nuestra opinión, resulta rentable circular por las vías adaptadas y si se fomenta su uso se podrán realizar en un futuro un mayor número de carriles bici dentro de la almendra de Madrid. Esto tendrá consecuencias positivas tanto en el Medio Ambiente como en la salud y seguridad de los ciudadanos. &lt;br /&gt;
&lt;br /&gt;
== Anejos ==&lt;br /&gt;
&lt;br /&gt;
La siguiente tabla recoge los tiempos y longitudes de cada uno de los recorridos estudiados:&lt;br /&gt;
[[Archivo:Tablaveltiempo.jpg|800px|thumb|center|Tabla resumen de las rutas]]&lt;br /&gt;
&lt;br /&gt;
== Bibliografía ==&lt;br /&gt;
&lt;br /&gt;
Vias ciclistas: http://datos.gob.es/catalogo/l01280796-bici-vias-ciclistas&lt;br /&gt;
CartoCiudad: http://datos.gob.es/es/catalogo/e00125901-cartociudad&lt;br /&gt;
Ciclocarriles: http://datos.gob.es/catalogo/l01280796-bici-ciclocarriles &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:SIGAIC_17/18]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Tablaveltiempo.jpg&amp;diff=41075</id>
		<title>Archivo:Tablaveltiempo.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Tablaveltiempo.jpg&amp;diff=41075"/>
				<updated>2018-05-25T16:47:15Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41074</id>
		<title>Trayectos en bici hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41074"/>
				<updated>2018-05-25T16:46:00Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoSIG | Trayectos en bici hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia&lt;br /&gt;
Pablo Retamar Leboutet | [[:Categoría:SIGAIC_17/18|Curso 17/18]] }}&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El objetivo del trabajo es encontrar las rutas óptimas desde diferentes puntos de la ciudad de Madrid hasta la Escuela Técnica Superior de Ingenieros de Caminos, Canales y Puertos. La finalidad es encontrar diferentes caminos para que estudiantes, profesores y demás trabajadores de la universidad puedan llegar a la escuela en bici. Se buscará la circulación por caminos que disminuyan el peligro que supone desplazarse por calles con un alto nivel de tráfico y la dificultad de recorrer calles estrechas.&lt;br /&gt;
Para el desarrollo del trabajo se tendrán en cuenta los carriles bici ya existentes, incorporando tanto calles peatonales como carriles ciclables y el resto de calles, tratando de evitar en todo momento las principales que no estén habilitadas para este tipo de vehículos. Para ello se incorporará un criterio de velocidades en cada tipo de vía en función de los diferentes aspectos comentados. &lt;br /&gt;
Los recorridos que se van a realizar abarcan la almendra de Madrid, es decir, el interior de la m-30. Los recorridos tendrán su origen en el centroide de los distintos barrios de la ciudad, terminando todos ellos en el parking de la escuela. &lt;br /&gt;
Partiendo de un mapa general con todas las vías existentes, se realizarán dos mapas temáticos en función de la congestión del tráfico, lo que limitará el uso de unas u otras vías.&lt;br /&gt;
&lt;br /&gt;
== Metodología ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos partido de tres capas vectoriales básicas para nuestro trabajo en las que se encuentran el callejero de Madrid, los carribles bici y los carriles ciclables. &lt;br /&gt;
A cada capa le hemos dado un atributo de velocidad diferente para las situaciones de tráfico en hora punta y en hora no punta. &lt;br /&gt;
A cada tipo de vía le hemos asignado un factor por el que multiplicar la velocidad media de circulación en bici, cuyos valores se pueden observar en la siguiente tabla:&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Factores de velocidad !! Hora Punta !! Hora No Punta&lt;br /&gt;
|-&lt;br /&gt;
| Calles || 1 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles ciclables || 2 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles Bici || 4 || 5&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
A continuación hemos asignado dicho factor multiplicado por una velocidad media de 12km/h a cada capa para más tarde unificarlas. De este modo conseguimos que la circulación por carriles bici y carriles ciclables tenga preferencia ante las calles no adaptadas. &lt;br /&gt;
A la hora de juntar las vías hemos creado una nueva capa vectorial de nombre “Unificada” en la que hemos copiado las vías de cada una de las capas anteriores. Para ello, ha sido necesario crear dos atributos en la nueva capa cuyos nombres coincidiesen con los atributos de las velocidades de las capas originales, y para que el programa pudiese tener referencia de cada uno de los elementos copiados se ha añadido un atributo ya existente en la capa original, como se puede observar en la siguiente imagen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:TablaAtributos.jpg|800px|thumb|center|Tabla de atributos]]&lt;br /&gt;
&lt;br /&gt;
A la hora de realizar las rutas nos hemos apoyado en la herramienta de QGIS de la ruta más corta. Para ello hemos configurado el grafo de rutas dos veces para que tomase como valor de la velocidad el correspondiente de los atributos de “velocidad” (para tráficos densos) y “vNoPunta” (para tráficos menos densos), manteniéndonos siempre en la capa de nombre “Unificada”.&lt;br /&gt;
Los puntos de inicio y final de las rutas son los centroides de cada uno de los barrios de Madrid y el parking de la ETSICCP, respectivamente. Las rutas han sido creadas tomando criterios de longitud y tiempo mínimos, diferenciando en este último caso los criterios de velocidades. Las rutas obtenidas se han exportado a tres capas en las que se agrupan en función del criterio, llamadas &amp;quot;Longitud&amp;quot;, &amp;quot;TiempoPunta&amp;quot; y &amp;quot;TiempoNoPunta&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Resultados ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar incluimos la situación inicial de la que partimos en nuestro trabajo, seguido de las diferentes rutas en función de cada criterio explicado anteriormente.       &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mapabasebicis.jpg|800px|thumb|center|Mapa base]]&lt;br /&gt;
[[Archivo:TiempoNoPunta.jpg|800px|thumb|center|Mapa con rutas en hora no punta]]&lt;br /&gt;
[[Archivo:TiempoPunta.jpg|800px|thumb|center|Mapa con rutas en hora punta]]&lt;br /&gt;
[[Archivo:Longitud.jpg|800px|thumb|center|Mapa con rutas más cortas]]&lt;br /&gt;
&lt;br /&gt;
La tabla incluida en los anejos recoge los tiempos y longitudes de cada uno de los recorridos estudiados.&lt;br /&gt;
&lt;br /&gt;
A continuación hemos realizado los perfiles de las rutas más representativas, que destacamos en la siguiente imagen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MapaPerfiles.jpg|800px|thumb|center|Mapa con las rutas en hora punta más significativas]]&lt;br /&gt;
&lt;br /&gt;
Para la obtención de los perfiles hemos trabajado con la capa ráster de la zona de la Comunidad de Madrid y la herramienta ProfileTool.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Perfillapaz.jpg|800px|thumb|center|Perfil desde el barrio de La Paz]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Perfilfberro.jpg|800px|thumb|center|Perfil desde el barrio de Fuente del Berro]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Perfillegazpi.jpg|800px|thumb|center|Perfil desde el barrio de Legazpi]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Conclusiones ==&lt;br /&gt;
&lt;br /&gt;
== Anejos ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:SIGAIC_17/18]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Perfillegazpi.jpg&amp;diff=41073</id>
		<title>Archivo:Perfillegazpi.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Perfillegazpi.jpg&amp;diff=41073"/>
				<updated>2018-05-25T16:45:36Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Perfilfberro.jpg&amp;diff=41072</id>
		<title>Archivo:Perfilfberro.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Perfilfberro.jpg&amp;diff=41072"/>
				<updated>2018-05-25T16:45:10Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Perfillapaz.jpg&amp;diff=41071</id>
		<title>Archivo:Perfillapaz.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Perfillapaz.jpg&amp;diff=41071"/>
				<updated>2018-05-25T16:44:14Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:MapaPerfiles.jpg&amp;diff=41070</id>
		<title>Archivo:MapaPerfiles.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:MapaPerfiles.jpg&amp;diff=41070"/>
				<updated>2018-05-25T16:42:25Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41069</id>
		<title>Trayectos en bici hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41069"/>
				<updated>2018-05-25T16:41:02Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoSIG | Trayectos en bici hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia&lt;br /&gt;
Pablo Retamar Leboutet | [[:Categoría:SIGAIC_17/18|Curso 17/18]] }}&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El objetivo del trabajo es encontrar las rutas óptimas desde diferentes puntos de la ciudad de Madrid hasta la Escuela Técnica Superior de Ingenieros de Caminos, Canales y Puertos. La finalidad es encontrar diferentes caminos para que estudiantes, profesores y demás trabajadores de la universidad puedan llegar a la escuela en bici. Se buscará la circulación por caminos que disminuyan el peligro que supone desplazarse por calles con un alto nivel de tráfico y la dificultad de recorrer calles estrechas.&lt;br /&gt;
Para el desarrollo del trabajo se tendrán en cuenta los carriles bici ya existentes, incorporando tanto calles peatonales como carriles ciclables y el resto de calles, tratando de evitar en todo momento las principales que no estén habilitadas para este tipo de vehículos. Para ello se incorporará un criterio de velocidades en cada tipo de vía en función de los diferentes aspectos comentados. &lt;br /&gt;
Los recorridos que se van a realizar abarcan la almendra de Madrid, es decir, el interior de la m-30. Los recorridos tendrán su origen en el centroide de los distintos barrios de la ciudad, terminando todos ellos en el parking de la escuela. &lt;br /&gt;
Partiendo de un mapa general con todas las vías existentes, se realizarán dos mapas temáticos en función de la congestión del tráfico, lo que limitará el uso de unas u otras vías.&lt;br /&gt;
&lt;br /&gt;
== Metodología ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos partido de tres capas vectoriales básicas para nuestro trabajo en las que se encuentran el callejero de Madrid, los carribles bici y los carriles ciclables. &lt;br /&gt;
A cada capa le hemos dado un atributo de velocidad diferente para las situaciones de tráfico en hora punta y en hora no punta. &lt;br /&gt;
A cada tipo de vía le hemos asignado un factor por el que multiplicar la velocidad media de circulación en bici, cuyos valores se pueden observar en la siguiente tabla:&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Factores de velocidad !! Hora Punta !! Hora No Punta&lt;br /&gt;
|-&lt;br /&gt;
| Calles || 1 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles ciclables || 2 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles Bici || 4 || 5&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
A continuación hemos asignado dicho factor multiplicado por una velocidad media de 12km/h a cada capa para más tarde unificarlas. De este modo conseguimos que la circulación por carriles bici y carriles ciclables tenga preferencia ante las calles no adaptadas. &lt;br /&gt;
A la hora de juntar las vías hemos creado una nueva capa vectorial de nombre “Unificada” en la que hemos copiado las vías de cada una de las capas anteriores. Para ello, ha sido necesario crear dos atributos en la nueva capa cuyos nombres coincidiesen con los atributos de las velocidades de las capas originales, y para que el programa pudiese tener referencia de cada uno de los elementos copiados se ha añadido un atributo ya existente en la capa original, como se puede observar en la siguiente imagen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:TablaAtributos.jpg|800px|thumb|center|Tabla de atributos]]&lt;br /&gt;
&lt;br /&gt;
A la hora de realizar las rutas nos hemos apoyado en la herramienta de QGIS de la ruta más corta. Para ello hemos configurado el grafo de rutas dos veces para que tomase como valor de la velocidad el correspondiente de los atributos de “velocidad” (para tráficos densos) y “vNoPunta” (para tráficos menos densos), manteniéndonos siempre en la capa de nombre “Unificada”.&lt;br /&gt;
Los puntos de inicio y final de las rutas son los centroides de cada uno de los barrios de Madrid y el parking de la ETSICCP, respectivamente. Las rutas han sido creadas tomando criterios de longitud y tiempo mínimos, diferenciando en este último caso los criterios de velocidades. Las rutas obtenidas se han exportado a tres capas en las que se agrupan en función del criterio, llamadas &amp;quot;Longitud&amp;quot;, &amp;quot;TiempoPunta&amp;quot; y &amp;quot;TiempoNoPunta&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Resultados ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar incluimos la situación inicial de la que partimos en nuestro trabajo, seguido de las diferentes rutas en función de cada criterio explicado anteriormente.       &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mapabasebicis.jpg|800px|thumb|center|Mapa base]]&lt;br /&gt;
[[Archivo:TiempoNoPunta.jpg|800px|thumb|center|Mapa con rutas en hora no punta]]&lt;br /&gt;
[[Archivo:TiempoPunta.jpg|800px|thumb|center|Mapa con rutas en hora punta]]&lt;br /&gt;
[[Archivo:Longitud.jpg|800px|thumb|center|Mapa con rutas más cortas]]&lt;br /&gt;
&lt;br /&gt;
== Conclusiones ==&lt;br /&gt;
&lt;br /&gt;
== Anejos ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:SIGAIC_17/18]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Longitud.jpg&amp;diff=41068</id>
		<title>Archivo:Longitud.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Longitud.jpg&amp;diff=41068"/>
				<updated>2018-05-25T16:40:38Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:TiempoPunta.jpg&amp;diff=41067</id>
		<title>Archivo:TiempoPunta.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:TiempoPunta.jpg&amp;diff=41067"/>
				<updated>2018-05-25T16:40:10Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:TiempoNoPunta.jpg&amp;diff=41066</id>
		<title>Archivo:TiempoNoPunta.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:TiempoNoPunta.jpg&amp;diff=41066"/>
				<updated>2018-05-25T16:39:11Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41065</id>
		<title>Trayectos en bici hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41065"/>
				<updated>2018-05-25T16:38:44Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoSIG | Trayectos en bici hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia&lt;br /&gt;
Pablo Retamar Leboutet | [[:Categoría:SIGAIC_17/18|Curso 17/18]] }}&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El objetivo del trabajo es encontrar las rutas óptimas desde diferentes puntos de la ciudad de Madrid hasta la Escuela Técnica Superior de Ingenieros de Caminos, Canales y Puertos. La finalidad es encontrar diferentes caminos para que estudiantes, profesores y demás trabajadores de la universidad puedan llegar a la escuela en bici. Se buscará la circulación por caminos que disminuyan el peligro que supone desplazarse por calles con un alto nivel de tráfico y la dificultad de recorrer calles estrechas.&lt;br /&gt;
Para el desarrollo del trabajo se tendrán en cuenta los carriles bici ya existentes, incorporando tanto calles peatonales como carriles ciclables y el resto de calles, tratando de evitar en todo momento las principales que no estén habilitadas para este tipo de vehículos. Para ello se incorporará un criterio de velocidades en cada tipo de vía en función de los diferentes aspectos comentados. &lt;br /&gt;
Los recorridos que se van a realizar abarcan la almendra de Madrid, es decir, el interior de la m-30. Los recorridos tendrán su origen en el centroide de los distintos barrios de la ciudad, terminando todos ellos en el parking de la escuela. &lt;br /&gt;
Partiendo de un mapa general con todas las vías existentes, se realizarán dos mapas temáticos en función de la congestión del tráfico, lo que limitará el uso de unas u otras vías.&lt;br /&gt;
&lt;br /&gt;
== Metodología ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos partido de tres capas vectoriales básicas para nuestro trabajo en las que se encuentran el callejero de Madrid, los carribles bici y los carriles ciclables. &lt;br /&gt;
A cada capa le hemos dado un atributo de velocidad diferente para las situaciones de tráfico en hora punta y en hora no punta. &lt;br /&gt;
A cada tipo de vía le hemos asignado un factor por el que multiplicar la velocidad media de circulación en bici, cuyos valores se pueden observar en la siguiente tabla:&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Factores de velocidad !! Hora Punta !! Hora No Punta&lt;br /&gt;
|-&lt;br /&gt;
| Calles || 1 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles ciclables || 2 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles Bici || 4 || 5&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
A continuación hemos asignado dicho factor multiplicado por una velocidad media de 12km/h a cada capa para más tarde unificarlas. De este modo conseguimos que la circulación por carriles bici y carriles ciclables tenga preferencia ante las calles no adaptadas. &lt;br /&gt;
A la hora de juntar las vías hemos creado una nueva capa vectorial de nombre “Unificada” en la que hemos copiado las vías de cada una de las capas anteriores. Para ello, ha sido necesario crear dos atributos en la nueva capa cuyos nombres coincidiesen con los atributos de las velocidades de las capas originales, y para que el programa pudiese tener referencia de cada uno de los elementos copiados se ha añadido un atributo ya existente en la capa original, como se puede observar en la siguiente imagen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:TablaAtributos.jpg|800px|thumb|center|Tabla de atributos]]&lt;br /&gt;
&lt;br /&gt;
A la hora de realizar las rutas nos hemos apoyado en la herramienta de QGIS de la ruta más corta. Para ello hemos configurado el grafo de rutas dos veces para que tomase como valor de la velocidad el correspondiente de los atributos de “velocidad” (para tráficos densos) y “vNoPunta” (para tráficos menos densos), manteniéndonos siempre en la capa de nombre “Unificada”.&lt;br /&gt;
Los puntos de inicio y final de las rutas son los centroides de cada uno de los barrios de Madrid y el parking de la ETSICCP, respectivamente. Las rutas han sido creadas tomando criterios de longitud y tiempo mínimos, diferenciando en este último caso los criterios de velocidades. Las rutas obtenidas se han exportado a tres capas en las que se agrupan en función del criterio, llamadas &amp;quot;Longitud&amp;quot;, &amp;quot;TiempoPunta&amp;quot; y &amp;quot;TiempoNoPunta&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Resultados ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar incluimos la situación inicial de la que partimos en nuestro trabajo, seguido de las diferentes rutas en función de cada criterio explicado anteriormente.       &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Mapabasebicis.jpg|800px|thumb|center|Mapa base]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Conclusiones ==&lt;br /&gt;
&lt;br /&gt;
== Anejos ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:SIGAIC_17/18]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Mapabasebicis.jpg&amp;diff=41064</id>
		<title>Archivo:Mapabasebicis.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Mapabasebicis.jpg&amp;diff=41064"/>
				<updated>2018-05-25T16:37:35Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41063</id>
		<title>Trayectos en bici hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41063"/>
				<updated>2018-05-25T15:09:04Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoSIG | Trayectos en bici hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia&lt;br /&gt;
Pablo Retamar Leboutet | [[:Categoría:SIGAIC_17/18|Curso 17/18]] }}&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El objetivo del trabajo es encontrar las rutas óptimas desde diferentes puntos de la ciudad de Madrid hasta la Escuela Técnica Superior de Ingenieros de Caminos, Canales y Puertos. La finalidad es encontrar diferentes caminos para que estudiantes, profesores y demás trabajadores de la universidad puedan llegar a la escuela en bici. Se buscará la circulación por caminos que disminuyan el peligro que supone desplazarse por calles con un alto nivel de tráfico y la dificultad de recorrer calles estrechas.&lt;br /&gt;
Para el desarrollo del trabajo se tendrán en cuenta los carriles bici ya existentes, incorporando tanto calles peatonales como carriles ciclables y el resto de calles, tratando de evitar en todo momento las principales que no estén habilitadas para este tipo de vehículos. Para ello se incorporará un criterio de velocidades en cada tipo de vía en función de los diferentes aspectos comentados. &lt;br /&gt;
Los recorridos que se van a realizar abarcan la almendra de Madrid, es decir, el interior de la m-30. Los recorridos tendrán su origen en el centroide de los distintos barrios de la ciudad, terminando todos ellos en el parking de la escuela. &lt;br /&gt;
Partiendo de un mapa general con todas las vías existentes, se realizarán dos mapas temáticos en función de la congestión del tráfico, lo que limitará el uso de unas u otras vías.&lt;br /&gt;
&lt;br /&gt;
== Metodología ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos partido de tres capas vectoriales básicas para nuestro trabajo en las que se encuentran el callejero de Madrid, los carribles bici y los carriles ciclables. &lt;br /&gt;
A cada capa le hemos dado un atributo de velocidad diferente para las situaciones de tráfico en hora punta y en hora no punta. &lt;br /&gt;
A cada tipo de vía le hemos asignado un factor por el que multiplicar la velocidad media de circulación en bici, cuyos valores se pueden observar en la siguiente tabla:&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Factores de velocidad !! Hora Punta !! Hora No Punta&lt;br /&gt;
|-&lt;br /&gt;
| Calles || 1 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles ciclables || 2 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles Bici || 4 || 5&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
A continuación hemos asignado dicho factor multiplicado por una velocidad media de 12km/h a cada capa para más tarde unificarlas. De este modo conseguimos que la circulación por carriles bici y carriles ciclables tenga preferencia ante las calles no adaptadas. &lt;br /&gt;
A la hora de juntar las vías hemos creado una nueva capa vectorial de nombre “Unificada” en la que hemos copiado las vías de cada una de las capas anteriores. Para ello, ha sido necesario crear dos atributos en la nueva capa cuyos nombres coincidiesen con los atributos de las velocidades de las capas originales, y para que el programa pudiese tener referencia de cada uno de los elementos copiados se ha añadido un atributo ya existente en la capa original, como se puede observar en la siguiente imagen:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:TablaAtributos.jpg|800px|thumb|center|Tabla de atributos]]&lt;br /&gt;
&lt;br /&gt;
A la hora de realizar las rutas nos hemos apoyado en la herramienta de QGIS de la ruta más corta. Para ello hemos configurado el grafo de rutas dos veces para que tomase como valor de la velocidad el correspondiente de los atributos de “velocidad” (para tráficos densos) y “vNoPunta” (para tráficos menos densos), manteniéndonos siempre en la capa de nombre “Unificada”.&lt;br /&gt;
Los puntos de inicio y final de las rutas son los centroides de cada uno de los barrios de Madrid y el parking de la ETSICCP, respectivamente. Las rutas han sido creadas tomando criterios de longitud y tiempo mínimos, diferenciando en este último caso los criterios de velocidades. Las rutas obtenidas se han exportado a tres capas en las que se agrupan en función del criterio, llamadas &amp;quot;Longitud&amp;quot;, &amp;quot;TiempoPunta&amp;quot; y &amp;quot;TiempoNoPunta&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Resultados ==&lt;br /&gt;
&lt;br /&gt;
== Conclusiones ==&lt;br /&gt;
&lt;br /&gt;
== Anejos ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:SIGAIC_17/18]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41062</id>
		<title>Trayectos en bici hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41062"/>
				<updated>2018-05-25T15:06:18Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoSIG | Trayectos en bici hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia&lt;br /&gt;
Pablo Retamar Leboutet | [[:Categoría:SIGAIC_17/18|Curso 17/18]] }}&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El objetivo del trabajo es encontrar las rutas óptimas desde diferentes puntos de la ciudad de Madrid hasta la Escuela Técnica Superior de Ingenieros de Caminos, Canales y Puertos. La finalidad es encontrar diferentes caminos para que estudiantes, profesores y demás trabajadores de la universidad puedan llegar a la escuela en bici. Se buscará la circulación por caminos que disminuyan el peligro que supone desplazarse por calles con un alto nivel de tráfico y la dificultad de recorrer calles estrechas.&lt;br /&gt;
Para el desarrollo del trabajo se tendrán en cuenta los carriles bici ya existentes, incorporando tanto calles peatonales como carriles ciclables y el resto de calles, tratando de evitar en todo momento las principales que no estén habilitadas para este tipo de vehículos. Para ello se incorporará un criterio de velocidades en cada tipo de vía en función de los diferentes aspectos comentados. &lt;br /&gt;
Los recorridos que se van a realizar abarcan la almendra de Madrid, es decir, el interior de la m-30. Los recorridos tendrán su origen en el centroide de los distintos barrios de la ciudad, terminando todos ellos en el parking de la escuela. &lt;br /&gt;
Partiendo de un mapa general con todas las vías existentes, se realizarán dos mapas temáticos en función de la congestión del tráfico, lo que limitará el uso de unas u otras vías.&lt;br /&gt;
&lt;br /&gt;
== Metodología ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos partido de tres capas vectoriales básicas para nuestro trabajo en las que se encuentran el callejero de Madrid, los carribles bici y los carriles ciclables. &lt;br /&gt;
A cada capa le hemos dado un atributo de velocidad diferente para las situaciones de tráfico en hora punta y en hora no punta. &lt;br /&gt;
A cada tipo de vía le hemos asignado un factor por el que multiplicar la velocidad media de circulación en bici, cuyos valores se pueden observar en la siguiente tabla:&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Factores de velocidad !! Hora Punta !! Hora No Punta&lt;br /&gt;
|-&lt;br /&gt;
| Calles || 1 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles ciclables || 2 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles Bici || 4 || 5&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
A continuación hemos asignado dicho factor multiplicado por una velocidad media de 12km/h a cada capa para más tarde unificarlas. De este modo conseguimos que la circulación por carriles bici y carriles ciclables tenga preferencia ante las calles no adaptadas. &lt;br /&gt;
A la hora de juntar las vías hemos creado una nueva capa vectorial de nombre “Unificada” en la que hemos copiado las vías de cada una de las capas anteriores. Para ello, ha sido necesario crear dos atributos en la nueva capa cuyos nombres coincidiesen con los atributos de las velocidades de las capas originales, y para que el programa pudiese tener referencia de cada uno de los elementos copiados se ha añadido un atributo ya existente en la capa original, como se puede observar en la siguiente imagen:&lt;br /&gt;
&lt;br /&gt;
[[File:TablaAtributos.jpg|center|border|caption]]&lt;br /&gt;
&lt;br /&gt;
A la hora de realizar las rutas nos hemos apoyado en la herramienta de QGIS de la ruta más corta. Para ello hemos configurado el grafo de rutas dos veces para que tomase como valor de la velocidad el correspondiente de los atributos de “velocidad” (para tráficos densos) y “vNoPunta” (para tráficos menos densos), manteniéndonos siempre en la capa de nombre “Unificada”.&lt;br /&gt;
Los puntos de inicio y final de las rutas son los centroides de cada uno de los barrios de Madrid y el parking de la ETSICCP, respectivamente. Las rutas han sido creadas tomando criterios de longitud y tiempo mínimos, diferenciando en este último caso los criterios de velocidades. Las rutas obtenidas se han exportado a tres capas en las que se agrupan en función del criterio, llamadas &amp;quot;Longitud&amp;quot;, &amp;quot;TiempoPunta&amp;quot; y &amp;quot;TiempoNoPunta&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Resultados ==&lt;br /&gt;
&lt;br /&gt;
== Conclusiones ==&lt;br /&gt;
&lt;br /&gt;
== Anejos ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:SIGAIC_17/18]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41061</id>
		<title>Trayectos en bici hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41061"/>
				<updated>2018-05-25T14:59:25Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoSIG | Trayectos en bici hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia&lt;br /&gt;
Pablo Retamar Leboutet | [[:Categoría:SIGAIC_17/18|Curso 17/18]] }}&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El objetivo del trabajo es encontrar las rutas óptimas desde diferentes puntos de la ciudad de Madrid hasta la Escuela Técnica Superior de Ingenieros de Caminos, Canales y Puertos. La finalidad es encontrar diferentes caminos para que estudiantes, profesores y demás trabajadores de la universidad puedan llegar a la escuela en bici. Se buscará la circulación por caminos que disminuyan el peligro que supone desplazarse por calles con un alto nivel de tráfico y la dificultad de recorrer calles estrechas.&lt;br /&gt;
Para el desarrollo del trabajo se tendrán en cuenta los carriles bici ya existentes, incorporando tanto calles peatonales como carriles ciclables y el resto de calles, tratando de evitar en todo momento las principales que no estén habilitadas para este tipo de vehículos. Para ello se incorporará un criterio de velocidades en cada tipo de vía en función de los diferentes aspectos comentados. &lt;br /&gt;
Los recorridos que se van a realizar abarcan la almendra de Madrid, es decir, el interior de la m-30. Los recorridos tendrán su origen en el centroide de los distintos barrios de la ciudad, terminando todos ellos en el parking de la escuela. &lt;br /&gt;
Partiendo de un mapa general con todas las vías existentes, se realizarán dos mapas temáticos en función de la congestión del tráfico, lo que limitará el uso de unas u otras vías.&lt;br /&gt;
&lt;br /&gt;
== Metodología ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos partido de tres capas vectoriales básicas para nuestro trabajo en las que se encuentran el callejero de Madrid, los carribles bici y los carriles ciclables. &lt;br /&gt;
A cada capa le hemos dado un atributo de velocidad diferente para las situaciones de tráfico en hora punta y en hora no punta. &lt;br /&gt;
A cada tipo de vía le hemos asignado un factor por el que multiplicar la velocidad media de circulación en bici, cuyos valores se pueden observar en la siguiente tabla:&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Factores de velocidad !! Hora Punta !! Hora No Punta&lt;br /&gt;
|-&lt;br /&gt;
| Calles || 1 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles ciclables || 2 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles Bici || 4 || 5&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
A continuación hemos asignado dicho factor multiplicado por una velocidad media de 12km/h a cada capa para más tarde unificarlas. De este modo conseguimos que la circulación por carriles bici y carriles ciclables tenga preferencia ante las calles no adaptadas. &lt;br /&gt;
A la hora de juntar las vías hemos creado una nueva capa vectorial de nombre “Unificada” en la que hemos copiado las vías de cada una de las capas anteriores. Para ello, ha sido necesario crear dos atributos en la nueva capa cuyos nombres coincidiesen con los atributos de las velocidades de las capas originales, y para que el programa pudiese tener referencia de cada uno de los elementos copiados se ha añadido un atributo ya existente en la capa original, como se puede observar en la siguiente imagen:&lt;br /&gt;
[[Archivo:TablaAtributos.jpg|2px|marco|centro]]&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
TablaAtributos.jpg|Tablas de Atributos&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A la hora de realizar las rutas nos hemos apoyado en la herramienta de QGIS de la ruta más corta. Para ello hemos configurado el grafo de rutas dos veces para que tomase como valor de la velocidad el correspondiente de los atributos de “velocidad” (para tráficos densos) y “vNoPunta” (para tráficos menos densos), manteniéndonos siempre en la capa de nombre “Unificada”.&lt;br /&gt;
Los puntos de inicio y final de las rutas son los centroides de cada uno de los barrios de Madrid y el parking de la ETSICCP, respectivamente. Las rutas han sido creadas tomando criterios de longitud y tiempo mínimos, diferenciando en este último caso los criterios de velocidades. Las rutas obtenidas se han exportado a tres capas en las que se agrupan en función del criterio, llamadas &amp;quot;Longitud&amp;quot;, &amp;quot;TiempoPunta&amp;quot; y &amp;quot;TiempoNoPunta&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Resultados ==&lt;br /&gt;
&lt;br /&gt;
== Conclusiones ==&lt;br /&gt;
&lt;br /&gt;
== Anejos ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:SIGAIC_17/18]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41060</id>
		<title>Trayectos en bici hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41060"/>
				<updated>2018-05-25T14:58:39Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoSIG | Trayectos en bici hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia&lt;br /&gt;
Pablo Retamar Leboutet | [[:Categoría:SIGAIC_17/18|Curso 17/18]] }}&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El objetivo del trabajo es encontrar las rutas óptimas desde diferentes puntos de la ciudad de Madrid hasta la Escuela Técnica Superior de Ingenieros de Caminos, Canales y Puertos. La finalidad es encontrar diferentes caminos para que estudiantes, profesores y demás trabajadores de la universidad puedan llegar a la escuela en bici. Se buscará la circulación por caminos que disminuyan el peligro que supone desplazarse por calles con un alto nivel de tráfico y la dificultad de recorrer calles estrechas.&lt;br /&gt;
Para el desarrollo del trabajo se tendrán en cuenta los carriles bici ya existentes, incorporando tanto calles peatonales como carriles ciclables y el resto de calles, tratando de evitar en todo momento las principales que no estén habilitadas para este tipo de vehículos. Para ello se incorporará un criterio de velocidades en cada tipo de vía en función de los diferentes aspectos comentados. &lt;br /&gt;
Los recorridos que se van a realizar abarcan la almendra de Madrid, es decir, el interior de la m-30. Los recorridos tendrán su origen en el centroide de los distintos barrios de la ciudad, terminando todos ellos en el parking de la escuela. &lt;br /&gt;
Partiendo de un mapa general con todas las vías existentes, se realizarán dos mapas temáticos en función de la congestión del tráfico, lo que limitará el uso de unas u otras vías.&lt;br /&gt;
&lt;br /&gt;
== Metodología ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos partido de tres capas vectoriales básicas para nuestro trabajo en las que se encuentran el callejero de Madrid, los carribles bici y los carriles ciclables. &lt;br /&gt;
A cada capa le hemos dado un atributo de velocidad diferente para las situaciones de tráfico en hora punta y en hora no punta. &lt;br /&gt;
A cada tipo de vía le hemos asignado un factor por el que multiplicar la velocidad media de circulación en bici, cuyos valores se pueden observar en la siguiente tabla:&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Factores de velocidad !! Hora Punta !! Hora No Punta&lt;br /&gt;
|-&lt;br /&gt;
| Calles || 1 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles ciclables || 2 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles Bici || 4 || 5&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
A continuación hemos asignado dicho factor multiplicado por una velocidad media de 12km/h a cada capa para más tarde unificarlas. De este modo conseguimos que la circulación por carriles bici y carriles ciclables tenga preferencia ante las calles no adaptadas. &lt;br /&gt;
A la hora de juntar las vías hemos creado una nueva capa vectorial de nombre “Unificada” en la que hemos copiado las vías de cada una de las capas anteriores. Para ello, ha sido necesario crear dos atributos en la nueva capa cuyos nombres coincidiesen con los atributos de las velocidades de las capas originales, y para que el programa pudiese tener referencia de cada uno de los elementos copiados se ha añadido un atributo ya existente en la capa original, como se puede observar en la siguiente imagen:&lt;br /&gt;
[[Archivo:TablaAtributos.jpg|2px|marco|centro|Tabla de atributos]]&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
TablaAtributos.jpg|Tablas de Atributos&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A la hora de realizar las rutas nos hemos apoyado en la herramienta de QGIS de la ruta más corta. Para ello hemos configurado el grafo de rutas dos veces para que tomase como valor de la velocidad el correspondiente de los atributos de “velocidad” (para tráficos densos) y “vNoPunta” (para tráficos menos densos), manteniéndonos siempre en la capa de nombre “Unificada”.&lt;br /&gt;
Los puntos de inicio y final de las rutas son los centroides de cada uno de los barrios de Madrid y el parking de la ETSICCP, respectivamente. Las rutas han sido creadas tomando criterios de longitud y tiempo mínimos, diferenciando en este último caso los criterios de velocidades. Las rutas obtenidas se han exportado a tres capas en las que se agrupan en función del criterio, llamadas &amp;quot;Longitud&amp;quot;, &amp;quot;TiempoPunta&amp;quot; y &amp;quot;TiempoNoPunta&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Resultados ==&lt;br /&gt;
&lt;br /&gt;
== Conclusiones ==&lt;br /&gt;
&lt;br /&gt;
== Anejos ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:SIGAIC_17/18]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:TablaAtributos.jpg&amp;diff=41059</id>
		<title>Archivo:TablaAtributos.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:TablaAtributos.jpg&amp;diff=41059"/>
				<updated>2018-05-25T14:54:16Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41058</id>
		<title>Trayectos en bici hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41058"/>
				<updated>2018-05-25T14:20:44Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoSIG | Trayectos en bici hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia&lt;br /&gt;
Pablo Retamar Leboutet | [[:Categoría:SIGAIC_17/18|Curso 17/18]] }}&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El objetivo del trabajo es encontrar las rutas óptimas desde diferentes puntos de la ciudad de Madrid hasta la Escuela Técnica Superior de Ingenieros de Caminos, Canales y Puertos. La finalidad es encontrar diferentes caminos para que estudiantes, profesores y demás trabajadores de la universidad puedan llegar a la escuela en bici. Se buscará la circulación por caminos que disminuyan el peligro que supone desplazarse por calles con un alto nivel de tráfico y la dificultad de recorrer calles estrechas.&lt;br /&gt;
Para el desarrollo del trabajo se tendrán en cuenta los carriles bici ya existentes, incorporando tanto calles peatonales como carriles ciclables y el resto de calles, tratando de evitar en todo momento las principales que no estén habilitadas para este tipo de vehículos. Para ello se incorporará un criterio de velocidades en cada tipo de vía en función de los diferentes aspectos comentados. &lt;br /&gt;
Los recorridos que se van a realizar abarcan la almendra de Madrid, es decir, el interior de la m-30. Los recorridos tendrán su origen en el centroide de los distintos barrios de la ciudad, terminando todos ellos en el parking de la escuela. &lt;br /&gt;
Partiendo de un mapa general con todas las vías existentes, se realizarán dos mapas temáticos en función de la congestión del tráfico, lo que limitará el uso de unas u otras vías.&lt;br /&gt;
&lt;br /&gt;
== Metodología ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos partido de tres capas vectoriales básicas para nuestro trabajo en las que se encuentran el callejero de Madrid, los carribles bici y los carriles ciclables. &lt;br /&gt;
A cada capa le hemos dado un atributo de velocidad diferente para las situaciones de tráfico en hora punta y en hora no punta. &lt;br /&gt;
A cada tipo de vía le hemos asignado un factor por el que multiplicar la velocidad media de circulación en bici, cuyos valores se pueden observar en la siguiente tabla:&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Factores de velocidad !! Hora Punta !! Hora No Punta&lt;br /&gt;
|-&lt;br /&gt;
| Calles || 1 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles ciclables || 2 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles Bici || 4 || 5&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
A continuación hemos asignado dicho factor multiplicado por una velocidad media de 12km/h a cada capa para más tarde unificarlas. De este modo conseguimos que la circulación por carriles bici y carriles ciclables tenga preferencia ante las calles no adaptadas. &lt;br /&gt;
A la hora de juntar las vías hemos creado una nueva capa vectorial de nombre “Unificada” en la que hemos copiado las vías de cada una de las capas anteriores. Para ello, ha sido necesario crear dos atributos en la nueva capa cuyos nombres coincidiesen con los atributos de las velocidades de las capas originales, y para que el programa pudiese tener referencia de cada uno de los elementos copiados se ha añadido un atributo ya existente en la capa original, como se puede observar en la siguiente imagen:&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
IMAGEN&lt;br /&gt;
 &lt;br /&gt;
&lt;br /&gt;
A la hora de realizar las rutas nos hemos apoyado en la herramienta de QGIS de la ruta más corta. Para ello hemos configurado el grafo de rutas dos veces para que tomase como valor de la velocidad el correspondiente de los atributos de “velocidad” (para tráficos densos) y “vNoPunta” (para tráficos menos densos), manteniéndonos siempre en la capa de nombre “Unificada”.&lt;br /&gt;
Los puntos de inicio y final de las rutas son los centroides de cada uno de los barrios de Madrid y el parking de la ETSICCP, respectivamente. Las rutas han sido creadas tomando criterios de longitud y tiempo mínimos, diferenciando en este último caso los criterios de velocidades. Las rutas obtenidas se han exportado a tres capas en las que se agrupan en función del criterio, llamadas &amp;quot;Longitud&amp;quot;, &amp;quot;TiempoPunta&amp;quot; y &amp;quot;TiempoNoPunta&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Resultados ==&lt;br /&gt;
&lt;br /&gt;
== Conclusiones ==&lt;br /&gt;
&lt;br /&gt;
== Anejos ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:SIGAIC_17/18]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41057</id>
		<title>Trayectos en bici hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41057"/>
				<updated>2018-05-25T14:18:34Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoSIG | Trayectos en bici hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia&lt;br /&gt;
Pablo Retamar Leboutet | [[:Categoría:SIGAIC_17/18|Curso 17/18]] }}&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
El objetivo del trabajo es encontrar las rutas óptimas desde diferentes puntos de la ciudad de Madrid hasta la Escuela Técnica Superior de Ingenieros de Caminos, Canales y Puertos. La finalidad es encontrar diferentes caminos para que estudiantes, profesores y demás trabajadores de la universidad puedan llegar a la escuela en bici. Se buscará la circulación por caminos que disminuyan el peligro que supone desplazarse por calles con un alto nivel de tráfico y la dificultad de recorrer calles estrechas.&lt;br /&gt;
Para el desarrollo del trabajo se tendrán en cuenta los carriles bici ya existentes, incorporando tanto calles peatonales como carriles ciclables y el resto de calles, tratando de evitar en todo momento las principales que no estén habilitadas para este tipo de vehículos. Para ello se incorporará un criterio de velocidades en cada tipo de vía en función de los diferentes aspectos comentados. &lt;br /&gt;
Los recorridos que se van a realizar abarcan la almendra de Madrid, es decir, el interior de la m-30. Los recorridos tendrán su origen en el centroide de los distintos barrios de la ciudad, terminando todos ellos en el parking de la escuela. &lt;br /&gt;
Partiendo de un mapa general con todas las vías existentes, se realizarán dos mapas temáticos en función de la congestión del tráfico, lo que limitará el uso de unas u otras vías.&lt;br /&gt;
&lt;br /&gt;
== Metodología ==&lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos partido de tres capas vectoriales básicas para nuestro trabajo en las que se encuentran el callejero de Madrid, los carribles bici y los carriles ciclables. &lt;br /&gt;
A cada capa le hemos dado un atributo de velocidad diferente para las situaciones de tráfico en hora punta y en hora no punta. &lt;br /&gt;
A cada tipo de vía le hemos asignado un factor por el que multiplicar la velocidad media de circulación en bici, cuyos valores se pueden observar en la siguiente tabla:&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! Factores de velocidad !! Hora Punta !! Hora No Punta&lt;br /&gt;
|-&lt;br /&gt;
| Calles || 1 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles ciclables || 2 || 3&lt;br /&gt;
|-&lt;br /&gt;
| Carriles Bici || 4 || 5&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
== Resultados ==&lt;br /&gt;
&lt;br /&gt;
== Conclusiones ==&lt;br /&gt;
&lt;br /&gt;
== Anejos ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:SIGAIC_17/18]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41046</id>
		<title>Trayectos en bici hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=41046"/>
				<updated>2018-05-25T13:35:24Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoSIG | Trayectos en bici hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia&lt;br /&gt;
Pablo Retamar Leboutet | [[:Categoría:SIGAIC_17/18|Curso 17/18]] }}&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
El objetivo del trabajo es encontrar las rutas óptimas desde diferentes puntos de la ciudad de Madrid hasta la Escuela Técnica Superior de Ingenieros de Caminos, Canales y Puertos. La finalidad es encontrar diferentes caminos para que estudiantes, profesores y demás trabajadores de la universidad puedan llegar a la escuela en bici. Se buscará la circulación por caminos que disminuyan el peligro que supone desplazarse por calles con un alto nivel de tráfico y la dificultad de recorrer calles estrechas.&lt;br /&gt;
Para el desarrollo del trabajo se tendrán en cuenta los carriles bici ya existentes, incorporando tanto calles peatonales como carriles ciclables y el resto de calles, tratando de evitar en todo momento las principales que no estén habilitadas para este tipo de vehículos. Para ello se incorporará un criterio de velocidades en cada tipo de vía en función de los diferentes aspectos comentados. &lt;br /&gt;
Los recorridos que se van a realizar abarcan la almendra de Madrid, es decir, el interior de la m-30. Los recorridos tendrán su origen en el centroide de los distintos barrios de la ciudad, terminando todos ellos en el parking de la escuela. &lt;br /&gt;
Partiendo de un mapa general con todas las vías existentes, se realizarán dos mapas temáticos en función de la congestión del tráfico, lo que limitará el uso de unas u otras vías.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== Metodología ==&lt;br /&gt;
&lt;br /&gt;
== Resultados ==&lt;br /&gt;
&lt;br /&gt;
== Conclusiones ==&lt;br /&gt;
&lt;br /&gt;
== Anejos ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:SIGAIC_17/18]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=40845</id>
		<title>Trayectos en bici hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=40845"/>
				<updated>2018-05-22T17:24:40Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: Pablo Retamar trasladó la página Trayectos hasta la ETSICCP desde los barrios de Madrid a Trayectos en bici hasta la ETSICCP desde los barrios de Madrid&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoSIG | Trayectos en bici hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia&lt;br /&gt;
Pablo Retamar Leboutet | [[:Categoría:SIGAIC_17/18|Curso 17/18]] }}&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
== Metodología ==&lt;br /&gt;
&lt;br /&gt;
== Resultados ==&lt;br /&gt;
&lt;br /&gt;
== Conclusiones ==&lt;br /&gt;
&lt;br /&gt;
== Anejos ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:SIGAIC_17/18]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=40846</id>
		<title>Trayectos hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=40846"/>
				<updated>2018-05-22T17:24:40Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: Pablo Retamar trasladó la página Trayectos hasta la ETSICCP desde los barrios de Madrid a Trayectos en bici hasta la ETSICCP desde los barrios de Madrid&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;#REDIRECCIÓN [[Trayectos en bici hasta la ETSICCP desde los barrios de Madrid]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=40843</id>
		<title>Trayectos en bici hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=40843"/>
				<updated>2018-05-22T17:23:25Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoSIG | Trayectos en bici hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia&lt;br /&gt;
Pablo Retamar Leboutet | [[:Categoría:SIGAIC_17/18|Curso 17/18]] }}&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
== Metodología ==&lt;br /&gt;
&lt;br /&gt;
== Resultados ==&lt;br /&gt;
&lt;br /&gt;
== Conclusiones ==&lt;br /&gt;
&lt;br /&gt;
== Anejos ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:SIGAIC_17/18]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=40839</id>
		<title>Trayectos en bici hasta la ETSICCP desde los barrios de Madrid</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Trayectos_en_bici_hasta_la_ETSICCP_desde_los_barrios_de_Madrid&amp;diff=40839"/>
				<updated>2018-05-22T17:18:43Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: Página creada con «{{ TrabajoSIG | Trayectos hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia Pablo Retamar Leboutet | Curso 17/18 }}  == Introdu...»&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoSIG | Trayectos hasta la ETSICCP desde los barrios de Madrid | Ana Herrero Gracia&lt;br /&gt;
Pablo Retamar Leboutet | [[:Categoría:SIGAIC_17/18|Curso 17/18]] }}&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
== Metodología ==&lt;br /&gt;
&lt;br /&gt;
== Resultados ==&lt;br /&gt;
&lt;br /&gt;
== Conclusiones ==&lt;br /&gt;
&lt;br /&gt;
== Anejos ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:SIGAIC_17/18]]&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39225</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39225"/>
				<updated>2017-04-28T08:50:33Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''Introducción'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la '''Ley de acción de masas''', justifica que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen las variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez, también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que se sustituyen los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la fórmula anteriormente demostrada, se obtiene que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la anterior ecuación diferencial se puede formar el PVI asociado:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
A partir de los datos numéricos, A=2 y B=0.05 mol/L, y despejando en las ecuaciones anteriores, se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ello, se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler, cuyo esquema numérico se indica a continuación:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Métodos del Trapecio y Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:Traperunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),yt(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% Metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentará hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
[[File:Corterungeeuler.jpg|right|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema se procede al cálculo correspondiente, representando gráficamente ambos métodos, donde se puede observar una variación de ambos. El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,1.02), como se puede observar en la gráfica. Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4. Sin embargo, esta diferencia entre ambas gráficas queda reducida a medida que se aumenta el paso ''h''.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
La reacción global queda definida por tres reacciones intermedias que suceden de forma consecutiva. Cabe destacar, por un lado, el hecho de que dos de ellas son autocatalíticas y, por otro lado, que todas ellas están determinadas por diferentes constantes k&amp;lt;sub&amp;gt;i&amp;lt;/sub&amp;gt; que determinarán la velocidad de cada reacción. Las tres reacciones son:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A+X→k_1*2*X\\&lt;br /&gt;
X+Y→k_2*2*Y\\&lt;br /&gt;
Y→k_3*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para determinar las ecuaciones diferenciales correspondientes a la velocidad de formación (o descomposición) de cada sustancia, se hace un breve estudio de cada una de ellas. En nuestro caso, se ha seguido el orden contrario, y se empieza por la última de ellas para acabar con la primera. Además, es necesario utilizar el Principio de conservación de masas para poder determinar las cuatro ecuaciones correspondientes a los cuatro compuestos presentes. El análisis seguido es el siguiente:&lt;br /&gt;
* '''Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B'''. A partir de Y se formará B, regido por una constante k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;. Mediante dicha reacción se podrá definir una velocidad de transformación de B: '''B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''. &lt;br /&gt;
* '''X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y'''. En la formación de Y hay que tener en cuenta la parte proporcional a la descomposición de X (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'') y descontar la cantidad de Y que se descompone para la formación de B (''k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B''). Por tanto, la velocidad de transformación de Y queda determinada por: '''Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''.&lt;br /&gt;
* '''A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X'''. La formación de X tiene una parte proporcional a la descomposición de A (''k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X''), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y''). Así pues, se obtendrá una velocidad de transformación regida por '''X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'''.&lt;br /&gt;
* Derivado la ecuación correspondiente al '''Principio de conservación de masas''' (''A+X+Y+B=cte'') se obtiene la siguiente ecuación: ''A'+X'+Y'+B'=0''. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → '''A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X'''&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que para este caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas arbitrariamente como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en una de las ecuaciones definidas por Lotka se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+X=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. Debido a esta relación, y a partir del estudio de las gráficas, se puede concluir que a medida que el valor de la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de ''A'' experimenta una desaparición prácticamente instantánea al inicio la reacción .&lt;br /&gt;
*El valor de ''B'' experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que se podría afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene tanto las velocidades como los cambios prácticamente iguales. Para valores pequeños de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, como en el caso en el que su valor es 0.02 o incluso 0.1 (estudiado anteriormente), se puede apreciar una inestabilidad que comienza en torno a los 120 segundos de los dos compuestos intermedios, X e Y. Esta inestabilidad se reduce conforme el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta, hasta hacerse inapreciable cuando la constante alcanza valores de 0.68 y superiores. Además, se observa que el tiempo en el que ocurre la totalidad de la reacción se ve reducidoa medida que el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta. Por lo tanto, cuanto mayor sea dicho valor, menos tiempo necesita la reacción global para llevarse a cabo en su totalidad, es decir, que todo el compuesto ''A'' se transforme en compuesto ''B'', y los compuestos intermedios ''X'' e ''Y'' desaparezcan por completo.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39223</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39223"/>
				<updated>2017-04-28T08:47:21Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''Introducción'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la '''Ley de acción de masas''', justifica que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen las variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez, también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que se sustituyen los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la fórmula anteriormente demostrada, se obtiene que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la anterior ecuación diferencial se puede formar el PVI asociado:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
A partir de los datos numéricos, A=2 y B=0.05 mol/L, y despejando en las ecuaciones anteriores, se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ello, se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler, cuyo esquema numérico se indica a continuación:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Métodos del Trapecio y Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:Traperunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),yt(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% Metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentará hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
[[File:Corterungeeuler.jpg|right|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema se procede al cálculo correspondiente, representando gráficamente ambos métodos, donde se puede observar una variación de ambos. El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,1.02), como se puede observar en la gráfica. Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4. Sin embargo, esta diferencia entre ambas gráficas queda reducida a medida que se aumenta el paso ''h''.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
La reacción global queda definida por tres reacciones intermedias que suceden de forma consecutiva. Cabe destacar, por un lado, el hecho de que dos de ellas son autocatalíticas y, por otro lado, que todas ellas están determinadas por diferentes constantes k&amp;lt;sub&amp;gt;i&amp;lt;/sub&amp;gt; que determinarán la velocidad de cada reacción. Las tres reacciones son:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A+X→k_1*2*X\\&lt;br /&gt;
X+Y→k_2*2*Y\\&lt;br /&gt;
Y→k_3*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para determinar las ecuaciones diferenciales correspondientes a la velocidad de formación (o descomposición) de cada sustancia, se hace un breve estudio de cada una de ellas. En nuestro caso, se ha seguido el orden contrario, y se empieza por la última de ellas para acabar con la primera. Además, es necesario utilizar el Principio de conservación de masas para poder determinar las cuatro ecuaciones correspondientes a los cuatro compuestos presentes. El análisis seguido es el siguiente:&lt;br /&gt;
* '''Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B'''. A partir de Y se formará B, regido por una constante k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;. Mediante dicha reacción se podrá definir una velocidad de transformación de B: '''B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''. &lt;br /&gt;
* '''X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y'''. En la formación de Y hay que tener en cuenta la parte proporcional a la descomposición de X (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'') y descontar la cantidad de Y que se descompone para la formación de B (''k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B''). Por tanto, la velocidad de transformación de Y queda determinada por: '''Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''.&lt;br /&gt;
* '''A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X'''. La formación de X tiene una parte proporcional a la descomposición de A (''k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X''), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y''). Así pues, se obtendrá una velocidad de transformación regida por '''X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'''.&lt;br /&gt;
* Derivado la ecuación correspondiente al '''Principio de conservación de masas''' (''A+X+Y+B=cte'') se obtiene la siguiente ecuación: ''A'+X'+Y'+B'=0''. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → '''A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X'''&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que para este caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas arbitrariamente como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en una de las ecuaciones definidas por Lotka se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+X=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. Debido a esta relación, y a partir del estudio de las gráficas, se puede concluir que a medida que el valor de la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de ''A'' experimenta una desaparición prácticamente instantánea al inicio la reacción .&lt;br /&gt;
*El valor de ''B'' experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que se podría afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene tanto las velocidades como los cambios prácticamente iguales. Para valores pequeños de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, como en el caso en el que su valor es 0.02 o incluso 0.1 (estudiado anteriormente), se puede apreciar una inestabilidad que comienza en torno a los 120 segundos de los dos compuestos intermedios, X e Y. Esta inestabilidad se reduce conforme el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta, hasta hacerse inapreciable cuando la constante alcanza valores de 0.68 y superiores. Además, se observa que el tiempo en el que ocurre la totalidad de la reacción se ve reducidoa medida que el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta. Por lo tanto, cuanto mayor sea dicho valor, menos tiempo necesita la reacción global para llevarse a cabo en su totalidad, es decir, que todo el compuesto ''A'' se transforme en compuesto ''B'', y los compuestos intermedios ''X'' e ''Y'' desaparezcan por completo.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Traperunge.jpg&amp;diff=39221</id>
		<title>Archivo:Traperunge.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Traperunge.jpg&amp;diff=39221"/>
				<updated>2017-04-28T08:46:42Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39220</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39220"/>
				<updated>2017-04-28T08:45:00Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: /* Introducción */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''Introducción'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la '''Ley de acción de masas''', justifica que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen las variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez, también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que se sustituyen los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la fórmula anteriormente demostrada, se obtiene que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la anterior ecuación diferencial se puede formar el PVI asociado:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
A partir de los datos numéricos, A=2 y B=0.05 mol/L, y despejando en las ecuaciones anteriores, se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ello, se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler, cuyo esquema numérico se indica a continuación:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Métodos del Trapecio y Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),yt(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% Metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentará hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
[[File:Corterungeeuler.jpg|right|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema se procede al cálculo correspondiente, representando gráficamente ambos métodos, donde se puede observar una variación de ambos. El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,1.02), como se puede observar en la gráfica. Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4. Sin embargo, esta diferencia entre ambas gráficas queda reducida a medida que se aumenta el paso ''h''.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
La reacción global queda definida por tres reacciones intermedias que suceden de forma consecutiva. Cabe destacar, por un lado, el hecho de que dos de ellas son autocatalíticas y, por otro lado, que todas ellas están determinadas por diferentes constantes k&amp;lt;sub&amp;gt;i&amp;lt;/sub&amp;gt; que determinarán la velocidad de cada reacción. Las tres reacciones son:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A+X→k_1*2*X\\&lt;br /&gt;
X+Y→k_2*2*Y\\&lt;br /&gt;
Y→k_3*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para determinar las ecuaciones diferenciales correspondientes a la velocidad de formación (o descomposición) de cada sustancia, se hace un breve estudio de cada una de ellas. En nuestro caso, se ha seguido el orden contrario, y se empieza por la última de ellas para acabar con la primera. Además, es necesario utilizar el Principio de conservación de masas para poder determinar las cuatro ecuaciones correspondientes a los cuatro compuestos presentes. El análisis seguido es el siguiente:&lt;br /&gt;
* '''Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B'''. A partir de Y se formará B, regido por una constante k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;. Mediante dicha reacción se podrá definir una velocidad de transformación de B: '''B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''. &lt;br /&gt;
* '''X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y'''. En la formación de Y hay que tener en cuenta la parte proporcional a la descomposición de X (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'') y descontar la cantidad de Y que se descompone para la formación de B (''k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B''). Por tanto, la velocidad de transformación de Y queda determinada por: '''Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''.&lt;br /&gt;
* '''A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X'''. La formación de X tiene una parte proporcional a la descomposición de A (''k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X''), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y''). Así pues, se obtendrá una velocidad de transformación regida por '''X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'''.&lt;br /&gt;
* Derivado la ecuación correspondiente al '''Principio de conservación de masas''' (''A+X+Y+B=cte'') se obtiene la siguiente ecuación: ''A'+X'+Y'+B'=0''. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → '''A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X'''&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que para este caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas arbitrariamente como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en una de las ecuaciones definidas por Lotka se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+X=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. Debido a esta relación, y a partir del estudio de las gráficas, se puede concluir que a medida que el valor de la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de ''A'' experimenta una desaparición prácticamente instantánea al inicio la reacción .&lt;br /&gt;
*El valor de ''B'' experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que se podría afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene tanto las velocidades como los cambios prácticamente iguales. Para valores pequeños de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, como en el caso en el que su valor es 0.02 o incluso 0.1 (estudiado anteriormente), se puede apreciar una inestabilidad que comienza en torno a los 120 segundos de los dos compuestos intermedios, X e Y. Esta inestabilidad se reduce conforme el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta, hasta hacerse inapreciable cuando la constante alcanza valores de 0.68 y superiores. Además, se observa que el tiempo en el que ocurre la totalidad de la reacción se ve reducidoa medida que el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta. Por lo tanto, cuanto mayor sea dicho valor, menos tiempo necesita la reacción global para llevarse a cabo en su totalidad, es decir, que todo el compuesto ''A'' se transforme en compuesto ''B'', y los compuestos intermedios ''X'' e ''Y'' desaparezcan por completo.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39219</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39219"/>
				<updated>2017-04-28T08:44:51Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''Introducción'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la '''Ley de acción de masas''', que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen las variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez, también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que se sustituyen los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la fórmula anteriormente demostrada, se obtiene que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la anterior ecuación diferencial se puede formar el PVI asociado:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
A partir de los datos numéricos, A=2 y B=0.05 mol/L, y despejando en las ecuaciones anteriores, se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ello, se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler, cuyo esquema numérico se indica a continuación:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Métodos del Trapecio y Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),yt(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% Metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentará hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
[[File:Corterungeeuler.jpg|right|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema se procede al cálculo correspondiente, representando gráficamente ambos métodos, donde se puede observar una variación de ambos. El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,1.02), como se puede observar en la gráfica. Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4. Sin embargo, esta diferencia entre ambas gráficas queda reducida a medida que se aumenta el paso ''h''.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
La reacción global queda definida por tres reacciones intermedias que suceden de forma consecutiva. Cabe destacar, por un lado, el hecho de que dos de ellas son autocatalíticas y, por otro lado, que todas ellas están determinadas por diferentes constantes k&amp;lt;sub&amp;gt;i&amp;lt;/sub&amp;gt; que determinarán la velocidad de cada reacción. Las tres reacciones son:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A+X→k_1*2*X\\&lt;br /&gt;
X+Y→k_2*2*Y\\&lt;br /&gt;
Y→k_3*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para determinar las ecuaciones diferenciales correspondientes a la velocidad de formación (o descomposición) de cada sustancia, se hace un breve estudio de cada una de ellas. En nuestro caso, se ha seguido el orden contrario, y se empieza por la última de ellas para acabar con la primera. Además, es necesario utilizar el Principio de conservación de masas para poder determinar las cuatro ecuaciones correspondientes a los cuatro compuestos presentes. El análisis seguido es el siguiente:&lt;br /&gt;
* '''Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B'''. A partir de Y se formará B, regido por una constante k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;. Mediante dicha reacción se podrá definir una velocidad de transformación de B: '''B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''. &lt;br /&gt;
* '''X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y'''. En la formación de Y hay que tener en cuenta la parte proporcional a la descomposición de X (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'') y descontar la cantidad de Y que se descompone para la formación de B (''k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B''). Por tanto, la velocidad de transformación de Y queda determinada por: '''Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''.&lt;br /&gt;
* '''A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X'''. La formación de X tiene una parte proporcional a la descomposición de A (''k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X''), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y''). Así pues, se obtendrá una velocidad de transformación regida por '''X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'''.&lt;br /&gt;
* Derivado la ecuación correspondiente al '''Principio de conservación de masas''' (''A+X+Y+B=cte'') se obtiene la siguiente ecuación: ''A'+X'+Y'+B'=0''. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → '''A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X'''&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que para este caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas arbitrariamente como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en una de las ecuaciones definidas por Lotka se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+X=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. Debido a esta relación, y a partir del estudio de las gráficas, se puede concluir que a medida que el valor de la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de ''A'' experimenta una desaparición prácticamente instantánea al inicio la reacción .&lt;br /&gt;
*El valor de ''B'' experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que se podría afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene tanto las velocidades como los cambios prácticamente iguales. Para valores pequeños de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, como en el caso en el que su valor es 0.02 o incluso 0.1 (estudiado anteriormente), se puede apreciar una inestabilidad que comienza en torno a los 120 segundos de los dos compuestos intermedios, X e Y. Esta inestabilidad se reduce conforme el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta, hasta hacerse inapreciable cuando la constante alcanza valores de 0.68 y superiores. Además, se observa que el tiempo en el que ocurre la totalidad de la reacción se ve reducidoa medida que el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta. Por lo tanto, cuanto mayor sea dicho valor, menos tiempo necesita la reacción global para llevarse a cabo en su totalidad, es decir, que todo el compuesto ''A'' se transforme en compuesto ''B'', y los compuestos intermedios ''X'' e ''Y'' desaparezcan por completo.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Corterungeeuler.jpg&amp;diff=39218</id>
		<title>Archivo:Corterungeeuler.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Corterungeeuler.jpg&amp;diff=39218"/>
				<updated>2017-04-28T08:44:13Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39215</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39215"/>
				<updated>2017-04-28T08:40:17Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''Introducción'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la '''Ley de acción de masas''', que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen las variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez, también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que se sustituyen los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la fórmula anteriormente demostrada, se obtiene que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la anterior ecuación diferencial se puede formar el PVI asociado:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
A partir de los datos numéricos, A=2 y B=0.05 mol/L, y despejando en las ecuaciones anteriores, se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ello, se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler, cuyo esquema numérico se indica a continuación:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Métodos del Trapecio y Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),yt(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% Metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentará hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
[[File:Corteeulerrunge.jpg|right|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema se procede al cálculo correspondiente, representando gráficamente ambos métodos, donde se puede observar una variación de ambos. El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,1.02), como se puede observar en la gráfica. Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4. Sin embargo, esta diferencia entre ambas gráficas queda reducida a medida que se aumenta el paso ''h''.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
La reacción global queda definida por tres reacciones intermedias que suceden de forma consecutiva. Cabe destacar, por un lado, el hecho de que dos de ellas son autocatalíticas y, por otro lado, que todas ellas están determinadas por diferentes constantes k&amp;lt;sub&amp;gt;i&amp;lt;/sub&amp;gt; que determinarán la velocidad de cada reacción. Las tres reacciones son:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A+X→k_1*2*X\\&lt;br /&gt;
X+Y→k_2*2*Y\\&lt;br /&gt;
Y→k_3*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para determinar las ecuaciones diferenciales correspondientes a la velocidad de formación (o descomposición) de cada sustancia, se hace un breve estudio de cada una de ellas. En nuestro caso, se ha seguido el orden contrario, y se empieza por la última de ellas para acabar con la primera. Además, es necesario utilizar el Principio de conservación de masas para poder determinar las cuatro ecuaciones correspondientes a los cuatro compuestos presentes. El análisis seguido es el siguiente:&lt;br /&gt;
* '''Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B'''. A partir de Y se formará B, regido por una constante k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;. Mediante dicha reacción se podrá definir una velocidad de transformación de B: '''B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''. &lt;br /&gt;
* '''X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y'''. En la formación de Y hay que tener en cuenta la parte proporcional a la descomposición de X (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'') y descontar la cantidad de Y que se descompone para la formación de B (''k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B''). Por tanto, la velocidad de transformación de Y queda determinada por: '''Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''.&lt;br /&gt;
* '''A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X'''. La formación de X tiene una parte proporcional a la descomposición de A (''k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X''), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y''). Así pues, se obtendrá una velocidad de transformación regida por '''X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'''.&lt;br /&gt;
* Derivado la ecuación correspondiente al '''Principio de conservación de masas''' (''A+X+Y+B=cte'') se obtiene la siguiente ecuación: ''A'+X'+Y'+B'=0''. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → '''A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X'''&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que para este caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas arbitrariamente como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en una de las ecuaciones definidas por Lotka se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+X=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. Debido a esta relación, y a partir del estudio de las gráficas, se puede concluir que a medida que el valor de la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de ''A'' experimenta una desaparición prácticamente instantánea al inicio la reacción .&lt;br /&gt;
*El valor de ''B'' experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que se podría afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene tanto las velocidades como los cambios prácticamente iguales. Para valores pequeños de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, como en el caso en el que su valor es 0.02 o incluso 0.1 (estudiado anteriormente), se puede apreciar una inestabilidad que comienza en torno a los 120 segundos de los dos compuestos intermedios, X e Y. Esta inestabilidad se reduce conforme el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta, hasta hacerse inapreciable cuando la constante alcanza valores de 0.68 y superiores. Además, se observa que el tiempo en el que ocurre la totalidad de la reacción se ve reducidoa medida que el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta. Por lo tanto, cuanto mayor sea dicho valor, menos tiempo necesita la reacción global para llevarse a cabo en su totalidad, es decir, que todo el compuesto ''A'' se transforme en compuesto ''B'', y los compuestos intermedios ''X'' e ''Y'' desaparezcan por completo.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39214</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39214"/>
				<updated>2017-04-28T08:39:38Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la '''Ley de acción de masas''', que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen las variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez, también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que se sustituyen los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la fórmula anteriormente demostrada, se obtiene que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la anterior ecuación diferencial se puede formar el PVI asociado:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
A partir de los datos numéricos, A=2 y B=0.05 mol/L, y despejando en las ecuaciones anteriores, se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ello, se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler, cuyo esquema numérico se indica a continuación:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Métodos del Trapecio y Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),yt(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% Metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentará hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
[[File:Corteeulerrunge.jpg|right|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema se procede al cálculo correspondiente, representando gráficamente ambos métodos, donde se puede observar una variación de ambos. El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,1.02), como se puede observar en la gráfica. Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4. Sin embargo, esta diferencia entre ambas gráficas queda reducida a medida que se aumenta el paso ''h''.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
La reacción global queda definida por tres reacciones intermedias que suceden de forma consecutiva. Cabe destacar, por un lado, el hecho de que dos de ellas son autocatalíticas y, por otro lado, que todas ellas están determinadas por diferentes constantes k&amp;lt;sub&amp;gt;i&amp;lt;/sub&amp;gt; que determinarán la velocidad de cada reacción. Las tres reacciones son:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A+X→k_1*2*X\\&lt;br /&gt;
X+Y→k_2*2*Y\\&lt;br /&gt;
Y→k_3*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para determinar las ecuaciones diferenciales correspondientes a la velocidad de formación (o descomposición) de cada sustancia, se hace un breve estudio de cada una de ellas. En nuestro caso, se ha seguido el orden contrario, y se empieza por la última de ellas para acabar con la primera. Además, es necesario utilizar el Principio de conservación de masas para poder determinar las cuatro ecuaciones correspondientes a los cuatro compuestos presentes. El análisis seguido es el siguiente:&lt;br /&gt;
* '''Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B'''. A partir de Y se formará B, regido por una constante k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;. Mediante dicha reacción se podrá definir una velocidad de transformación de B: '''B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''. &lt;br /&gt;
* '''X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y'''. En la formación de Y hay que tener en cuenta la parte proporcional a la descomposición de X (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'') y descontar la cantidad de Y que se descompone para la formación de B (''k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B''). Por tanto, la velocidad de transformación de Y queda determinada por: '''Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''.&lt;br /&gt;
* '''A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X'''. La formación de X tiene una parte proporcional a la descomposición de A (''k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X''), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y''). Así pues, se obtendrá una velocidad de transformación regida por '''X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'''.&lt;br /&gt;
* Derivado la ecuación correspondiente al '''Principio de conservación de masas''' (''A+X+Y+B=cte'') se obtiene la siguiente ecuación: ''A'+X'+Y'+B'=0''. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → '''A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X'''&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que para este caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas arbitrariamente como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en una de las ecuaciones definidas por Lotka se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+X=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. Debido a esta relación, y a partir del estudio de las gráficas, se puede concluir que a medida que el valor de la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de ''A'' experimenta una desaparición prácticamente instantánea al inicio la reacción .&lt;br /&gt;
*El valor de ''B'' experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que se podría afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene tanto las velocidades como los cambios prácticamente iguales. Para valores pequeños de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, como en el caso en el que su valor es 0.02 o incluso 0.1 (estudiado anteriormente), se puede apreciar una inestabilidad que comienza en torno a los 120 segundos de los dos compuestos intermedios, X e Y. Esta inestabilidad se reduce conforme el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta, hasta hacerse inapreciable cuando la constante alcanza valores de 0.68 y superiores. Además, se observa que el tiempo en el que ocurre la totalidad de la reacción se ve reducidoa medida que el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta. Por lo tanto, cuanto mayor sea dicho valor, menos tiempo necesita la reacción global para llevarse a cabo en su totalidad, es decir, que todo el compuesto ''A'' se transforme en compuesto ''B'', y los compuestos intermedios ''X'' e ''Y'' desaparezcan por completo.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39212</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39212"/>
				<updated>2017-04-28T08:38:15Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la '''Ley de acción de masas''', que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen las variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez, también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que se sustituyen los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la fórmula anteriormente demostrada, se obtiene que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la anterior ecuación diferencial se puede formar el PVI asociado:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
A partir de los datos numéricos, A=2 y B=0.05 mol/L, y despejando en las ecuaciones anteriores, se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ello, se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler, cuyo esquema numérico se indica a continuación:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Métodos del Trapecio y Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),yt(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% Metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentará hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
[[File:Corteeulerrunge.jpg|right|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema se procede al cálculo correspondiente, representando gráficamente ambos métodos, donde se puede observar una variación de ambos. El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,1.02), como se puede observar en la gráfica. Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4. Sin embargo, esta diferencia entre ambas gráficas queda reducida a medida que se aumenta el paso ''h''.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
La reacción global queda definida por tres reacciones intermedias que suceden de forma consecutiva. Cabe destacar, por un lado, el hecho de que dos de ellas son autocatalíticas y, por otro lado, que todas ellas están determinadas por diferentes constantes k&amp;lt;sub&amp;gt;i&amp;lt;/sub&amp;gt; que determinarán la velocidad de cada reacción. Las tres reacciones son:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A+X→k_1*2*X\\&lt;br /&gt;
X+Y→k_2*2*Y\\&lt;br /&gt;
Y→k_3*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para determinar las ecuaciones diferenciales correspondientes a la velocidad de formación (o descomposición) de cada sustancia, se hace un breve estudio de cada una de ellas. En nuestro caso, se ha seguido el orden contrario, y se empieza por la última de ellas para acabar con la primera. Además, es necesario utilizar el Principio de conservación de masas para poder determinar las cuatro ecuaciones correspondientes a los cuatro compuestos presentes. El análisis seguido es el siguiente:&lt;br /&gt;
* '''Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B'''. A partir de Y se formará B, regido por una constante k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;. Mediante dicha reacción se podrá definir una velocidad de transformación de B: '''B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''. &lt;br /&gt;
* '''X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y'''. En la formación de Y hay que tener en cuenta la parte proporcional a la descomposición de X (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'') y descontar la cantidad de Y que se descompone para la formación de B (''k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B''). Por tanto, la velocidad de transformación de Y queda determinada por: '''Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''.&lt;br /&gt;
* '''A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X'''. La formación de X tiene una parte proporcional a la descomposición de A (''k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X''), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y''). Así pues, se obtendrá una velocidad de transformación regida por '''X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'''.&lt;br /&gt;
* Derivado la ecuación correspondiente al '''Principio de conservación de masas''' (''A+X+Y+B=cte'') se obtiene la siguiente ecuación: ''A'+X'+Y'+B'=0''. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → '''A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X'''&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que en este caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas arbitrariamente como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en una de las ecuaciones definidas por Lotka se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+X=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. Debido a esta relación, y a partir del estudio de las gráficas, se puede concluir que a medida que el valor de la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de ''A'' experimenta una desaparición prácticamente instantánea al inicio la reacción .&lt;br /&gt;
*El valor de ''B'' experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que se podría afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene tanto las velocidades como los cambios prácticamente iguales. Para valores pequeños de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, como en el caso en el que su valor es 0.02 o incluso 0.1 (estudiado anteriormente), se puede apreciar una inestabilidad que comienza en torno a los 120 segundos de los dos compuestos intermedios, X e Y. Esta inestabilidad se reduce conforme el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta, hasta hacerse inapreciable cuando la constante alcanza valores de 0.68 y superiores. Además, se observa que el tiempo en el que ocurre la totalidad de la reacción se ve reducidoa medida que el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta. Por lo tanto, cuanto mayor sea dicho valor, menos tiempo necesita la reacción global para llevarse a cabo en su totalidad, es decir, que todo el compuesto ''A'' se transforme en compuesto ''B'', y los compuestos intermedios ''X'' e ''Y'' desaparezcan por completo.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39207</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39207"/>
				<updated>2017-04-28T08:33:50Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la '''Ley de acción de masas''', que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen las variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez, también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que se sustituyen los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la fórmula anteriormente demostrada, se obtiene que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la anterior ecuación diferencial se puede formar el PVI asociado:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
A partir de los datos numéricos, A=2 y B=0.05 mol/L, y despejando en las ecuaciones anteriores, se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ello, se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler, cuyo esquema numérico se indica a continuación:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Métodos del Trapecio y Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),yt(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% Metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentará hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
[[File:Corteeulerrunge.jpg|right|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema se procede al cálculo correspondiente, representando gráficamente ambos métodos, donde se puede observar una variación de ambos. El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,1.02), como se puede observar en la gráfica. Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4. Sin embargo, esta diferencia entre ambas gráficas queda reducida a medida que se aumenta el paso ''h''.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
La reacción global queda definida por tres reacciones intermedias que suceden de forma consecutiva. Cabe destacar, por un lado, el hecho de que dos de ellas son autocatalíticas y, por otro lado, que todas ellas están determinadas por diferentes constantes k&amp;lt;sub&amp;gt;i&amp;lt;/sub&amp;gt; que determinarán la velocidad de cada reacción. Las tres reacciones son:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A+X→k_1*2*X\\&lt;br /&gt;
X+Y→k_2*2*Y\\&lt;br /&gt;
Y→k_3*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para determinar las ecuaciones diferenciales correspondientes a la velocidad de formación (o descomposición) de cada sustancia, se hace un breve estudio de cada una de ellas. En nuestro caso, se ha seguido el orden contrario, y se empieza por la última de ellas para acabar con la primera. Además, es necesario utilizar el Principio de conservación de masas para poder determinar las cuatro ecuaciones correspondientes a los cuatro compuestos presentes. El análisis seguido es el siguiente:&lt;br /&gt;
* '''Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B'''. A partir de Y se formará B, regido por una constante k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;. Mediante dicha reacción se podrá definir una velocidad de transformación de B: '''B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''. &lt;br /&gt;
* '''X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y'''. En la formación de Y hay que tener en cuenta la parte proporcional a la descomposición de X (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'') y descontar la cantidad de Y que se descompone para la formación de B (''k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B''). Por tanto, la velocidad de transformación de Y queda determinada por: '''Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''.&lt;br /&gt;
* '''A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X'''. La formación de X tiene una parte proporcional a la descomposición de A (''k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X''), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y''). Así pues, se obtendrá una velocidad de transformación regida por '''X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'''.&lt;br /&gt;
* Derivado la ecuación correspondiente al '''Principio de conservación de masas''' (''A+X+Y+B=cte'') se obtiene la siguiente ecuación: ''A'+X'+Y'+B'=0''. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → '''A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X'''&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que en este caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas arbitrariamente como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en una de las ecuaciones definidas por Lotka se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+X=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. Debido a esta relación, y a partir del estudio de las gráficas, se puede concluir que a medida que el valor de la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de ''A'' experimenta una desaparición prácticamente instantánea al inicio la reacción .&lt;br /&gt;
*El valor de ''B'' experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que podríamos afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene tanto las velocidades como los cambios prácticamente iguales. Para valores pequeños de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, como en el caso en el que su valor es 0.02 o incluso 0.1 (estudiado anteriormente), se puede apreciar una inestabilidad que comienza en torno a los 120 de los dos compuestos intermedios, X e Y. Esta inestabilidad se reduce conforme el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta, hasta hacerse inapreciable cuando la constante alcanza valores de 0.68 y superiores. Además, se observa que el tiempo en el que ocurre la totalidad de la reacción se ve reducido de forma directamente proporcional al valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, por lo que cuanto mayor sea dicho valor, menos tiempo necesita la reacción global para llevarse a cabo en su totalidad, es decir, que todo el compuesto ''A'' se transforme en compuesto ''B'', y los compuestos intermedios ''X'' e ''Y'' desaparezcan por completo.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39204</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39204"/>
				<updated>2017-04-28T08:28:41Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la '''Ley de acción de masas''', que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen las variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez, también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que sustituimos los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la fórmula anteriormente demostrada, se obtiene que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la anterior ecuación diferencial se puede formar el PVI asociado:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
A partir de los datos numéricos, A=2 y B=0.05 mol/L, y despejando en las ecuaciones anteriores, se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ello, se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler, cuyo esquema numérico se indica a continuación:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Métodos del Trapecio y Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),yt(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% Metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentará hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
[[File:Corteeulerrunge.jpg|right|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema se procede al cálculo correspondiente, representando gráficamente ambos métodos, donde se puede observar una variación de ambos. El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,1.02), como se puede observar en la gráfica. Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4. Sin embargo, esta diferencia entre ambas gráficas queda reducida a medida que aumentamos el paso h.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
La reacción global queda definida por tres reacciones intermedias que suceden de forma consecutiva. Cabe destacar, por un lado, el hecho de que dos de ellas son autocatalíticas y, por otro lado, que todas ellas están determinadas por diferentes constantes k&amp;lt;sub&amp;gt;i&amp;lt;/sub&amp;gt; que determinarán la velocidad de cada reacción. Las tres reacciones son:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A+X→k_1*2*X\\&lt;br /&gt;
X+Y→k_2*2*Y\\&lt;br /&gt;
Y→k_3*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para determinar las ecuaciones diferenciales correspondientes a la velocidad de formación (o descomposición) de cada sustancia, se hace un breve estudio de cada una de ellas. En nuestro caso, se ha seguido el orden contrario, y se empieza por la última de ellas para acabar con la primera. Además, es necesario utilizar el Principio de conservación de masas para poder determinar las cuatro ecuaciones correspondientes a los cuatro compuestos presentes. El análisis seguido es el siguiente:&lt;br /&gt;
* '''Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B'''. A partir de Y se formará B, regido por una constante k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;. Mediante dicha reacción se podrá definir una velocidad de transformación de B: '''B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''. &lt;br /&gt;
* '''X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y'''. En la formación de Y hay que tener en cuenta la parte proporcional a la descomposición de X (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'') y descontar la cantidad de Y que se descompone para la formación de B (''k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B''). Por tanto, la velocidad de transformación de Y será: '''Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''.&lt;br /&gt;
* '''A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X'''. La formación de X tiene una parte proporcional a la descomposición de A (''k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X''), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y''). Así pues, se obtendrá una velocidad de transformación regida por '''X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'''.&lt;br /&gt;
* Derivado la ecuación correspondiente al '''Principio de conservación de masas''' (''A+X+Y+B=cte'') se obtiene la siguiente ecuación: ''A'+X'+Y'+B'=0''. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → '''A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X'''&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que en nuestro caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas arbitrariamente como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en una de las ecuaciones definidas por Lotka se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+X=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. Debido a esta relación, y a partir del estudio de las gráficas, se puede concluir que a medida que el valor de la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de ''A'' experimenta una desaparición prácticamente instantánea al inicio la reacción .&lt;br /&gt;
*El valor de ''B'' experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que podríamos afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene tanto las velocidades como los cambios prácticamente iguales. Para valores pequeños de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, como en el caso en el que su valor es 0.02 o incluso 0.1 (estudiado anteriormente), se puede apreciar una inestabilidad que comienza en torno a los 120 de los dos compuestos intermedios, X e Y. Esta inestabilidad se reduce conforme el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta, hasta hacerse inapreciable cuando la constante alcanza valores de 0.68 y superiores. Además, se observa que el tiempo en el que ocurre la totalidad de la reacción se ve reducido de forma directamente proporcional al valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, por lo que cuanto mayor sea dicho valor, menos tiempo necesita la reacción global para llevarse a cabo en su totalidad, es decir, que todo el compuesto ''A'' se transforme en compuesto ''B'', y los compuestos intermedios ''X'' e ''Y'' desaparezcan por completo.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39201</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39201"/>
				<updated>2017-04-28T08:25:49Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la '''Ley de acción de masas''', que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial para ''y'' se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen las variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez, también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que sustituimos los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la fórmula anteriormente demostrada, se obtiene que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la anterior ecuación diferencial se puede formar el PVI asociado:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
A partir de los datos numéricos, A=2 y B=0.05 mol/L, y despejando en las ecuaciones anteriores, se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ello, se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler, cuyo esquema numérico se indica a continuación:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Métodos del Trapecio y Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),yt(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% Metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentará hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
[[File:Corteeulerrunge.jpg|right|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema se procede al cálculo correspondiente, representando gráficamente ambos métodos, donde se puede observar una variación de ambos. El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,1.02), como se puede observar en la gráfica. Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4. Sin embargo, esta diferencia entre ambas gráficas queda reducida a medida que aumentamos el paso h.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
La reacción global queda definida por tres reacciones intermedias que suceden de forma consecutiva. Cabe destacar, por un lado, el hecho de que dos de ellas son autocatalíticas y, por otro lado, que todas ellas están determinadas por diferentes constantes k&amp;lt;sub&amp;gt;i&amp;lt;/sub&amp;gt; que determinarán la velocidad de cada reacción. Las tres reacciones son:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A+X→k_1*2*X\\&lt;br /&gt;
X+Y→k_2*2*Y\\&lt;br /&gt;
Y→k_3*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para determinar las ecuaciones diferenciales correspondientes a la velocidad de formación (o descomposición) de cada sustancia, se hace un breve estudio de cada una de ellas. En nuestro caso, seguiremos el orden contrario, y empezaremos por la última de ellas para acabar con la primera. Además, es necesario utilizar el Principio de conservación de masas para poder determinar las cuatro ecuaciones correspondientes a los cuatro compuestos presentes. El análisis seguido es el siguiente:&lt;br /&gt;
* '''Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B'''. A partir de Y se formará B, regido por una constante k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;. Mediante dicha reacción se podrá definir una velocidad de transformación de B: '''B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''. &lt;br /&gt;
* '''X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y'''. En la formación de Y hay que tener en cuenta la parte proporcional a la descomposición de X (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'') y descontar la cantidad de Y que se descompone para la formación de B (''k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B''). Por tanto, la velocidad de transformación de Y será: '''Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''.&lt;br /&gt;
* '''A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X'''. La formación de X tiene una parte proporcional a la descomposición de A (''k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X''), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y''). Así pues, se obtendrá una velocidad de transformación regida por '''X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'''.&lt;br /&gt;
* Derivado la ecuación correspondiente al '''Principio de conservación de masas''' (''A+X+Y+B=cte'') se obtiene la siguiente ecuación: ''A'+X'+Y'+B'=0''. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → '''A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X'''&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que en nuestro caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas arbitrariamente como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en una de las ecuaciones definidas por Lotka se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+X=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. Debido a esta relación, y a partir del estudio de las gráficas, se puede concluir que a medida que el valor de la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de ''A'' experimenta una desaparición prácticamente instantánea al inicio la reacción .&lt;br /&gt;
*El valor de ''B'' experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que podríamos afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene tanto las velocidades como los cambios prácticamente iguales. Para valores pequeños de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, como en el caso en el que su valor es 0.02 o incluso 0.1 (estudiado anteriormente), se puede apreciar una inestabilidad que comienza en torno a los 120 de los dos compuestos intermedios, X e Y. Esta inestabilidad se reduce conforme el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta, hasta hacerse inapreciable cuando la constante alcanza valores de 0.68 y superiores. Además, se observa que el tiempo en el que ocurre la totalidad de la reacción se ve reducido de forma directamente proporcional al valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, por lo que cuanto mayor sea dicho valor, menos tiempo necesita la reacción global para llevarse a cabo en su totalidad, es decir, que todo el compuesto ''A'' se transforme en compuesto ''B'', y los compuestos intermedios ''X'' e ''Y'' desaparezcan por completo.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39196</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39196"/>
				<updated>2017-04-28T08:20:44Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la '''Ley de acción de masas''', que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial para ''y'' se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen las variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez, también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que sustituimos los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la fórmula anteriormente demostrada, se obtiene que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la anterior ecuación diferencial se puede formar el PVI asociado:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
A partir de los datos numéricos, A=2 y B=0.05 mol/L, y despejando en las ecuaciones anteriores, se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ello, se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler, cuyo esquema numérico se indica a continuación:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Métodos del Trapecio y Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),yt(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% Metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentará hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
[[File:Corteeulerrunge.jpg|right|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema se procede al cálculo correspondiente, representando gráficamente ambos métodos, donde se puede observar una variación de ambos. El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,0.88), como se puede observar en la gráfica. Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
La reacción global queda definida por tres reacciones intermedias que suceden de forma consecutiva. Cabe destacar, por un lado, el hecho de que dos de ellas son autocatalíticas y, por otro lado, que todas ellas están determinadas por diferentes constantes k&amp;lt;sub&amp;gt;i&amp;lt;/sub&amp;gt; que determinarán la velocidad de cada reacción. Las tres reacciones son:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A+X→k_1*2*X\\&lt;br /&gt;
X+Y→k_2*2*Y\\&lt;br /&gt;
Y→k_3*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para determinar las ecuaciones diferenciales correspondientes a la velocidad de formación (o descomposición) de cada sustancia, se hace un breve estudio de cada una de ellas. En nuestro caso, seguiremos el orden contrario, y empezaremos por la última de ellas para acabar con la primera. Además, es necesario utilizar el Principio de conservación de masas para poder determinar las cuatro ecuaciones correspondientes a los cuatro compuestos presentes. El análisis seguido es el siguiente:&lt;br /&gt;
* '''Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B'''. A partir de Y se formará B, regido por una constante k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;. Mediante dicha reacción se podrá definir una velocidad de transformación de B: '''B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''. &lt;br /&gt;
* '''X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y'''. En la formación de Y hay que tener en cuenta la parte proporcional a la descomposición de X (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'') y descontar la cantidad de Y que se descompone para la formación de B (''k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B''). Por tanto, la velocidad de transformación de Y será: '''Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''.&lt;br /&gt;
* '''A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X'''. La formación de X tiene una parte proporcional a la descomposición de A (''k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X''), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y''). Así pues, se obtendrá una velocidad de transformación regida por '''X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'''.&lt;br /&gt;
* Derivado la ecuación correspondiente al '''Principio de conservación de masas''' (''A+X+Y+B=cte'') se obtiene la siguiente ecuación: ''A'+X'+Y'+B'=0''. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → '''A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X'''&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que en nuestro caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas arbitrariamente como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en una de las ecuaciones definidas por Lotka se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+X=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. Debido a esta relación, y a partir del estudio de las gráficas, se puede concluir que a medida que el valor de la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de ''A'' experimenta una desaparición prácticamente instantánea al inicio la reacción .&lt;br /&gt;
*El valor de ''B'' experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que podríamos afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene tanto las velocidades como los cambios prácticamente iguales. Para valores pequeños de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, como en el caso en el que su valor es 0.02 o incluso 0.1 (estudiado anteriormente), se puede apreciar una inestabilidad que comienza en torno a los 120 de los dos compuestos intermedios, X e Y. Esta inestabilidad se reduce conforme el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta, hasta hacerse inapreciable cuando la constante alcanza valores de 0.68 y superiores. Además, se observa que el tiempo en el que ocurre la totalidad de la reacción se ve reducido de forma directamente proporcional al valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, por lo que cuanto mayor sea dicho valor, menos tiempo necesita la reacción global para llevarse a cabo en su totalidad, es decir, que todo el compuesto ''A'' se transforme en compuesto ''B'', y los compuestos intermedios ''X'' e ''Y'' desaparezcan por completo.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Corteeulerrunge.jpg&amp;diff=39194</id>
		<title>Archivo:Corteeulerrunge.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Corteeulerrunge.jpg&amp;diff=39194"/>
				<updated>2017-04-28T08:19:37Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39193</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39193"/>
				<updated>2017-04-28T08:19:14Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la '''Ley de acción de masas''', que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial para ''y'' se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen las variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez, también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que sustituimos los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la fórmula anteriormente demostrada, se obtiene que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la anterior ecuación diferencial se puede formar el PVI asociado:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
A partir de los datos numéricos, A=2 y B=0.05 mol/L, y despejando en las ecuaciones anteriores, se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ello, se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler, cuyo esquema numérico se indica a continuación:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Métodos del Trapecio y Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),yt(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% Metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentará hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema se procede al cálculo correspondiente, representando gráficamente ambos métodos, donde se puede observar una variación de ambos. El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,0.88), como se puede observar en la gráfica. Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
La reacción global queda definida por tres reacciones intermedias que suceden de forma consecutiva. Cabe destacar, por un lado, el hecho de que dos de ellas son autocatalíticas y, por otro lado, que todas ellas están determinadas por diferentes constantes k&amp;lt;sub&amp;gt;i&amp;lt;/sub&amp;gt; que determinarán la velocidad de cada reacción. Las tres reacciones son:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A+X→k_1*2*X\\&lt;br /&gt;
X+Y→k_2*2*Y\\&lt;br /&gt;
Y→k_3*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para determinar las ecuaciones diferenciales correspondientes a la velocidad de formación (o descomposición) de cada sustancia, se hace un breve estudio de cada una de ellas. En nuestro caso, seguiremos el orden contrario, y empezaremos por la última de ellas para acabar con la primera. Además, es necesario utilizar el Principio de conservación de masas para poder determinar las cuatro ecuaciones correspondientes a los cuatro compuestos presentes. El análisis seguido es el siguiente:&lt;br /&gt;
* '''Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B'''. A partir de Y se formará B, regido por una constante k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;. Mediante dicha reacción se podrá definir una velocidad de transformación de B: '''B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''. &lt;br /&gt;
* '''X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y'''. En la formación de Y hay que tener en cuenta la parte proporcional a la descomposición de X (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'') y descontar la cantidad de Y que se descompone para la formación de B (''k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B''). Por tanto, la velocidad de transformación de Y será: '''Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''.&lt;br /&gt;
* '''A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X'''. La formación de X tiene una parte proporcional a la descomposición de A (''k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X''), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y''). Así pues, se obtendrá una velocidad de transformación regida por '''X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'''.&lt;br /&gt;
* Derivado la ecuación correspondiente al '''Principio de conservación de masas''' (''A+X+Y+B=cte'') se obtiene la siguiente ecuación: ''A'+X'+Y'+B'=0''. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → '''A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X'''&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que en nuestro caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas arbitrariamente como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en una de las ecuaciones definidas por Lotka se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+X=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. Debido a esta relación, y a partir del estudio de las gráficas, se puede concluir que a medida que el valor de la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de ''A'' experimenta una desaparición prácticamente instantánea al inicio la reacción .&lt;br /&gt;
*El valor de ''B'' experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que podríamos afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene tanto las velocidades como los cambios prácticamente iguales. Para valores pequeños de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, como en el caso en el que su valor es 0.02 o incluso 0.1 (estudiado anteriormente), se puede apreciar una inestabilidad que comienza en torno a los 120 de los dos compuestos intermedios, X e Y. Esta inestabilidad se reduce conforme el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta, hasta hacerse inapreciable cuando la constante alcanza valores de 0.68 y superiores. Además, se observa que el tiempo en el que ocurre la totalidad de la reacción se ve reducido de forma directamente proporcional al valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, por lo que cuanto mayor sea dicho valor, menos tiempo necesita la reacción global para llevarse a cabo en su totalidad, es decir, que todo el compuesto ''A'' se transforme en compuesto ''B'', y los compuestos intermedios ''X'' e ''Y'' desaparezcan por completo.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39185</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39185"/>
				<updated>2017-04-28T08:06:44Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la '''Ley de acción de masas''', que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial para ''y'' se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen las variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez, también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que sustituimos los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la fórmula anteriormente demostrada, se obtiene que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la anterior ecuación diferencial se puede formar el PVI asociado:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
A partir de los datos numéricos, A=2 y B=0.05 mol/L, y despejando en las ecuaciones anteriores, se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ello, se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler, cuyo esquema numérico se indica a continuación:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Métodos del Trapecio y Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),y(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentará hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema se procede al cálculo correspondiente, representando gráficamente ambos métodos, donde se puede observar una variación de ambos. El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,0.88). Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
La reacción global queda definida por tres reacciones intermedias que suceden de forma consecutiva. Cabe destacar, por un lado, el hecho de que dos de ellas son autocatalíticas y, por otro lado, que todas ellas están determinadas por diferentes constantes k&amp;lt;sub&amp;gt;i&amp;lt;/sub&amp;gt; que determinarán la velocidad de cada reacción. Las tres reacciones son:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A+X→k_1*2*X\\&lt;br /&gt;
X+Y→k_2*2*Y\\&lt;br /&gt;
Y→k_3*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para determinar las ecuaciones diferenciales correspondientes a la velocidad de formación (o descomposición) de cada sustancia, se hace un breve estudio de cada una de ellas. En nuestro caso, seguiremos el orden contrario, y empezaremos por la última de ellas para acabar con la primera. Además, es necesario utilizar el Principio de conservación de masas para poder determinar las cuatro ecuaciones correspondientes a los cuatro compuestos presentes. El análisis seguido es el siguiente:&lt;br /&gt;
* '''Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B'''. A partir de Y se formará B, regido por una constante k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;. Mediante dicha reacción se podrá definir una velocidad de transformación de B: '''B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''. &lt;br /&gt;
* '''X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y'''. En la formación de Y hay que tener en cuenta la parte proporcional a la descomposición de X (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'') y descontar la cantidad de Y que se descompone para la formación de B (''k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B''). Por tanto, la velocidad de transformación de Y será: '''Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''.&lt;br /&gt;
* '''A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X'''. La formación de X tiene una parte proporcional a la descomposición de A (''k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X''), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y''). Así pues, se obtendrá una velocidad de transformación regida por '''X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'''.&lt;br /&gt;
* Derivado la ecuación correspondiente al '''Principio de conservación de masas''' (''A+X+Y+B=cte'') se obtiene la siguiente ecuación: ''A'+X'+Y'+B'=0''. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → '''A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X'''&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que en nuestro caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas arbitrariamente como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en una de las ecuaciones definidas por Lotka se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+X=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. Debido a esta relación, y a partir del estudio de las gráficas, se puede concluir que a medida que el valor de la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de ''A'' experimenta una desaparición prácticamente instantánea al inicio la reacción .&lt;br /&gt;
*El valor de ''B'' experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que podríamos afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene tanto las velocidades como los cambios prácticamente iguales. Para valores pequeños de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, como en el caso en el que su valor es 0.02 o incluso 0.1 (estudiado anteriormente), se puede apreciar una inestabilidad que comienza en torno a los 120 de los dos compuestos intermedios, X e Y. Esta inestabilidad se reduce conforme el valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta, hasta hacerse inapreciable cuando la constante alcanza valores de 0.68 y superiores. Además, se observa que el tiempo en el que ocurre la totalidad de la reacción se ve reducido de forma directamente proporcional al valor de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;, por lo que cuanto mayor sea dicho valor, menos tiempo necesita la reacción global para llevarse a cabo en su totalidad, es decir, que todo el compuesto ''A'' se transforme en compuesto ''B'', y los compuestos intermedios ''X'' e ''Y'' desaparezcan por completo.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39178</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39178"/>
				<updated>2017-04-28T07:56:31Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la '''Ley de acción de masas''', que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial para ''y'' se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen las variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez, también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que sustituimos los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la fórmula anteriormente demostrada, se obtiene que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la anterior ecuación diferencial se puede formar el PVI asociado:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
A partir de los datos numéricos, A=2 y B=0.05 mol/L, y despejando en las ecuaciones anteriores, se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ello, se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler, cuyo esquema numérico se indica a continuación:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Métodos del Trapecio y Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),y(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentará hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema se procede al cálculo correspondiente, representando gráficamente ambos métodos, donde se puede observar una variación de ambos. El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,0.88). Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
La reacción global queda definida por tres reacciones intermedias que suceden de forma consecutiva. Cabe destacar, por un lado, el hecho de que dos de ellas son autocatalíticas y, por otro lado, que todas ellas están determinadas por diferentes constantes k&amp;lt;sub&amp;gt;i&amp;lt;/sub&amp;gt; que determinarán la velocidad de cada reacción. Las tres reacciones son:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A+X→k_1*2*X\\&lt;br /&gt;
X+Y→k_2*2*Y\\&lt;br /&gt;
Y→k_3*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para determinar las ecuaciones diferenciales correspondientes a la velocidad de formación (o descomposición) de cada sustancia, se hace un breve estudio de cada una de ellas. En nuestro caso, seguiremos el orden contrario, y empezaremos por la última de ellas para acabar con la primera. Además, es necesario utilizar el Principio de conservación de masas para poder determinar las cuatro ecuaciones correspondientes a los cuatro compuestos presentes. El análisis seguido es el siguiente:&lt;br /&gt;
* '''Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B'''. A partir de Y se formará B, regido por una constante k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;. Mediante dicha reacción se podrá definir una velocidad de transformación de B: '''B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''. &lt;br /&gt;
* '''X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y'''. En la formación de Y hay que tener en cuenta la parte proporcional a la descomposición de X (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'') y descontar la cantidad de Y que se descompone para la formación de B (''k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B''). Por tanto, la velocidad de transformación de Y será: '''Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y'''.&lt;br /&gt;
* '''A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X'''. La formación de X tiene una parte proporcional a la descomposición de A (''k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X''), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y (''k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y''). Así pues, se obtendrá una velocidad de transformación regida por '''X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y'''.&lt;br /&gt;
* Derivado la ecuación correspondiente al '''Principio de conservación de masas''' (''A+X+Y+B=cte'') se obtiene la siguiente ecuación: ''A'+X'+Y'+B'=0''. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → '''A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X'''&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que en nuestro caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas arbitrariamente como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en una de las ecuaciones definidas por Lotka se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+X=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. Debido a esta relación, y a partir del estudio de las gráficas, se puede concluir que a medida que el valor de la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; aumenta:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de ''A'' experimenta una desaparición prácticamente instantánea al inicio la reacción .&lt;br /&gt;
*El valor de ''B'' experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que podríamos afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene, tanto las velocidades como los cambios, prácticamente iguales.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39176</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39176"/>
				<updated>2017-04-28T07:42:29Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la '''Ley de acción de masas''', que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial para ''y'' se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen las variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez, también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que sustituimos los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustituyendo en la fórmula anteriormente demostrada, se obtiene que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la anterior ecuación diferencial se puede formar el PVI asociado:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
A partir de los datos numéricos, A=2 y B=0.05 mol/L, y despejando en las ecuaciones anteriores, se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ello, se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler, cuyo esquema numérico se indica a continuación:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Métodos del Trapecio y Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),y(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentará hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema se procede al cálculo correspondiente, representando gráficamente ambos métodos, donde se puede observar una variación de ambos. El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,0.88). Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
La reacción global queda definida por tres reacciones intermedias que suceden de forma consecutiva. Cabe destacar, por un lado, el hecho de que dos de ellas son autocatalíticas y, por otro lado, que todas ellas están determinadas por diferentes constantes k&amp;lt;sub&amp;gt;i&amp;lt;/sub&amp;gt; que determinarán la velocidad de cada reacción. Las tres reacciones son:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A+X→k_1*2*X//&lt;br /&gt;
X+Y→k_2*2*Y//&lt;br /&gt;
Y→k_3*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
* Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B. A partir de Y se formará B, mediante el cual se podrá definir una velocidad de transformación B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y. &lt;br /&gt;
* X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y. En la formación de Y hay que tener en cuenta la parte proporcional a X(k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y) y descontar la parte que se descompone para la formación de B(k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B). Por tanto, la velocidad de transformación será Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y.&lt;br /&gt;
* A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. La formación de X tiene una parte proporcional a la descomposición de A(k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y(k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y). Así pues, se obtendrá una velocidad de transformación regida por X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y.&lt;br /&gt;
* Derivado la ecuación correspondiente al '''Principio de conservación de masas''' (A+X+Y+B=cte) se obtiene la siguiente ecuación: A'+X'+Y'+B'=0. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que en nuestro caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto, se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en las ecuaciones aportadas por Lotka, en concreto una de ellas, se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+x=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*x. Debido a esta relación, y según las gráficas, se puede concluir que cuanto mayor sea la constante:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de A experimenta una desaparición instantánea al inicio la reacción .&lt;br /&gt;
*El valor de B experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que podríamos afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene, tanto las velocidades como los cambios, prácticamente iguales.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39097</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39097"/>
				<updated>2017-04-27T17:33:38Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la Ley de acción de masas, que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial para ''y'' se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen la variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que sustituimos los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustiyendo en la fórmula anteriormente demostrada, obtenemos que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la cual se forma el PVI correspondiente:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
Según los datos teóricos, A=2 y B=0.05 mol/L, despejando en las ecuaciones anteriores se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
Para comprobar que el PVI tiene solución única se aplica el Teorema de Picard, siendo:&lt;br /&gt;
                                               f=-k*y^2+k*y*cte&lt;br /&gt;
Al ser f una función polinómica está definida y es continua en RxR.&lt;br /&gt;
A continuación, se calcula la derivada parcial de f con respecto a y, dando:&lt;br /&gt;
                                               f'=-2*k*y+k*cte&lt;br /&gt;
Análogamente, al ser la derivada una función polinómica, está definida y es continua en RxR, concluyendo, así, que el PVI tiene solución y es única.&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ellos se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Método del Trapecio y Runge-kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),y(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentara hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema , se procede al cálculo correspondiente , representando gráficamente ambos métodos , donde se puede observar una variación de ambos: El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,0.88) . Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
Dadas las ecuaciones:&lt;br /&gt;
* Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B. A partir de Y se formará B, mediante el cual se podrá definir una velocidad de transformación B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y. &lt;br /&gt;
* X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y. En la formación de Y hay que tener en cuenta la parte proporcional a X(k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y) y descontar la parte que se descompone para la formación de B(k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B). Por tanto, la velocidad de transformación será Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y.&lt;br /&gt;
* A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. La formación de X tiene una parte proporcional a la descomposición de A(k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y(k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y). Así pues, se obtendrá una velocidad de transformación regida por X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y.&lt;br /&gt;
* Derivado la ecuación correspondiente al Principio de conservación de masas (A+X+Y+B=cte) se obtiene la siguiente ecuación: A'+X'+Y'+B'=0. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que en nuestro caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto, se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en las ecuaciones aportadas por Lotka, en concreto una de ellas, se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+x=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*x. Debido a esta relación, y según las gráficas, se puede concluir que cuanto mayor sea la constante:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de A experimenta una desaparición instantánea al inicio la reacción .&lt;br /&gt;
*El valor de B experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que podríamos afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene, tanto las velocidades como los cambios, prácticamente iguales.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39091</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=39091"/>
				<updated>2017-04-27T17:23:25Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la Ley de acción de masas, que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial para ''y'' se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen la variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que sustituimos los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustiyendo en la fórmula anteriormente demostrada, obtenemos que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la cual se forma el PVI correspondiente:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
Según los datos teóricos, A=2 y B=0.05 mol/L, despejando en las ecuaciones anteriores se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ellos se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Método del Trapecio y Runge-kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),y(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentara hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema , se procede al cálculo correspondiente , representando gráficamente ambos métodos , donde se puede observar una variación de ambos: El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,0.88) . Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
Dadas las ecuaciones:&lt;br /&gt;
* Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B. A partir de Y se formará B, mediante el cual se podrá definir una velocidad de transformación B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y. &lt;br /&gt;
* X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y. En la formación de Y hay que tener en cuenta la parte proporcional a X(k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y) y descontar la parte que se descompone para la formación de B(k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B). Por tanto, la velocidad de transformación será Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y.&lt;br /&gt;
* A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. La formación de X tiene una parte proporcional a la descomposición de A(k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y(k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y). Así pues, se obtendrá una velocidad de transformación regida por X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y.&lt;br /&gt;
* Derivado la ecuación correspondiente al Principio de conservación de masas (A+X+Y+B=cte) se obtiene la siguiente ecuación: A'+X'+Y'+B'=0. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que en nuestro caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto, se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en las ecuaciones aportadas por Lotka, en concreto una de ellas, se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+x=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*x. Debido a esta relación, y según las gráficas, se puede concluir que cuanto mayor sea la constante:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de A experimenta una desaparición instantánea al inicio la reacción .&lt;br /&gt;
*El valor de B experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que podríamos afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene, tanto las velocidades como los cambios, prácticamente iguales.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=38982</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=38982"/>
				<updated>2017-04-27T09:13:49Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la Ley de acción de masas, que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial para ''y'' se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen la variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que sustituimos los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustiyendo en la fórmula anteriormente demostrada, obtenemos que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la cual se forma el PVI correspondiente:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
Según los datos teóricos, A=2 y B=0.05 mol/L, despejando en las ecuaciones anteriores se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ellos se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Método del Trapecio y Runge-kutta:&lt;br /&gt;
&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases}  y_0 \\ y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4) \\ K_1=f(t_n,y_n) \\ K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h) \\ K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h) \\ K_4=f(t_n+h,y_n+K_3*h)\\ \end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),y(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentara hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema , se procede al cálculo correspondiente , representando gráficamente ambos métodos , donde se puede observar una variación de ambos: El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,0.88) . Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4.&lt;br /&gt;
&lt;br /&gt;
== ''Reacciones consecutivas de Lotka'' ==&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
Dadas las ecuaciones:&lt;br /&gt;
* Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B. A partir de Y se formará B, mediante el cual se podrá definir una velocidad de transformación B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y. &lt;br /&gt;
* X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y. En la formación de Y hay que tener en cuenta la parte proporcional a X(k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y) y descontar la parte que se descompone para la formación de B(k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B). Por tanto, la velocidad de transformación será Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y.&lt;br /&gt;
* A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. La formación de X tiene una parte proporcional a la descomposición de A(k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y(k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y). Así pues, se obtendrá una velocidad de transformación regida por X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y.&lt;br /&gt;
* Derivado la ecuación correspondiente al Principio de conservación de masas (A+X+Y+B=cte) se obtiene la siguiente ecuación: A'+X'+Y'+B'=0. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que en nuestro caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto, se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en las ecuaciones aportadas por Lotka, en concreto una de ellas, se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+x=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*x. Debido a esta relación, y según las gráficas, se puede concluir que cuanto mayor sea la constante:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de A experimenta una desaparición instantánea al inicio la reacción .&lt;br /&gt;
*El valor de B experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que podríamos afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene, tanto las velocidades como los cambios, prácticamente iguales.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=38981</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=38981"/>
				<updated>2017-04-27T09:08:02Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la Ley de acción de masas, que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''Principio de conservación de la materia''', por el cual ''&amp;quot;la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo&amp;quot;''. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial para ''y'' se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
x=A+B\\&lt;br /&gt;
y=2*B&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen la variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-\frac{y}{2}\\&lt;br /&gt;
B=\frac{y}{2}    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                                  &lt;br /&gt;
En base al '''Principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=k*A*B, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=k*A*B en la que sustituimos los valores de los reactivos previamente determinados: &lt;br /&gt;
     y’=k*[x-y/2]*[y/2] → y'=k*[x-y/2]*y → y'=k*[cte-y-y/2]*y → y'=k*[cte-3/2*y]*y → y'=3/2*k*[2/3*cte-y]*y → y'=k*[cte-y]*y → y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: &lt;br /&gt;
                                                      x=cte-y&lt;br /&gt;
&lt;br /&gt;
Y sustiyendo en la fórmula anteriormente demostrada, obtenemos que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
&lt;br /&gt;
A partir de la cual se forma el PVI correspondiente:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y_0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
Según los datos teóricos, A=2 y B=0.05 mol/L, despejando en las ecuaciones anteriores se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ellos se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Método del Trapecio y Runge-kutta:&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
\[ PVI = \begin{cases} y_0\\y_{n+1} = y_n + \frac{h}{6}*(K_1+2*K_2+2*K_3+k_4)\\K_1=f(t_n,y_n)\\K_2=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_1*h)\\K_3=f(t_n+\frac{1}{2}*h,y_n+\frac{1}{2}*K_2*h)\\K_4=f(t_n+h,y_n+K_3*h)\end{cases}\quad \]&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),y(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentara hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema , se procede al cálculo correspondiente , representando gráficamente ambos métodos , donde se puede observar una variación de ambos: El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,0.88) . Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4.&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
Dadas las ecuaciones:&lt;br /&gt;
* Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B. A partir de Y se formará B, mediante el cual se podrá definir una velocidad de transformación B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y. &lt;br /&gt;
* X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y. En la formación de Y hay que tener en cuenta la parte proporcional a X(k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y) y descontar la parte que se descompone para la formación de B(k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B). Por tanto, la velocidad de transformación será Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y.&lt;br /&gt;
* A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. La formación de X tiene una parte proporcional a la descomposición de A(k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y(k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y). Así pues, se obtendrá una velocidad de transformación regida por X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y.&lt;br /&gt;
* Derivado la ecuación correspondiente al Principio de conservación de masas (A+X+Y+B=cte) se obtiene la siguiente ecuación: A'+X'+Y'+B'=0. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que en nuestro caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
\[ PVI = \begin{cases} X'=k_1*A*X-k_2*X*Y\\Y'=k_2*X*Y-k_3*Y\\B'=k_3*Y\\A'=-k_1*A*X\\X(0)=X_0\\Y(0)=Y_0\\B(0)=B_0\\A(0)=A_0\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=4.7, B&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2, X&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=2 e Y&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt; en el intervalo (0.002-2). A raíz de esto, se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en las ecuaciones aportadas por Lotka, en concreto una de ellas, se puede observar la presencia de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;: A+x=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*x. Debido a esta relación, y según las gráficas, se puede concluir que cuanto mayor sea la constante:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''X'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''Y'' experimenta una reacción muy parecida a la de ''X'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de A experimenta una desaparición instantánea al inicio la reacción .&lt;br /&gt;
*El valor de B experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que podríamos afirmar que a partir de k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;= 0.68 la reacción mantiene, tanto las velocidades como los cambios, prácticamente iguales.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=38978</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=38978"/>
				<updated>2017-04-27T08:50:44Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre sí mismo. En este caso, se estudiará una reacción regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes:&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la Ley de acción de masas, que defiende que ''&amp;quot;La velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B&amp;quot;''. Para desarrollar el análisis, es necesario apoyarse en el '''principio de conservación de la materia''', por el cual la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial para ''y'' se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
                                                         x=A+B          &lt;br /&gt;
                                                         y=2B&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen la variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-y/2\\&lt;br /&gt;
B=y/2    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                         &lt;br /&gt;
                                                         &lt;br /&gt;
En base al '''principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=kAB, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=kAB en la que sustituimos los valores de los reactivos previamente determinados: &lt;br /&gt;
       y’=k*[x-y/2]*[y/2]; y'=k*[x-y/2]*y; y'=k*[cte-y-y/2]*y; y'=k*[cte-3/2*y]*y; y'=3/2*k*[2/3*cte-y]*y; y'=k*[cte-y]*y; y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: x=cte-y.&lt;br /&gt;
&lt;br /&gt;
Y sustiyendo en la fórmula anteriormente demostrada, obtenemos que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
A partir de la cual se forma el PVI correspondiente:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
Según los datos teóricos, A=2 y B=0.05 mol/L, despejando en las ecuaciones anteriores se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ellos se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Método del Trapecio y Runge-kutta:&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),y(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentara hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema , se procede al cálculo correspondiente , representando gráficamente ambos métodos , donde se puede observar una variación de ambos: El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,0.88) . Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4.&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
Dadas las ecuaciones:&lt;br /&gt;
* Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B. A partir de Y se formará B, mediante el cual se podrá definir una velocidad de transformación B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y. &lt;br /&gt;
* X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y. En la formación de Y hay que tener en cuenta la parte proporcional a X(k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y) y descontar la parte que se descompone para la formación de B(k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B). Por tanto, la velocidad de transformación será Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y.&lt;br /&gt;
* A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. La formación de X tiene una parte proporcional a la descomposición de A(k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y(k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y). Así pues, se obtendrá una velocidad de transformación regida por X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y.&lt;br /&gt;
* Derivado la ecuación correspondiente al Principio de conservación de masas (A+X+Y+B=cte) se obtiene la siguiente ecuación: A'+X'+Y'+B'=0. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A:  A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x → A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que en nuestro caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
X'=k1*A*X-k2*X*Y\\&lt;br /&gt;
Y'=k2*X*Y-k3*Y\\&lt;br /&gt;
B'=k3*Y\\&lt;br /&gt;
A'=-k1*A*X\\&lt;br /&gt;
X(0)=X0\\&lt;br /&gt;
Y(0)=Y0\\&lt;br /&gt;
B(0)=B0\\&lt;br /&gt;
A(0)=A0\\&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Este PVI queda a continuación resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son: A0=4.7, B0=2, X0=2 e Y0=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|650px|caption]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|left|border|500px|caption]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
A continuación se procede a hacer un breve estudio comparativo de la reacción que tiene lugar cuando, manteniendo las ecuaciones que rigen las reacciones, se cambia el valor que toma la constante k1 y se mantienen iguales el resto de valores. Para este estudio se han tomado cuatro valores de k1 en el intervalo (0.02,2), y se ha resuelto el PVI numéricamente mediante el método de Heun.&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La resolución de este problema se caracteriza por los distintos valores que toma k1 en el intervalo (0.002-2). A raíz de esto, se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en las ecuaciones aportadas por Lotka, en concreto una de ellas, se puede observar la presencia de k1: A+x=k1*2*x. Debido a esta relación, y según las gráficas, se puede concluir que cuanto mayor sea la constante:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''x'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''y'' experimenta una reacción muy parecida a la de ''x'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de A experimenta una desaparición instantánea al inicio la reacción .&lt;br /&gt;
*El valor de B experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que podríamos afirmar que a partir de k1= 0.68 la reacción mantiene, tanto las velocidades como los cambios, prácticamente iguales.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=38976</id>
		<title>Reaccion Autocatalisis Grupo 2B</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Reaccion_Autocatalisis_Grupo_2B&amp;diff=38976"/>
				<updated>2017-04-27T08:32:16Z</updated>
		
		<summary type="html">&lt;p&gt;Pablo Retamar: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Reacción con autocatálisis. Grupo 2-B | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED16/17|Curso 2016-17]] | Gonzalo Royo Navajas, Marta Caracuel Mateos, Carlota Sánchez Martínez, Abid Al-Akioui Sanz, Alejandro Prieto Martínez, Pablo Retamar Leboutet }}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferenciales]]&lt;br /&gt;
[[Categoría:ED16/17]]&lt;br /&gt;
[[Categoría:Trabajos 2016-17]]&lt;br /&gt;
&lt;br /&gt;
== ''INTRODUCCIÓN'' ==&lt;br /&gt;
Una reacción de autocatálisis es un proceso mediante el cual un compuesto químico induce y controla una reacción química sobre si mismo. En este caso, se estudiará una reacción, regida por la constante k, bimolecular e irreversible, en la cual se suponen unos reactivos A y B que presentan un volumen y una temperatura constantes.&lt;br /&gt;
&lt;br /&gt;
                            				A+B → C&lt;br /&gt;
&lt;br /&gt;
Dichas condiciones satisfacen la ley de acción de masas, es decir; la velocidad de la reacción en cuestión será proporcional al producto de las concentraciones de A y B. Para desarrollar el análisis, es necesario apoyarse en el '''principio de conservación de la materia''', por el cual la suma de la masa de los reactivos y la de los productos se mantendrá constante a lo largo del tiempo. Así pues, se obtendrá un tercer compuesto que actuará como producto:  &lt;br /&gt;
&lt;br /&gt;
                                                       A+B → k * 2B&lt;br /&gt;
&lt;br /&gt;
La resolución de la ecuación diferencial para ''y'' se apoya en las dos leyes mencionadas con anterioridad. De esta forma, es posible determinar las siguientes ecuaciones:&lt;br /&gt;
                                                         x=A+B          &lt;br /&gt;
                                                         y=2B&lt;br /&gt;
&lt;br /&gt;
Por el método de sustitución se deducen la variables dependientes A y B: &lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
A=x-y/2\\&lt;br /&gt;
B=y/2    &lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
                                                         &lt;br /&gt;
                                                         &lt;br /&gt;
En base al '''principio de conservación de la masa''', se conoce la igualdad:  &lt;br /&gt;
                                                       x+y=cte                                                                       (1)&lt;br /&gt;
&lt;br /&gt;
A su vez también se sabe que la velocidad es proporcional al producto de las concentraciones de los reactivos: v=kAB, por lo tanto, v=y’=-x’. &lt;br /&gt;
De esta forma se concluye que y’=kAB en la que sustituimos los valores de los reactivos previamente determinados: &lt;br /&gt;
       y’=k*[x-y/2]*[y/2]; y'=k*[x-y/2]*y; y'=k*[cte-y-y/2]*y; y'=k*[cte-3/2*y]*y; y'=3/2*k*[2/3*cte-y]*y; y'=k*[cte-y]*y; y'=k*x*y            &lt;br /&gt;
De (1) se puede afirmar que: x=cte-y.&lt;br /&gt;
&lt;br /&gt;
Y sustiyendo en la fórmula anteriormente demostrada, obtenemos que: &lt;br /&gt;
                                                  y'=-k*y^2+k*y*cte&lt;br /&gt;
A partir de la cual se forma el PVI correspondiente:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
y'=-k*y^2+k*y*cte\\&lt;br /&gt;
y(0)=y0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Para poder resolver el PVI se necesita calcular el valor de la cte:&lt;br /&gt;
                                                  x=A+B → A=x-y/2&lt;br /&gt;
                                                    y=2B → B=y/2&lt;br /&gt;
Según los datos teóricos, A=2 y B=0.05 mol/L, despejando en las ecuaciones anteriores se obtienen los valores de x e y, siendo 1.95 y 0.1 respectivamente. Por lo tanto: &lt;br /&gt;
                                               cte=x+y=1.95+0.1=2.05&lt;br /&gt;
&lt;br /&gt;
== ''Resolución del PVI'' ==&lt;br /&gt;
&lt;br /&gt;
La resolución del PVI se ha llevado acabo por diferentes métodos. Para ellos se ha escogido un paso h=0.1 y una k=1.4 mol/s. El estudio se realiza durante los primeros 10 segundos en los que se produce la reacción.&lt;br /&gt;
&lt;br /&gt;
Método de Euler:&lt;br /&gt;
&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + h*f(t_n,y_n) \\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
[[File:eulertrabajo1.jpg|right|border|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
% Vector con la solucion por aproximacion&lt;br /&gt;
y=zeros(size(t));&lt;br /&gt;
y(1)=B;&lt;br /&gt;
% Utilizamos el metodo de Euler &lt;br /&gt;
for i=1:N&lt;br /&gt;
    y(i+1)=y(i)+h*f(t(i),y(i));&lt;br /&gt;
end&lt;br /&gt;
x=c-y;&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y,'b')&lt;br /&gt;
plot(t,x,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos','Cantidad de reactivos')&lt;br /&gt;
xlabel('Tiempo (s)');&lt;br /&gt;
ylabel('Concentración (mol/L)');&lt;br /&gt;
% Calculamos el momento en el que coinciden las dos concentraciones:&lt;br /&gt;
for i=1:N&lt;br /&gt;
    if abs(y(i)-x(i))&amp;lt;0.01&lt;br /&gt;
        fprintf('Corte en punto (%.2f,%.2f)\n',t(i),y(i))&lt;br /&gt;
    end&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Método del Trapecio y Runge-kutta:&lt;br /&gt;
El método del Trapecio sigue siguiente método numérico:&lt;br /&gt;
\[ PVI = \begin{cases} y_0 \\ y_{n+1} = y_n + \frac{h}{2}*(f(t_n,y_n)+f(t_{n+1},y_{n+1}))\\ \end{cases}\quad \] &lt;br /&gt;
&lt;br /&gt;
Mientras que el de Runge-Kutta:&lt;br /&gt;
&lt;br /&gt;
[[File:trapeciorunge.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A=2;&lt;br /&gt;
B=0.05;&lt;br /&gt;
k=1.4;&lt;br /&gt;
h=0.1;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=10;&lt;br /&gt;
c=2.05;&lt;br /&gt;
&lt;br /&gt;
f=@(t,y)(-k*y^2+k*c*y);&lt;br /&gt;
&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Metodo del trapecio&lt;br /&gt;
yt=zeros(1,N+1);&lt;br /&gt;
yt(1)=B;&lt;br /&gt;
for i=1:N&lt;br /&gt;
    yt(i+1)=(-1+0.5*h*k*c+sqrt((1-0.5*h*k*c)^2+2*h*k*(yt(i)+0.5*h*f(t(i),y(i)))))/(h*k);&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
xt=c-yt;&lt;br /&gt;
&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yt,'k')&lt;br /&gt;
plot(t,xt,'b')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de productos (trapecio)','Cantidad de reactivos (trapecio)')&lt;br /&gt;
&lt;br /&gt;
% metodo de Runge-Kutta&lt;br /&gt;
yr=zeros(1,N+1);&lt;br /&gt;
yr(1)=B;&lt;br /&gt;
for j=1:N&lt;br /&gt;
    K1=f(t(j),yr(j));&lt;br /&gt;
    K2=f(t(j)+0.5*h,yr(j)+0.5*h*K1);&lt;br /&gt;
    K3=f(t(j)+0.5*h,yr(j)+0.5*h*K2);&lt;br /&gt;
    K4=f(t(j)+h,yr(j)+K3*h);&lt;br /&gt;
    yr(j+1)=yr(j)+h*(K1+2*K2+2*K3+K4)/6;&lt;br /&gt;
end&lt;br /&gt;
xr=c-yr;&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
figure&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,yr,'r')&lt;br /&gt;
plot(t,xr,'g')&lt;br /&gt;
hold off&lt;br /&gt;
legend('Cantidad de reactivos(Runge-kutta)','Cantidad de reactivos (Runge-kutta)')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Una vez realizados los programas y obtenidas las gráficas correspondientes,se puede concluir que la velocidad de la reacción aumentara hasta llegar a su máximo valor en la intersección de ambas curvas, disminuyendo dicha velocidad hasta agotar la concentración de los reactivos.&lt;br /&gt;
&lt;br /&gt;
Tras realizar el sistema , se procede al cálculo correspondiente , representando gráficamente ambos métodos , donde se puede observar una variación de ambos: El punto de cruce de las curvas es diferente en respectivos métodos, siendo en Euler (1.40,1.02) y en Runge Kutta 4 (1.30,0.88) . Se argumenta que el método Euler aporta un desarrollo del sistema más preciso debido a que este método es de orden 1, dando menos error que el método de Runge Kutta 4, de orden 4.&lt;br /&gt;
&lt;br /&gt;
Lotka propone un modelo de reacciones consecutivas en las que se consume A, y tras determinadas reacciones se produce B. En las reacciones intermedias se crean dos nuevos compuestos, X e Y que marcarán la velocidad de reacción. &lt;br /&gt;
&lt;br /&gt;
Dadas las ecuaciones:&lt;br /&gt;
* Y→k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B. A partir de Y se formará B, mediante el cual se podrá definir una velocidad de transformación B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y. &lt;br /&gt;
* X+Y→k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*2*Y. En la formación de Y hay que tener en cuenta la parte proporcional a X(k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y) y descontar la parte que se descompone para la formación de B(k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*B). Por tanto, la velocidad de transformación será Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*Y*X-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y.&lt;br /&gt;
* A+X→k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*2*X. La formación de X tiene una parte proporcional a la descomposición de A(k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X), al que se descuenta aquella parte de X que reacciona para formar el compuesto Y(k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y). Así pues, se obtendrá una velocidad de transformación regida por X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y.&lt;br /&gt;
* Derivado la Ley de conservación de masas (A+X+Y+B=cte) se obtiene la siguiente ecuación: A'+X'+Y'+B'=0. Sustituyendo los valores obtenidos anteriormente de X', Y' y B' se obtiene la ecuación diferencial que rige la velocidad de A: A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X&lt;br /&gt;
&lt;br /&gt;
Por lo tanto, a partir de este sistema de ecuaciones se puede formar el siguiente PVI asociado, al que hay que añadir las condiciones iniciales, que en nuestro caso son las concentraciones iniciales de cada compuesto:&lt;br /&gt;
&amp;lt;math&amp;gt; \left\{\begin{matrix}&lt;br /&gt;
X'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y&lt;br /&gt;
Y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*X*Y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y&lt;br /&gt;
B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*Y&lt;br /&gt;
A'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*X&lt;br /&gt;
X(0)=X0&lt;br /&gt;
Y(0)=Y0&lt;br /&gt;
B(0)=B0&lt;br /&gt;
A(0)=A0&lt;br /&gt;
\end{matrix}\right. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Las ecuaciones son las siguientes:&lt;br /&gt;
&lt;br /&gt;
                                                x'=k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y&lt;br /&gt;
                                                 y'=k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y&lt;br /&gt;
                                                    B'=k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y&lt;br /&gt;
                           A'+x'+y'+B'=0 → A'=-x'-y'-B'=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x+k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y-k&amp;lt;sub&amp;gt;2&amp;lt;/sub&amp;gt;*x*y+k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y-k&amp;lt;sub&amp;gt;3&amp;lt;/sub&amp;gt;*y=-k&amp;lt;sub&amp;gt;1&amp;lt;/sub&amp;gt;*A*x&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
A partir de este modelo se puede crear un PVI asociado al sistema de ecuaciones anteriormente descrito, que a continuación queda resuelto numéricamente mediante el método de Euler. Para ello, las condiciones iniciales elegidas son las cantidades iniciales de  los compuestos, que son: A0=4.7, B0=2, X0=2 e Y0=1. El estudio se realiza en los primeros 200 segundos en los que se producen las reacciones. Además, está resuelto usando dos pasos, primero h=0.01 y después h=0.005. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Lotka.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Funcion:&lt;br /&gt;
f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.005:&lt;br /&gt;
h=0.005;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Euler:&lt;br /&gt;
for k=1:N&lt;br /&gt;
    y(:,k+1)=y(:,k)+h*f(t(k),y(:,k));&lt;br /&gt;
end&lt;br /&gt;
&lt;br /&gt;
% Dibujamos la solucion aproximada&lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,y(1,:),'r')&lt;br /&gt;
plot(t,y(2,:),'b')&lt;br /&gt;
plot(t,y(3,:),'g')&lt;br /&gt;
plot(t,y(4,:),'k')&lt;br /&gt;
legend('A','B','X','Y');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[File:DetalleNA.jpg|right|border|500px|caption]]&lt;br /&gt;
[[File:DetalleRV.jpg|right|border|500px|packed-overlay]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Como se puede observar en los gráficos de detalle, existe una pequeña perturbación entre ambas gráficas, las cuales han sido tomadas como ejemplo. Esta perturbación es producto de las condiciones iniciales que se introducen en el programa realizado. A pesar de la existencia de dichas discordancias y a la inexistencia de un incremento del error, se podría decir, incluso concluir, que las reacciones estudiadas son estables. Esto se debe a la necesidad de aplicar un gran zoom para poder llegar a apreciar la diferencia entre las curvas de las gráficas una vez superpuestas. &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[File:Cambiok1.jpg|right|border|800px|caption]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Datos&lt;br /&gt;
A0=4.7;&lt;br /&gt;
B0=2;&lt;br /&gt;
X0=2;&lt;br /&gt;
Y0=1;&lt;br /&gt;
k=1.4;&lt;br /&gt;
t0=0;&lt;br /&gt;
tN=200;&lt;br /&gt;
c=2.05;&lt;br /&gt;
k1=0.1;&lt;br /&gt;
k2=0.15;&lt;br /&gt;
k3=0.06;&lt;br /&gt;
&lt;br /&gt;
y0=[A0;B0;X0;Y0];&lt;br /&gt;
ne=4;&lt;br /&gt;
&lt;br /&gt;
% Usamos h=0.01:&lt;br /&gt;
h=0.01;&lt;br /&gt;
% Discretizamos&lt;br /&gt;
N=round((tN-t0)/h);&lt;br /&gt;
&lt;br /&gt;
% Creamos el vector de tiempo t &lt;br /&gt;
t=linspace(t0,tN,N+1);&lt;br /&gt;
&lt;br /&gt;
% Matriz de soluciones&lt;br /&gt;
y=zeros(ne,N+1);&lt;br /&gt;
y(:,1)=y0;&lt;br /&gt;
&lt;br /&gt;
% Aplicamos el método de Heun&lt;br /&gt;
a=1;&lt;br /&gt;
b=linspace(0.02,2,4);&lt;br /&gt;
for j=1:4&lt;br /&gt;
    k1=b(j);&lt;br /&gt;
    f=@(t,y)[-k1*y(1)*y(3);k3*y(4);k1*y(1)*y(3)-k2*y(3)*y(4);k2*y(3)*y(4)-k3*y(4)];&lt;br /&gt;
    for i=1:N&lt;br /&gt;
        K1=f(t(i),y(:,i));&lt;br /&gt;
        K2=f(t(i)+h,y(:,i)+K1*h);&lt;br /&gt;
        y(:,i+1)=y(:,i)+0.5*h*(K1+K2);&lt;br /&gt;
    end&lt;br /&gt;
    subplot(2,2,a)&lt;br /&gt;
    hold on&lt;br /&gt;
    plot(t,y(1,:),'r')&lt;br /&gt;
    plot(t,y(2,:),'b')&lt;br /&gt;
    plot(t,y(3,:),'g')&lt;br /&gt;
    plot(t,y(4,:),'k')&lt;br /&gt;
    legend('A','B','X','Y');&lt;br /&gt;
    title(k1);&lt;br /&gt;
    hold off&lt;br /&gt;
    a=a+1;&lt;br /&gt;
end&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa en el programa realizado anteriormente, se ha resuelto el PVI mediante el método de Heun. La resolución de este problema se caracteriza por los distintos valores que toma k1 en el intervalo (0.002-2). A raíz de esto, se aprecian en las gráficas, también adjuntas, los cambios que se producen en las reacciones. Además, en las ecuaciones aportadas por Lotka, en concreto una de ellas, se puede observar la presencia de k1: A+x=k1*2*x. Debido a esta relación, y según las gráficas, se puede concluir que cuanto mayor sea la constante:&lt;br /&gt;
&lt;br /&gt;
*El valor de ''x'' experimenta un crecimiento instantáneo, que es reducido inmediatamente y cuya curva va transformándose en un asíntota.&lt;br /&gt;
*El valor de ''y'' experimenta una reacción muy parecida a la de ''x'' pero presenta una forma menos brusca.&lt;br /&gt;
*El valor de A experimenta una desaparición instantánea al inicio la reacción .&lt;br /&gt;
*El valor de B experimenta un crecimiento bastante rápido.&lt;br /&gt;
&lt;br /&gt;
Estas diferencias se pueden encontrar claramente entre cada una de las cuatro gráficas, de forma que podríamos afirmar que a partir de k1= 0.68 la reacción mantiene, tanto las velocidades como los cambios, prácticamente iguales.&lt;/div&gt;</summary>
		<author><name>Pablo Retamar</name></author>	</entry>

	</feed>