<?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=Almudena</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=Almudena"/>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/wiki/Especial:Contribuciones/Almudena"/>
		<updated>2026-04-30T23:02:32Z</updated>
		<subtitle>Contribuciones del usuario</subtitle>
		<generator>MediaWiki 1.26.2</generator>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26399</id>
		<title>Explotación Minera (G15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26399"/>
				<updated>2015-03-05T12:20:10Z</updated>
		
		<summary type="html">&lt;p&gt;Almudena: /*  Cantidad de mineral cuando el tiempo tiende a infinito */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Explotación minera. Grupo 15-C | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED14/15|Curso 2014-15]] | Belén Salamanca,  M.Rosario Ruiz Serrano   , Almudena Román, Carmén Rocio LLanes, Elena Suta, Sergio Fernández}}&lt;br /&gt;
                    &lt;br /&gt;
=''' Introducción'''=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Relación entre Producción-Material extraido'''==&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;
=='''Valor de la tasa intrínseca de crecimiento (r)'''==&lt;br /&gt;
&lt;br /&gt;
Como ya se ha comentado anteriormente la función P(producción) es la derivada de la cantidad extraída de material, sabemos que la producción máxima es de 240, por tanto, derivando la función  obtenemos donde se produce el máximo que introducido en la ecuación  P e igualando a 240 se obtiene el valor de la tase de crecimiento r pedido de 0,06&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{tengo el desarrollo a mano pero es un tocho matemático, que hacemos con ello }&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Relación entre la producción y el volumen de toneladas extraidas según el modelo de Gompertz'''==&lt;br /&gt;
&lt;br /&gt;
Mediante el modelo de Gompertz, podemos expresar la producción de minerales (P en función de Q), como hemos visto en el apartado anterior. En la gráfica se observa cómo dicha producción aumenta hasta llegar a su máximo y a continuación disminuye. Para representar la curva necesitamos el siguiente código matlab:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
b=240&lt;br /&gt;
k=10875;&lt;br /&gt;
r=b*exp(1)/k;&lt;br /&gt;
q=0:1:10875;&lt;br /&gt;
N=length(q);&lt;br /&gt;
P=zeros(1,N);&lt;br /&gt;
for i=1:N&lt;br /&gt;
    P(i)=r*q(i)*log(k/q(i));&lt;br /&gt;
end&lt;br /&gt;
plot(q,P)}}&lt;br /&gt;
[[Archivo:Gompertz3.jpg|800px|thumb|left|Producción en función del volumen de toneladas extraidas]]&lt;br /&gt;
&lt;br /&gt;
=='''Relación entre la producción y el volumen de toneladas extraídas según el modelo de Verhulst'''==&lt;br /&gt;
Volvemos a dibujar la curva del modelo de Gompertz descrita en el apartado anterior, y en una segunda ventana la curva de Verhulst. Para ello, necesitamos definir una nueva función, así como una nueva tasa intrínseca de crecimiento.&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
Q'=rQ(1-\frac{Q}{k})&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Añadimos una tercera ventana en la que se dibujan las gráficas de ambos modelos, para poder compararlas. Necesitamos el siguiente código matlab para obtener los resultados:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
b=240;&lt;br /&gt;
k=10875;&lt;br /&gt;
r1=b*exp(1)/k;%Tasa intrínseca de crecimiento según el modelo de Gompertz &lt;br /&gt;
r2=(240*4)/10875; %Tasa intrinseca de creciemiento según el modelo de Verhulst&lt;br /&gt;
q=0:1:10875;&lt;br /&gt;
N=length(q);&lt;br /&gt;
P=zeros(1,N);&lt;br /&gt;
for i=1:N&lt;br /&gt;
P(i)=r1*q(i)*log(k/q(i)); %Gompertz&lt;br /&gt;
PV(i)=r2*q(i)*(1-q(i)/k);  %Verhulst&lt;br /&gt;
end&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
plot(q,P,'k') %Curva para la función de Gompertz&lt;br /&gt;
xlabel('cantidad')            &lt;br /&gt;
ylabel('produccion')         &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
plot(q,PV,'r') %Curva para la función de Verhulst&lt;br /&gt;
xlabel('cantidad (tn)')      &lt;br /&gt;
ylabel('produccion (tn/año)') &lt;br /&gt;
subplot(1,3,3) %Comparación entre las curvas de ambos modelos&lt;br /&gt;
plot(q,P,'k')                   &lt;br /&gt;
xlabel('cantidad')             &lt;br /&gt;
ylabel('produccion')         &lt;br /&gt;
hold on %Para superponer gráficas                   &lt;br /&gt;
plot(q,PV,'r')              &lt;br /&gt;
xlabel('cantidad (tn)')        &lt;br /&gt;
ylabel('produccion (tn/año)')  &lt;br /&gt;
legend('Modelo Gompertz','Modelo Verhulst','Location','best') %Leyenda&lt;br /&gt;
hold off }}&lt;br /&gt;
 &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Verhulst.jpg|800px|thumb|left|Comparación de gráficos]]&lt;br /&gt;
&lt;br /&gt;
=='''Problema de valor inicial y aproximación de la cantidad de material extraído por el método de Euler '''==&lt;br /&gt;
La gráfica representa la variación de cantidad de mineral extraible a lo largo del tiempo. Como se puede observar, en un primer momento podemos extraer mucha cantidad de mineral hasta que, al llegar a un tiempo t y debido a que los recursos minerales limitados, la tasa de rendimiento de extracción del mineral es inferior a 25 toneladas/año (estamos alcanzando la máxima cantidad extraible). Por lo tanto, ya no es rentable seguir con la extracción.&lt;br /&gt;
 {{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
b=240;&lt;br /&gt;
r=b*exp(1)/k;&lt;br /&gt;
t(1)=t0;&lt;br /&gt;
q(1)=0.1;&lt;br /&gt;
Q=-k/(exp(exp(r*t)));&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
    q(i+1)=q(i)+h*r*q(i)*log(k/q(i));&lt;br /&gt;
    t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs((r*q(i)*log(k/q(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;abs((r*q(i-1)*log(k/q(i-1))))&amp;gt;abs((r*q(i)*log(k/q(i))));&lt;br /&gt;
      &lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
    i=i+1;&lt;br /&gt;
end&lt;br /&gt;
[t',q']&lt;br /&gt;
plot(t,q)}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Aproximación de la cantidad de material extraído con los métodos de Runge kutta y Heun'''==&lt;br /&gt;
 {{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
%Condiciones iniciales&lt;br /&gt;
t0=0;&lt;br /&gt;
q0=0.1;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
b=240;&lt;br /&gt;
r=b*exp(1)/k;&lt;br /&gt;
%Variable dependiente&lt;br /&gt;
t=t0;&lt;br /&gt;
q(1)=q0;&lt;br /&gt;
z(1)=q0;&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
K1=r*q(i)*(log(k)-log(q(i)));&lt;br /&gt;
K2=r*(q(i)+1/2*K1*h)*(log(k)-log(q(i)+1/2*K1*h));&lt;br /&gt;
K3=r*(q(i)+1/2*K2*h)*(log(k)-log(q(i)+1/2*K2*h));&lt;br /&gt;
K4=r*(q(i)+K3*h)*(log(k)-log(q(i)+K3*h));&lt;br /&gt;
q(i+1)=q(i)+h/6*(K1+2*K2+2*K3+K4);&lt;br /&gt;
t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs(r*q(i)*(log(k)-log(q(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;r*q(i-1)*(log(k)-log(q(i-1)))&amp;gt;r*q(i)*(log(k)-log(q(i)))&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
    K1=r*z(i)*(log(k)-log(z(i)));&lt;br /&gt;
    K2=r*(z(i)+K1*h)*(log(k)-log(z(i)+K1*h));&lt;br /&gt;
    z(i+1)=z(i)+h/2*(K1+K2);&lt;br /&gt;
    t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs(r*z(i)*(log(k)-log(z(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;r*z(i-1)*(log(k)-log(z(i-1)))&amp;gt;r*z(i)*(log(k)-log(z(i)))&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
i=i+1;&lt;br /&gt;
end&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,q,'b*')&lt;br /&gt;
plot(t,z,'r+')&lt;br /&gt;
legend('RK4','HEUN','location','best')&lt;br /&gt;
hold off}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==''' Cantidad de mineral cuando el tiempo tiende a infinito'''==&lt;br /&gt;
 {{matlab|codigo=&lt;br /&gt;
tN=input('Introduce un valor del tiempo muy grande:');&lt;br /&gt;
t=0:1:tN;                             &lt;br /&gt;
N=length(t);                             &lt;br /&gt;
Q=zeros(1,N);                            &lt;br /&gt;
r=240*exp(1)/10875;                      &lt;br /&gt;
Q0=0.1;                                  &lt;br /&gt;
K=10875;                                 &lt;br /&gt;
Q(1)=Q0;                                 &lt;br /&gt;
Q=K*exp(exp(-r*t)*(log(Q0/K)));          &lt;br /&gt;
for i=1:N                                &lt;br /&gt;
    Q(i)=K*exp(exp(-r*t(i))*(log(Q0/K)));&lt;br /&gt;
end                                      &lt;br /&gt;
Q(tN)                                                &lt;br /&gt;
plot(t,Q)}}&lt;br /&gt;
[[Archivo:Limite.jpg|800px|thumb|Límite]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferentiales]]&lt;br /&gt;
[[Categoría:ED14/15]]&lt;br /&gt;
[[Categoría:Trabajos 2014-15]]&lt;/div&gt;</summary>
		<author><name>Almudena</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Limite.jpg&amp;diff=26398</id>
		<title>Archivo:Limite.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Limite.jpg&amp;diff=26398"/>
				<updated>2015-03-05T12:19:33Z</updated>
		
		<summary type="html">&lt;p&gt;Almudena: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Almudena</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26395</id>
		<title>Explotación Minera (G15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26395"/>
				<updated>2015-03-05T12:18:53Z</updated>
		
		<summary type="html">&lt;p&gt;Almudena: /*  Cantidad de mineral cuando el tiempo tiende a infinito */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Explotación minera. Grupo 15-C | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED14/15|Curso 2014-15]] | Belén Salamanca,  M.Rosario Ruiz Serrano   , Almudena Román, Carmén Rocio LLanes, Elena Suta, Sergio Fernández}}&lt;br /&gt;
                    &lt;br /&gt;
=''' Introducción'''=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Relación entre Producción-Material extraido'''==&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;
=='''Valor de la tasa intrínseca de crecimiento (r)'''==&lt;br /&gt;
&lt;br /&gt;
Como ya se ha comentado anteriormente la función P(producción) es la derivada de la cantidad extraída de material, sabemos que la producción máxima es de 240, por tanto, derivando la función  obtenemos donde se produce el máximo que introducido en la ecuación  P e igualando a 240 se obtiene el valor de la tase de crecimiento r pedido de 0,06&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{tengo el desarrollo a mano pero es un tocho matemático, que hacemos con ello }&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Relación entre la producción y el volumen de toneladas extraidas según el modelo de Gompertz'''==&lt;br /&gt;
&lt;br /&gt;
Mediante el modelo de Gompertz, podemos expresar la producción de minerales (P en función de Q), como hemos visto en el apartado anterior. En la gráfica se observa cómo dicha producción aumenta hasta llegar a su máximo y a continuación disminuye. Para representar la curva necesitamos el siguiente código matlab:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
b=240&lt;br /&gt;
k=10875;&lt;br /&gt;
r=b*exp(1)/k;&lt;br /&gt;
q=0:1:10875;&lt;br /&gt;
N=length(q);&lt;br /&gt;
P=zeros(1,N);&lt;br /&gt;
for i=1:N&lt;br /&gt;
    P(i)=r*q(i)*log(k/q(i));&lt;br /&gt;
end&lt;br /&gt;
plot(q,P)}}&lt;br /&gt;
[[Archivo:Gompertz3.jpg|800px|thumb|left|Producción en función del volumen de toneladas extraidas]]&lt;br /&gt;
&lt;br /&gt;
=='''Relación entre la producción y el volumen de toneladas extraídas según el modelo de Verhulst'''==&lt;br /&gt;
Volvemos a dibujar la curva del modelo de Gompertz descrita en el apartado anterior, y en una segunda ventana la curva de Verhulst. Para ello, necesitamos definir una nueva función, así como una nueva tasa intrínseca de crecimiento.&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
Q'=rQ(1-\frac{Q}{k})&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Añadimos una tercera ventana en la que se dibujan las gráficas de ambos modelos, para poder compararlas. Necesitamos el siguiente código matlab para obtener los resultados:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
b=240;&lt;br /&gt;
k=10875;&lt;br /&gt;
r1=b*exp(1)/k;%Tasa intrínseca de crecimiento según el modelo de Gompertz &lt;br /&gt;
r2=(240*4)/10875; %Tasa intrinseca de creciemiento según el modelo de Verhulst&lt;br /&gt;
q=0:1:10875;&lt;br /&gt;
N=length(q);&lt;br /&gt;
P=zeros(1,N);&lt;br /&gt;
for i=1:N&lt;br /&gt;
P(i)=r1*q(i)*log(k/q(i)); %Gompertz&lt;br /&gt;
PV(i)=r2*q(i)*(1-q(i)/k);  %Verhulst&lt;br /&gt;
end&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
plot(q,P,'k') %Curva para la función de Gompertz&lt;br /&gt;
xlabel('cantidad')            &lt;br /&gt;
ylabel('produccion')         &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
plot(q,PV,'r') %Curva para la función de Verhulst&lt;br /&gt;
xlabel('cantidad (tn)')      &lt;br /&gt;
ylabel('produccion (tn/año)') &lt;br /&gt;
subplot(1,3,3) %Comparación entre las curvas de ambos modelos&lt;br /&gt;
plot(q,P,'k')                   &lt;br /&gt;
xlabel('cantidad')             &lt;br /&gt;
ylabel('produccion')         &lt;br /&gt;
hold on %Para superponer gráficas                   &lt;br /&gt;
plot(q,PV,'r')              &lt;br /&gt;
xlabel('cantidad (tn)')        &lt;br /&gt;
ylabel('produccion (tn/año)')  &lt;br /&gt;
legend('Modelo Gompertz','Modelo Verhulst','Location','best') %Leyenda&lt;br /&gt;
hold off }}&lt;br /&gt;
 &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Verhulst.jpg|800px|thumb|left|Comparación de gráficos]]&lt;br /&gt;
&lt;br /&gt;
=='''Problema de valor inicial y aproximación de la cantidad de material extraído por el método de Euler '''==&lt;br /&gt;
La gráfica representa la variación de cantidad de mineral extraible a lo largo del tiempo. Como se puede observar, en un primer momento podemos extraer mucha cantidad de mineral hasta que, al llegar a un tiempo t y debido a que los recursos minerales limitados, la tasa de rendimiento de extracción del mineral es inferior a 25 toneladas/año (estamos alcanzando la máxima cantidad extraible). Por lo tanto, ya no es rentable seguir con la extracción.&lt;br /&gt;
 {{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
b=240;&lt;br /&gt;
r=b*exp(1)/k;&lt;br /&gt;
t(1)=t0;&lt;br /&gt;
q(1)=0.1;&lt;br /&gt;
Q=-k/(exp(exp(r*t)));&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
    q(i+1)=q(i)+h*r*q(i)*log(k/q(i));&lt;br /&gt;
    t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs((r*q(i)*log(k/q(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;abs((r*q(i-1)*log(k/q(i-1))))&amp;gt;abs((r*q(i)*log(k/q(i))));&lt;br /&gt;
      &lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
    i=i+1;&lt;br /&gt;
end&lt;br /&gt;
[t',q']&lt;br /&gt;
plot(t,q)}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Aproximación de la cantidad de material extraído con los métodos de Runge kutta y Heun'''==&lt;br /&gt;
 {{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
%Condiciones iniciales&lt;br /&gt;
t0=0;&lt;br /&gt;
q0=0.1;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
b=240;&lt;br /&gt;
r=b*exp(1)/k;&lt;br /&gt;
%Variable dependiente&lt;br /&gt;
t=t0;&lt;br /&gt;
q(1)=q0;&lt;br /&gt;
z(1)=q0;&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
K1=r*q(i)*(log(k)-log(q(i)));&lt;br /&gt;
K2=r*(q(i)+1/2*K1*h)*(log(k)-log(q(i)+1/2*K1*h));&lt;br /&gt;
K3=r*(q(i)+1/2*K2*h)*(log(k)-log(q(i)+1/2*K2*h));&lt;br /&gt;
K4=r*(q(i)+K3*h)*(log(k)-log(q(i)+K3*h));&lt;br /&gt;
q(i+1)=q(i)+h/6*(K1+2*K2+2*K3+K4);&lt;br /&gt;
t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs(r*q(i)*(log(k)-log(q(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;r*q(i-1)*(log(k)-log(q(i-1)))&amp;gt;r*q(i)*(log(k)-log(q(i)))&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
    K1=r*z(i)*(log(k)-log(z(i)));&lt;br /&gt;
    K2=r*(z(i)+K1*h)*(log(k)-log(z(i)+K1*h));&lt;br /&gt;
    z(i+1)=z(i)+h/2*(K1+K2);&lt;br /&gt;
    t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs(r*z(i)*(log(k)-log(z(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;r*z(i-1)*(log(k)-log(z(i-1)))&amp;gt;r*z(i)*(log(k)-log(z(i)))&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
i=i+1;&lt;br /&gt;
end&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,q,'b*')&lt;br /&gt;
plot(t,z,'r+')&lt;br /&gt;
legend('RK4','HEUN','location','best')&lt;br /&gt;
hold off}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==''' Cantidad de mineral cuando el tiempo tiende a infinito'''==&lt;br /&gt;
 {{matlab|codigo=&lt;br /&gt;
tN=input('Introduce un valor del tiempo muy grande:');&lt;br /&gt;
t=0:1:tN;                             &lt;br /&gt;
N=length(t);                             &lt;br /&gt;
Q=zeros(1,N);                            &lt;br /&gt;
r=240*exp(1)/10875;                      &lt;br /&gt;
Q0=0.1;                                  &lt;br /&gt;
K=10875;                                 &lt;br /&gt;
Q(1)=Q0;                                 &lt;br /&gt;
Q=K*exp(exp(-r*t)*(log(Q0/K)));          &lt;br /&gt;
for i=1:N                                &lt;br /&gt;
    Q(i)=K*exp(exp(-r*t(i))*(log(Q0/K)));&lt;br /&gt;
end                                      &lt;br /&gt;
Q(tN)                                                &lt;br /&gt;
plot(t,Q)}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferentiales]]&lt;br /&gt;
[[Categoría:ED14/15]]&lt;br /&gt;
[[Categoría:Trabajos 2014-15]]&lt;br /&gt;
[[Archivo:Limite.jpg|800px|thumb|Límite&lt;/div&gt;</summary>
		<author><name>Almudena</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26385</id>
		<title>Explotación Minera (G15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26385"/>
				<updated>2015-03-05T12:15:46Z</updated>
		
		<summary type="html">&lt;p&gt;Almudena: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Explotación minera. Grupo 15-C | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED14/15|Curso 2014-15]] | Belén Salamanca,  M.Rosario Ruiz Serrano   , Almudena Román, Carmén Rocio LLanes, Elena Suta, Sergio Fernández}}&lt;br /&gt;
                    &lt;br /&gt;
=''' Introducción'''=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Relación entre Producción-Material extraido'''==&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;
=='''Valor de la tasa intrínseca de crecimiento (r)'''==&lt;br /&gt;
&lt;br /&gt;
Como ya se ha comentado anteriormente la función P(producción) es la derivada de la cantidad extraída de material, sabemos que la producción máxima es de 240, por tanto, derivando la función  obtenemos donde se produce el máximo que introducido en la ecuación  P e igualando a 240 se obtiene el valor de la tase de crecimiento r pedido de 0,06&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{tengo el desarrollo a mano pero es un tocho matemático, que hacemos con ello }&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Relación entre la producción y el volumen de toneladas extraidas según el modelo de Gompertz'''==&lt;br /&gt;
&lt;br /&gt;
Mediante el modelo de Gompertz, podemos expresar la producción de minerales (P en función de Q), como hemos visto en el apartado anterior. En la gráfica se observa cómo dicha producción aumenta hasta llegar a su máximo y a continuación disminuye. Para representar la curva necesitamos el siguiente código matlab:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
b=240&lt;br /&gt;
k=10875;&lt;br /&gt;
r=b*exp(1)/k;&lt;br /&gt;
q=0:1:10875;&lt;br /&gt;
N=length(q);&lt;br /&gt;
P=zeros(1,N);&lt;br /&gt;
for i=1:N&lt;br /&gt;
    P(i)=r*q(i)*log(k/q(i));&lt;br /&gt;
end&lt;br /&gt;
plot(q,P)}}&lt;br /&gt;
[[Archivo:Gompertz3.jpg|800px|thumb|left|Producción en función del volumen de toneladas extraidas]]&lt;br /&gt;
&lt;br /&gt;
=='''Relación entre la producción y el volumen de toneladas extraídas según el modelo de Verhulst'''==&lt;br /&gt;
Volvemos a dibujar la curva del modelo de Gompertz descrita en el apartado anterior, y en una segunda ventana la curva de Verhulst. Para ello, necesitamos definir una nueva función, así como una nueva tasa intrínseca de crecimiento.&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
Q'=rQ(1-\frac{Q}{k})&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Añadimos una tercera ventana en la que se dibujan las gráficas de ambos modelos, para poder compararlas. Necesitamos el siguiente código matlab para obtener los resultados:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
b=240;&lt;br /&gt;
k=10875;&lt;br /&gt;
r1=b*exp(1)/k;%Tasa intrínseca de crecimiento según el modelo de Gompertz &lt;br /&gt;
r2=(240*4)/10875; %Tasa intrinseca de creciemiento según el modelo de Verhulst&lt;br /&gt;
q=0:1:10875;&lt;br /&gt;
N=length(q);&lt;br /&gt;
P=zeros(1,N);&lt;br /&gt;
for i=1:N&lt;br /&gt;
P(i)=r1*q(i)*log(k/q(i)); %Gompertz&lt;br /&gt;
PV(i)=r2*q(i)*(1-q(i)/k);  %Verhulst&lt;br /&gt;
end&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
plot(q,P,'k') %Curva para la función de Gompertz&lt;br /&gt;
xlabel('cantidad')            &lt;br /&gt;
ylabel('produccion')         &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
plot(q,PV,'r') %Curva para la función de Verhulst&lt;br /&gt;
xlabel('cantidad (tn)')      &lt;br /&gt;
ylabel('produccion (tn/año)') &lt;br /&gt;
subplot(1,3,3) %Comparación entre las curvas de ambos modelos&lt;br /&gt;
plot(q,P,'k')                   &lt;br /&gt;
xlabel('cantidad')             &lt;br /&gt;
ylabel('produccion')         &lt;br /&gt;
hold on %Para superponer gráficas                   &lt;br /&gt;
plot(q,PV,'r')              &lt;br /&gt;
xlabel('cantidad (tn)')        &lt;br /&gt;
ylabel('produccion (tn/año)')  &lt;br /&gt;
legend('Modelo Gompertz','Modelo Verhulst','Location','best') %Leyenda&lt;br /&gt;
hold off }}&lt;br /&gt;
 &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Verhulst.jpg|800px|thumb|left|Comparación de gráficos]]&lt;br /&gt;
&lt;br /&gt;
=='''Problema de valor inicial y aproximación de la cantidad de material extraído por el método de Euler '''==&lt;br /&gt;
La gráfica representa la variación de cantidad de mineral extraible a lo largo del tiempo. Como se puede observar, en un primer momento podemos extraer mucha cantidad de mineral hasta que, al llegar a un tiempo t y debido a que los recursos minerales limitados, la tasa de rendimiento de extracción del mineral es inferior a 25 toneladas/año (estamos alcanzando la máxima cantidad extraible). Por lo tanto, ya no es rentable seguir con la extracción.&lt;br /&gt;
 {{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
b=240;&lt;br /&gt;
r=b*exp(1)/k;&lt;br /&gt;
t(1)=t0;&lt;br /&gt;
q(1)=0.1;&lt;br /&gt;
Q=-k/(exp(exp(r*t)));&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
    q(i+1)=q(i)+h*r*q(i)*log(k/q(i));&lt;br /&gt;
    t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs((r*q(i)*log(k/q(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;abs((r*q(i-1)*log(k/q(i-1))))&amp;gt;abs((r*q(i)*log(k/q(i))));&lt;br /&gt;
      &lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
    i=i+1;&lt;br /&gt;
end&lt;br /&gt;
[t',q']&lt;br /&gt;
plot(t,q)}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Aproximación de la cantidad de material extraído con los métodos de Runge kutta y Heun'''==&lt;br /&gt;
 {{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
%Condiciones iniciales&lt;br /&gt;
t0=0;&lt;br /&gt;
q0=0.1;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
b=240;&lt;br /&gt;
r=b*exp(1)/k;&lt;br /&gt;
%Variable dependiente&lt;br /&gt;
t=t0;&lt;br /&gt;
q(1)=q0;&lt;br /&gt;
z(1)=q0;&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
K1=r*q(i)*(log(k)-log(q(i)));&lt;br /&gt;
K2=r*(q(i)+1/2*K1*h)*(log(k)-log(q(i)+1/2*K1*h));&lt;br /&gt;
K3=r*(q(i)+1/2*K2*h)*(log(k)-log(q(i)+1/2*K2*h));&lt;br /&gt;
K4=r*(q(i)+K3*h)*(log(k)-log(q(i)+K3*h));&lt;br /&gt;
q(i+1)=q(i)+h/6*(K1+2*K2+2*K3+K4);&lt;br /&gt;
t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs(r*q(i)*(log(k)-log(q(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;r*q(i-1)*(log(k)-log(q(i-1)))&amp;gt;r*q(i)*(log(k)-log(q(i)))&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
    K1=r*z(i)*(log(k)-log(z(i)));&lt;br /&gt;
    K2=r*(z(i)+K1*h)*(log(k)-log(z(i)+K1*h));&lt;br /&gt;
    z(i+1)=z(i)+h/2*(K1+K2);&lt;br /&gt;
    t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs(r*z(i)*(log(k)-log(z(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;r*z(i-1)*(log(k)-log(z(i-1)))&amp;gt;r*z(i)*(log(k)-log(z(i)))&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
i=i+1;&lt;br /&gt;
end&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,q,'b*')&lt;br /&gt;
plot(t,z,'r+')&lt;br /&gt;
legend('RK4','HEUN','location','best')&lt;br /&gt;
hold off}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==''' Cantidad de mineral cuando el tiempo tiende a infinito'''==&lt;br /&gt;
 {{matlab|codigo=&lt;br /&gt;
tN=input('Introduce un valor del tiempo muy grande:');&lt;br /&gt;
t=0:1:tN;                             &lt;br /&gt;
N=length(t);                             &lt;br /&gt;
Q=zeros(1,N);                            &lt;br /&gt;
r=240*exp(1)/10875;                      &lt;br /&gt;
Q0=0.1;                                  &lt;br /&gt;
K=10875;                                 &lt;br /&gt;
Q(1)=Q0;                                 &lt;br /&gt;
Q=K*exp(exp(-r*t)*(log(Q0/K)));          &lt;br /&gt;
for i=1:N                                &lt;br /&gt;
    Q(i)=K*exp(exp(-r*t(i))*(log(Q0/K)));&lt;br /&gt;
end                                      &lt;br /&gt;
Q(tN)                                                &lt;br /&gt;
plot(t,Q)}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferentiales]]&lt;br /&gt;
[[Categoría:ED14/15]]&lt;br /&gt;
[[Categoría:Trabajos 2014-15]]&lt;/div&gt;</summary>
		<author><name>Almudena</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26315</id>
		<title>Explotación Minera (G15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26315"/>
				<updated>2015-03-05T11:59:15Z</updated>
		
		<summary type="html">&lt;p&gt;Almudena: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Explotación minera. Grupo 15-C | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED14/15|Curso 2014-15]] | Belén Salamanca,  M.Rosario Ruiz Serrano   , Almudena Román, Carmén Rocio LLanes, Elena Suta, Sergio Fernández}}&lt;br /&gt;
                    &lt;br /&gt;
=''' Introducción'''=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Relación entre Producción-Material extraido'''==&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;
=='''Valor de la tasa intrínseca de crecimiento (r)'''==&lt;br /&gt;
&lt;br /&gt;
Como ya se ha comentado anteriormente la función P(producción) es la derivada de la cantidad extraída de material, sabemos que la producción máxima es de 240, por tanto, derivando la función  obtenemos donde se produce el máximo que introducido en la ecuación  P e igualando a 240 se obtiene el valor de la tase de crecimiento r pedido de 0,06&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{tengo el desarrollo a mano pero es un tocho matemático, que hacemos con ello }&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Relación entre la producción y el volumen de toneladas extraídas modelo de Verhulst'''==&lt;br /&gt;
Volvemos a dibujar la curva del modelo de Gompertz descrita en el apartado anterior, y en una segunda ventana la curva de Verhulst. Para ello, necesitamos definir una nueva función, así como una nueva tasa intrínseca de crecimiento.&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
Q'=rQ(1-\frac{Q}{k})&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Añadimos una tercera ventana en la que se dibujan las gráficas de ambos modelos, para poder compararlas. Necesitamos el siguiente código matlab para obtener los resultados:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
b=240;&lt;br /&gt;
k=10875;&lt;br /&gt;
r1=b*exp(1)/k;%Tasa intrínseca de crecimiento según el modelo de Gompertz &lt;br /&gt;
r2=(240*4)/10875; %Tasa intrinseca de creciemiento según el modelo de Verhulst&lt;br /&gt;
q=0:1:10875;&lt;br /&gt;
N=length(q);&lt;br /&gt;
P=zeros(1,N);&lt;br /&gt;
for i=1:N&lt;br /&gt;
P(i)=r1*q(i)*log(k/q(i)); %Gompertz&lt;br /&gt;
PV(i)=r2*q(i)*(1-q(i)/k);  %Verhulst&lt;br /&gt;
end&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
plot(q,P,'k') %Curva para la función de Gompertz&lt;br /&gt;
xlabel('cantidad')            &lt;br /&gt;
ylabel('produccion')         &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
plot(q,PV,'r') %Curva para la función de Verhulst&lt;br /&gt;
xlabel('cantidad (tn)')      &lt;br /&gt;
ylabel('produccion (tn/año)') &lt;br /&gt;
subplot(1,3,3) %Comparación entre las curvas de ambos modelos&lt;br /&gt;
plot(q,P,'k')                   &lt;br /&gt;
xlabel('cantidad')             &lt;br /&gt;
ylabel('produccion')         &lt;br /&gt;
hold on %Para superponer gráficas                   &lt;br /&gt;
plot(q,PV,'r')              &lt;br /&gt;
xlabel('cantidad (tn)')        &lt;br /&gt;
ylabel('produccion (tn/año)')  &lt;br /&gt;
legend('Modelo Gompertz','Modelo Verhulst','Location','best') %Leyenda&lt;br /&gt;
hold off }}&lt;br /&gt;
 &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Verhulst.jpg|800px|thumb|left|Comparación de gráficos]]&lt;br /&gt;
&lt;br /&gt;
=='''Problema de valor inicial y aproximación de la cantidad de material extraído por el método de Euler '''==&lt;br /&gt;
La gráfica representa la variación de cantidad de mineral extraible a lo largo del tiempo. Como se puede observar, en un primer momento podemos extraer mucha cantidad de mineral hasta que, al llegar a un tiempo t y debido a que los recursos minerales limitados, la tasa de rendimiento de extracción del mineral es inferior a 25 toneladas/año (estamos alcanzando la máxima cantidad extraible). Por lo tanto, ya no es rentable seguir con la extracción.&lt;br /&gt;
 {{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
b=240;&lt;br /&gt;
r=b*exp(1)/k;&lt;br /&gt;
t(1)=t0;&lt;br /&gt;
q(1)=0.1;&lt;br /&gt;
Q=-k/(exp(exp(r*t)));&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
    q(i+1)=q(i)+h*r*q(i)*log(k/q(i));&lt;br /&gt;
    t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs((r*q(i)*log(k/q(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;abs((r*q(i-1)*log(k/q(i-1))))&amp;gt;abs((r*q(i)*log(k/q(i))));&lt;br /&gt;
      &lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
    i=i+1;&lt;br /&gt;
end&lt;br /&gt;
[t',q']&lt;br /&gt;
plot(t,q)}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Aproximación de la cantidad de material extraído con los métodos de Runge kutta y Heun'''==&lt;br /&gt;
 {{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
%Condiciones iniciales&lt;br /&gt;
t0=0;&lt;br /&gt;
q0=0.1;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
b=240;&lt;br /&gt;
r=b*exp(1)/k;&lt;br /&gt;
%Variable dependiente&lt;br /&gt;
t=t0;&lt;br /&gt;
q(1)=q0;&lt;br /&gt;
z(1)=q0;&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
K1=r*q(i)*(log(k)-log(q(i)));&lt;br /&gt;
K2=r*(q(i)+1/2*K1*h)*(log(k)-log(q(i)+1/2*K1*h));&lt;br /&gt;
K3=r*(q(i)+1/2*K2*h)*(log(k)-log(q(i)+1/2*K2*h));&lt;br /&gt;
K4=r*(q(i)+K3*h)*(log(k)-log(q(i)+K3*h));&lt;br /&gt;
q(i+1)=q(i)+h/6*(K1+2*K2+2*K3+K4);&lt;br /&gt;
t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs(r*q(i)*(log(k)-log(q(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;r*q(i-1)*(log(k)-log(q(i-1)))&amp;gt;r*q(i)*(log(k)-log(q(i)))&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
    K1=r*z(i)*(log(k)-log(z(i)));&lt;br /&gt;
    K2=r*(z(i)+K1*h)*(log(k)-log(z(i)+K1*h));&lt;br /&gt;
    z(i+1)=z(i)+h/2*(K1+K2);&lt;br /&gt;
    t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs(r*z(i)*(log(k)-log(z(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;r*z(i-1)*(log(k)-log(z(i-1)))&amp;gt;r*z(i)*(log(k)-log(z(i)))&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
i=i+1;&lt;br /&gt;
end&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,q,'b*')&lt;br /&gt;
plot(t,z,'r+')&lt;br /&gt;
legend('RK4','HEUN','location','best')&lt;br /&gt;
hold off}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferentiales]]&lt;br /&gt;
[[Categoría:ED14/15]]&lt;br /&gt;
[[Categoría:Trabajos 2014-15]]&lt;/div&gt;</summary>
		<author><name>Almudena</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26237</id>
		<title>Explotación Minera (G15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26237"/>
				<updated>2015-03-05T11:44:22Z</updated>
		
		<summary type="html">&lt;p&gt;Almudena: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Explotación minera. Grupo 15-C | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED14/15|Curso 2014-15]] | Belén Salamanca,  M.Rosario Ruiz Serrano   , Almudena Román, Carmén Rocio LLanes, Elena Suta, Sergio Fernández}}&lt;br /&gt;
                    &lt;br /&gt;
=''' Introducción'''=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Relación entre Producción-Material extraido'''==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Valor de la tasa intrínseca de crecimiento (r)'''==&lt;br /&gt;
&lt;br /&gt;
Como ya se ha comentado anteriormente la función P(producción) es la derivada de la cantidad extraída de material, sabemos que la producción máxima es de 240, por tanto, derivando la función  obtenemos donde se produce el máximo que introducido en la ecuación  P e igualando a 240 se obtiene el valor de la tase de crecimiento r pedido de 0,06&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{tengo el desarrollo a mano pero es un tocho matemático, que hacemos con ello }&lt;br /&gt;
&lt;br /&gt;
=='''Problema de valor inicial y aproximación de la cantidad de material extraído por el método de Euler '''==&lt;br /&gt;
&lt;br /&gt;
 {{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
b=240;&lt;br /&gt;
r=b*exp(1)/k;&lt;br /&gt;
t(1)=t0;&lt;br /&gt;
q(1)=0.1;&lt;br /&gt;
Q=-k/(exp(exp(r*t)));&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
    q(i+1)=q(i)+h*r*q(i)*log(k/q(i));&lt;br /&gt;
    t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs((r*q(i)*log(k/q(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;abs((r*q(i-1)*log(k/q(i-1))))&amp;gt;abs((r*q(i)*log(k/q(i))));&lt;br /&gt;
      &lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
    i=i+1;&lt;br /&gt;
end&lt;br /&gt;
[t',q']&lt;br /&gt;
plot(t,q)}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Aproximación de la cantidad de material extraído con los métodos de Runge kutta y Heun'''==&lt;br /&gt;
 {{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
%Condiciones iniciales&lt;br /&gt;
t0=0;&lt;br /&gt;
q0=0.1;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
b=240;&lt;br /&gt;
r=b*exp(1)/k;&lt;br /&gt;
%Variable dependiente&lt;br /&gt;
t=t0;&lt;br /&gt;
q(1)=q0;&lt;br /&gt;
z(1)=q0;&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
K1=r*q(i)*(log(k)-log(q(i)));&lt;br /&gt;
K2=r*(q(i)+1/2*K1*h)*(log(k)-log(q(i)+1/2*K1*h));&lt;br /&gt;
K3=r*(q(i)+1/2*K2*h)*(log(k)-log(q(i)+1/2*K2*h));&lt;br /&gt;
K4=r*(q(i)+K3*h)*(log(k)-log(q(i)+K3*h));&lt;br /&gt;
q(i+1)=q(i)+h/6*(K1+2*K2+2*K3+K4);&lt;br /&gt;
t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs(r*q(i)*(log(k)-log(q(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;r*q(i-1)*(log(k)-log(q(i-1)))&amp;gt;r*q(i)*(log(k)-log(q(i)))&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
    K1=r*z(i)*(log(k)-log(z(i)));&lt;br /&gt;
    K2=r*(z(i)+K1*h)*(log(k)-log(z(i)+K1*h));&lt;br /&gt;
    z(i+1)=z(i)+h/2*(K1+K2);&lt;br /&gt;
    t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs(r*z(i)*(log(k)-log(z(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;r*z(i-1)*(log(k)-log(z(i-1)))&amp;gt;r*z(i)*(log(k)-log(z(i)))&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
i=i+1;&lt;br /&gt;
end&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,q,'b*')&lt;br /&gt;
plot(t,z,'r+')&lt;br /&gt;
legend('RK4','HEUN','location','best')&lt;br /&gt;
hold off}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferentiales]]&lt;br /&gt;
[[Categoría:ED14/15]]&lt;br /&gt;
[[Categoría:Trabajos 2014-15]]&lt;/div&gt;</summary>
		<author><name>Almudena</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26208</id>
		<title>Explotación Minera (G15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26208"/>
				<updated>2015-03-05T11:34:02Z</updated>
		
		<summary type="html">&lt;p&gt;Almudena: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Explotación minera. Grupo 15-C | [[:Categoría:Ecuaciones Diferenciales|Ecuaciones Diferenciales]]|[[:Categoría:ED14/15|Curso 2014-15]] | Belén Salamanca,  M.Rosario Ruiz Serrano   , Almudena Román, Carmén Rocio LLanes, Elena Suta, Sergio Fernández}}&lt;br /&gt;
                    &lt;br /&gt;
=''' Introducción'''=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Relación entre Producción-Material extraido'''==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Valor de la tasa intrínseca de crecimiento (r)'''==&lt;br /&gt;
&lt;br /&gt;
Como ya se ha comentado anteriormente la función P(producción) es la derivada de la cantidad extraída de material, sabemos que la producción máxima es de 240, por tanto, derivando la función  obtenemos donde se produce el máximo que introducido en la ecuación  P e igualando a 240 se obtiene el valor de la tase de crecimiento r pedido de 0,06&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{tengo el desarrollo a mano pero es un tocho matematico, que hacemos con ello }&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Aproximación de la cantidad de material extraído con los modelos de Runge kutta y Heun'''==&lt;br /&gt;
 {{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
%Condiciones iniciales&lt;br /&gt;
t0=0;&lt;br /&gt;
q0=0.1;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
b=240;&lt;br /&gt;
r=b*exp(1)/k;&lt;br /&gt;
%Variable dependiente&lt;br /&gt;
t=t0;&lt;br /&gt;
q(1)=q0;&lt;br /&gt;
z(1)=q0;&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
K1=r*q(i)*(log(k)-log(q(i)));&lt;br /&gt;
K2=r*(q(i)+1/2*K1*h)*(log(k)-log(q(i)+1/2*K1*h));&lt;br /&gt;
K3=r*(q(i)+1/2*K2*h)*(log(k)-log(q(i)+1/2*K2*h));&lt;br /&gt;
K4=r*(q(i)+K3*h)*(log(k)-log(q(i)+K3*h));&lt;br /&gt;
q(i+1)=q(i)+h/6*(K1+2*K2+2*K3+K4);&lt;br /&gt;
t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs(r*q(i)*(log(k)-log(q(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;r*q(i-1)*(log(k)-log(q(i-1)))&amp;gt;r*q(i)*(log(k)-log(q(i)))&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
i=1;&lt;br /&gt;
while 1&lt;br /&gt;
    K1=r*z(i)*(log(k)-log(z(i)));&lt;br /&gt;
    K2=r*(z(i)+K1*h)*(log(k)-log(z(i)+K1*h));&lt;br /&gt;
    z(i+1)=z(i)+h/2*(K1+K2);&lt;br /&gt;
    t(i+1)=t(i)+h;&lt;br /&gt;
    if i&amp;gt;1&amp;amp;&amp;amp;abs(r*z(i)*(log(k)-log(z(i)))-25)&amp;lt;0.1&amp;amp;&amp;amp;r*z(i-1)*(log(k)-log(z(i-1)))&amp;gt;r*z(i)*(log(k)-log(z(i)))&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
i=i+1;&lt;br /&gt;
end&lt;br /&gt;
hold on&lt;br /&gt;
plot(t,q,'b*')&lt;br /&gt;
plot(t,z,'r+')&lt;br /&gt;
legend('RK4','HEUN','location','best')&lt;br /&gt;
hold off}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Ecuaciones Diferentiales]]&lt;br /&gt;
[[Categoría:ED14/15]]&lt;br /&gt;
[[Categoría:Trabajos 2014-15]]&lt;/div&gt;</summary>
		<author><name>Almudena</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=An%C3%A1lisis_del_comportamiento_de_una_placa_rectangular_sometida_a_un_campo_de_temperaturas_y_desplazamientos._(Grupo_26)&amp;diff=19943</id>
		<title>Análisis del comportamiento de una placa rectangular sometida a un campo de temperaturas y desplazamientos. (Grupo 26)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=An%C3%A1lisis_del_comportamiento_de_una_placa_rectangular_sometida_a_un_campo_de_temperaturas_y_desplazamientos._(Grupo_26)&amp;diff=19943"/>
				<updated>2014-12-04T09:53:17Z</updated>
		
		<summary type="html">&lt;p&gt;Almudena: /* MASA DE LA PLACA */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2014-15]]&lt;br /&gt;
{{Trabajo|Análisis del comportamiento de una placa rectangular sometida a un campo de temperaturas y desplazamientos|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2014-15|2014-15]]}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
 [[Categoría:TC14/15]]&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
== INTRODUCCIÓN ==&lt;br /&gt;
Este trabajo esta focalizado en el estudio físico de una placa rectangular de dos dimensiones.&lt;br /&gt;
Este estudio se realiza analizando la temperatura y las deformaciones tratandolos como campos vectoriales.&lt;br /&gt;
&lt;br /&gt;
== CONDICIONES GENERALES ==&lt;br /&gt;
El estudio como mencionamos antes se realiza sobre una placa rectangular que abarca la región [-0.5;0.5]x[0;2] . Para representarla usaremos el software científico de visualización MATLAB.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
clear all&lt;br /&gt;
h=0.1;                 &lt;br /&gt;
u=-0.5:h:0.5;               &lt;br /&gt;
v=0:h:4;            % Definimos la región [-0,5;0;5]x[0;4]&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Mallado&lt;br /&gt;
figure(1)&lt;br /&gt;
xx=uu;        &lt;br /&gt;
yy=vv;&lt;br /&gt;
mesh(xx,yy,0*xx)       % Dibujamos el mesh&lt;br /&gt;
axis([-2,2,-1,5])      % Definimos la regiÛn de dibujo &lt;br /&gt;
view(2)                % El dibujo en planta&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura1.png|Mallado de la placa rectangular&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
==CAMPO DE TEMPERATURA==&lt;br /&gt;
La temperatura de la placa esta distribuida mediante un campo escalar que depende de las dos variables espaciales (x,y),  el campo escalar es T (x, y) = (8 − y2 + 2y)e−x2 &lt;br /&gt;
En esta función el punto de máxima temperatura se sitúa en el punto (0,1) con una temperatura de 9 u.&lt;br /&gt;
===DISTRIBUCIÓN DE TEMPERATURAS===&lt;br /&gt;
Analizando el campo escalar, veremos que depende de forma exponencial de la variable &amp;quot;x&amp;quot;, por lo que cuanto más nos alejemos del centro, menos temperatura habrá. En la variable “Y” la relación es parabólica, siendo una parábola cóncava hacia abajo y cuyo centro está en el punto 1, por lo que entendemos que el punto de mayor temperatura sea el (0,1).Para poder ilustrar esta distribución de temperaturas, adjuntamos el siguiente código MATLAB junto con su gráfico.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=-0.5:0.1:0.5;       % definimos el intervalo [-1/2,1/2]&lt;br /&gt;
y=0:0.1:4;            % definimos el intervalo [0,2]&lt;br /&gt;
[xx,yy]=meshgrid(x,y); % matrices de x e y&lt;br /&gt;
figure(1)&lt;br /&gt;
T=(8-(yy).*(yy)+2.*(yy)).*exp(-(xx).*(xx)); % Campo escalar&lt;br /&gt;
surf(xx,yy,T)       % Dibujar el campo&lt;br /&gt;
hold on                % dibujamos el lÌmite inferior&lt;br /&gt;
plot(xx,yy,'k','linewidth',1);&lt;br /&gt;
axis([-2,2,-1,5])      % seleccionamos una regiÛn de dibujo&lt;br /&gt;
view(2)                % Vemos el dibujo en planta&lt;br /&gt;
}}&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:figura.jpg|Distribución de las temperaturas&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===VARIACIÓN DE TEMPERATURA===&lt;br /&gt;
La variación de la temperatura como cualquier campo escalar, se estudia analizando su gradiente.&lt;br /&gt;
El gradiente en nuestro caso es &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; =-2x.&amp;lt;math&amp;gt;e^(-x^2)\,&amp;lt;/math&amp;gt;(8-&amp;lt;math&amp;gt;y^2 &amp;lt;/math&amp;gt;+2y)&amp;lt;math&amp;gt;\vec{i} &amp;lt;/math&amp;gt;+(-2y+2)&amp;lt;math&amp;gt;e^(-x^2)\,&amp;lt;/math&amp;gt;&amp;lt;math&amp;gt;\vec{j} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Ahora representamos este campo vectorial junto a las curvas de nivel:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
x=(-0.5:0.05:0.5)&lt;br /&gt;
 y=(0:0.2:4);&lt;br /&gt;
&lt;br /&gt;
[x,y] = meshgrid(x,y);&lt;br /&gt;
T =(8-y.^2+2.*y).*exp(-x.^2);&lt;br /&gt;
[px,py] = gradient(T,.05,.2);&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
contour(x,y,T)&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,px,py)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:gradiente1.jpg|Representación del vector gradiente y las curvas de nivel&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==CAMPO DE DESPLAZAMIENTOS==&lt;br /&gt;
Nuestra placa sufre desplazamientos debido a la acción de una fuerza determinada. &lt;br /&gt;
Estos desplazamientos se representan mediante el vector de desplazamientos &amp;lt;math&amp;gt;\vec{U} &amp;lt;/math&amp;gt;definido como:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{U}=y^2/2\vec{j} &amp;lt;/math&amp;gt;&lt;br /&gt;
Este vector representa el desplazamiento de cada punto de la placa que mediante el código MATLAB que se adjunta podremos representarlo en la siguiente gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
h=0.1;&lt;br /&gt;
x=-0.5:h:0.5; %definimos el intervalo [-1/2,1/2]&lt;br /&gt;
y=0:h:4; %definimos el intervalo [0,4]&lt;br /&gt;
[xx,yy]=meshgrid(x,y); %definimos las matrices xx y yy&lt;br /&gt;
Ux=0*xx; %matriz de ceros para que cuadren las dimensiones&lt;br /&gt;
Uy=0.1*(yy.*yy); %vector desplazamiento&lt;br /&gt;
quiver(xx,yy,Ux,Uy); %dibujamos el campo&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura4.png|Campo de desplazamientos&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En la representación del campo de vectores se observa que:el campo toma la dirección del eje de ordenadas, pues sólo tiene componente \(\vec j \).El sentido es ascendente, ya el vector desplazamiento corresponde a una función parabólica.&lt;br /&gt;
Para visualizar el sólido antes y después de que se aplique el campo de vectores utilizamos el siguiente código Matlab:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
x=-0.5:h:0.5;% defino el intervalo [-1/2,1/2]&lt;br /&gt;
y=0:h:4;% defino el intervalo [0,4]&lt;br /&gt;
[xx,yy]=meshgrid(x,y);% creo la matriz de xx yy&lt;br /&gt;
subplot(1,2,1) % lo dibujo en la primera ventana&lt;br /&gt;
mesh(xx,yy,0*xx) % gráfico&lt;br /&gt;
axis([-1,1,-1,6])&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,2,2) % dibujo en la segunda ventana&lt;br /&gt;
Ux=0*xx;&lt;br /&gt;
Uy=0.1*(yy.*yy);&lt;br /&gt;
mesh(xx+Ux,yy+Uy,0*xx)&lt;br /&gt;
axis([-1,1,-1,6])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura5.png|Desplazamiento respecto a la posición original&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
El desplazamiento se produce en los extremos en dirección vertical con sentido positivo. La parte mas baja de la placa no tiene movimiento y la parte superior de la placa tiende a ascender. La consecuencia de todo esto es una tracción en vertical de la placa.&lt;br /&gt;
===DIVERGENCIA DE &amp;lt;math&amp;gt;\vec{U} &amp;lt;/math&amp;gt;===&lt;br /&gt;
La divergencia en nuestro caso, se refiere a un campo vectorial expresado en coordenadas cartesianas, por lo que su expresión sería:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\nabla\cdot\vec U = \frac{\partial U_x}{\partial x}+ \frac{\partial U_y}{\partial y}+&lt;br /&gt;
\frac{\partial U_z}{\partial z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Y aplicándolo a nuestro campo vectorial la expresión de la divergencia sería así:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\nabla\cdot\vec U = (y^2)/5&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Para representarla gráficamente utilizamos el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=-0.5:0.1:0.5; % definimos el intervalo [-1/2,1/2]&lt;br /&gt;
y=0.5:0.1:4; % definimos el intervalo [0,2]&lt;br /&gt;
[X,Y]=meshgrid(x,y); %definimos las matrices X e Y&lt;br /&gt;
Div=2*Y/10; % divergencia del campo&lt;br /&gt;
surf(X,Y,Div); % dibujamos la superficie&lt;br /&gt;
view(2) % dibujamos el campo en 2D&lt;br /&gt;
}}&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura6.png|Divergencia&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
Podemos observar en el gráfico y comprobar analíticamente que los puntos de mayor divergencia están en torno a y=4.&lt;br /&gt;
&lt;br /&gt;
===ROTACIONAL DE &amp;lt;math&amp;gt;\vec{U} &amp;lt;/math&amp;gt;===&lt;br /&gt;
El rotaciones de un campo vectorial es un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto.&lt;br /&gt;
Como mencionamos anteriormente, nuestro campo esta expresado en coordenadas cartesianas por lo que debemos buscar la forma más concisa para su cálculo. Ayudándonos del operador nabla como un producto vectorial, podemos obtenerlo calculando su determinante, que aunque esta expresión carezca de sentido, ya que no se trata de un determinante en realidad, nos ayuda a recordar fácilmente la expresión de rotacional, que sería:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\nabla\times \vec U=\left|&lt;br /&gt;
\begin{matrix}&lt;br /&gt;
\hat x &amp;amp; \hat y &amp;amp; \hat z  \\&lt;br /&gt;
&amp;amp; &amp;amp; \\&lt;br /&gt;
\frac{\partial}{\partial x} &amp;amp; \frac{\partial}{\partial y} &amp;amp; \frac{\partial}{\partial z}&lt;br /&gt;
\\ &amp;amp; &amp;amp; \\&lt;br /&gt;
U_x &amp;amp; U_y &amp;amp; U_z &lt;br /&gt;
\end{matrix}\right|&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Sustituyendo debidamente las incógnitas de dicha expresión, llegamos a que el rotacional en este campo es nulo, lo que implica que las deformaciones que representa este campo no tienden a rotar en ninguno de los puntos de la placa.&lt;br /&gt;
Por lo que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\nabla\times \vec U=\left|&lt;br /&gt;
\begin{matrix}&lt;br /&gt;
\hat x &amp;amp; \hat y &amp;amp; \hat z  \\&lt;br /&gt;
&amp;amp; &amp;amp; \\&lt;br /&gt;
\frac{\partial}{\partial x} &amp;amp; \frac{\partial}{\partial y} &amp;amp; \frac{\partial}{\partial z}&lt;br /&gt;
\\ &amp;amp; &amp;amp; \\&lt;br /&gt;
U_x &amp;amp; U_y &amp;amp; U_z &lt;br /&gt;
\end{matrix}\right|=0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==TENSIONES DE LA PLACA==&lt;br /&gt;
El conjunto de tensiones que puede sufrir un cuerpo, se pueden representar matemáticamente gracias al tensor de tensiones, pues representará el valor de las nueve tensiones posibles en cada punto del mismo. En el siguiente esquema se adjuntan las nueve tensiones diferentes y el lugar que tienen en el tensor de tensiones:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
[σ]_{xyz} =\begin{bmatrix}&lt;br /&gt;
  \sigma_x &amp;amp; \tau_{xy} &amp;amp; \tau_{xz} \\&lt;br /&gt;
  \tau_{yx} &amp;amp; \sigma_y &amp;amp; \tau_{yz} \\  &lt;br /&gt;
  \tau_{zx} &amp;amp; \tau_{zy} &amp;amp; \sigma_z &lt;br /&gt;
\end{bmatrix}&lt;br /&gt;
&amp;lt;/math&amp;gt;[[Archivo:Tenseur des contraintes generalise.png|300px|thumb|Representación gráfica de las componentes del tensor tensión en una base ortogonal.]]&lt;br /&gt;
En nuestro caso, el tensor de tensiones de nuestra placa tendría la siguiente expresión:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
[σ]_{xyz} =\begin{bmatrix}&lt;br /&gt;
  y/5&amp;amp; 0 &amp;amp; 0 \\&lt;br /&gt;
  0 &amp;amp; (3×y)/5 &amp;amp; 0 \\  &lt;br /&gt;
  0 &amp;amp; 0 &amp;amp; y/5 &lt;br /&gt;
\end{bmatrix}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===TENSIONES NORMALES EN LA DIRECCIÓN &amp;lt;math&amp;gt;\vec{i} &amp;lt;/math&amp;gt;===&lt;br /&gt;
Estas tensiones estarían situadas en la fila 1 y columna 1 de la matriz del tensor de tensiones, por lo que su valor es:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_x=y/5&amp;lt;/math&amp;gt;&lt;br /&gt;
Esto quiere decir que en la dirección del eje x, las tensiones normales aumentarían proporcionalmente al aumentar el valor de y, es decir, que en el extremo superior de la placa obtendremos las mayores tensiones.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                 &lt;br /&gt;
x=-0.5:h:0.5;               &lt;br /&gt;
y=0:h:4;           &lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
%TENSIONES NORMALES DEL EJE X&lt;br /&gt;
ty=0.2*Y&lt;br /&gt;
tx=0*Y;&lt;br /&gt;
% dibujamos %  &lt;br /&gt;
quiver(X,Y,tx,ty)&lt;br /&gt;
ylabel('tensiones normales eje x')&lt;br /&gt;
axis([-1,1,-0.5,5])    &lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:captura1993.jpg|Tensiones normales en la dirección del vector i&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===TENSIONES NORMALES EN LA DIRECCIÓN &amp;lt;math&amp;gt;\vec{j} &amp;lt;/math&amp;gt;===&lt;br /&gt;
Estas tensiones estarían situadas en la fila 2 y columna 2 de la matriz del tensor de tensiones, por lo que su valor es:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_y=y×(3/5)&amp;lt;/math&amp;gt;&lt;br /&gt;
Esto quiere decir que en la dirección del eje y, las tensiones normales aumentarían proporcionalmente al aumentar el valor de y, y también aumentán tres veces más que en el caso de las tensiones normales respecto al eje x antes estudiadas. Las tensiones normales máximas respecto al eje y también se encontrarían en el extremo superior de la placa.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                 &lt;br /&gt;
x=-0.5:h:0.5;               &lt;br /&gt;
y=0:h:4;           &lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
%TENSIONES NORMALES DEL EJE Y&lt;br /&gt;
ty=0*Y;&lt;br /&gt;
tx=0.6*Y;&lt;br /&gt;
% dibujamos %  &lt;br /&gt;
quiver(X,Y,tx,ty)&lt;br /&gt;
xlabel('tensiones normales eje Y')&lt;br /&gt;
axis([-1,1,-0.5,5])    &lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:capturatensiones.jpg|Tensiones normales en la dirección del vector j&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===TENSIONES TANGENCIALES RESPECTO AL PLANO ORTOGONAL A &amp;lt;math&amp;gt;\vec{i} &amp;lt;/math&amp;gt;===&lt;br /&gt;
Estas tensiones estarían situadas en la columna 1 y en las filas 2 y 3, es decir, que serían las tensiones&lt;br /&gt;
&amp;lt;math&amp;gt;\tau_{yx} \tau_{zx} &amp;lt;/math&amp;gt; que en nuestro caso su valor es &amp;lt;math&amp;gt;\tau_{yx}=0  \tau_{zx} =0&amp;lt;/math&amp;gt;&lt;br /&gt;
Por lo que llegamos a la conclusión de que en nuestro caso no existen este tipo de tensiones tangenciales.&lt;br /&gt;
&lt;br /&gt;
===TENSIONES TANGENCIALES RESPECTO AL PLANO ORTOGONAL A &amp;lt;math&amp;gt;\vec{j} &amp;lt;/math&amp;gt;===&lt;br /&gt;
Estas tensiones estarían situadas en la columna 2 y en las filas 1 y 3, es decir que serían las tensiones &amp;lt;math&amp;gt;\tau_{xy} \tau_{zy} &amp;lt;/math&amp;gt; que en nuestro caso su valor es &amp;lt;math&amp;gt;\tau_{xy}=0  \tau_{zy} =0&amp;lt;/math&amp;gt; Por lo que llegamos a la conclusión de que en nuestro caso no existen tensiones tangenciales de este tipo.&lt;br /&gt;
==MASA DE LA PLACA==&lt;br /&gt;
La masa de nuestra placa vamos a calcularla mediante el siguiente código MATLAB a partir de su función densidad que tiene un valor &amp;lt;math&amp;gt;d(x,y,z)=xylog{x+2} &amp;lt;/math&amp;gt;. La masa total de nuestra placa es 0.4328&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=1/10;                  %Numero de puntos&lt;br /&gt;
a=-0.5; b=0.5; c=1; d=4;             %Extremos del intervalo&lt;br /&gt;
u=a:h:b; v=c:h:d;              %coordenadas iniciales&lt;br /&gt;
[uu,vv]=meshgrid(u,v);           %coordenadas del rectángulo&lt;br /&gt;
f=vv.*uu.*log(uu+2);                %función&lt;br /&gt;
a=h^2*f;&lt;br /&gt;
masa=sum(sum(a))%masa total&lt;br /&gt;
}}&lt;/div&gt;</summary>
		<author><name>Almudena</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=An%C3%A1lisis_del_comportamiento_de_una_placa_rectangular_sometida_a_un_campo_de_temperaturas_y_desplazamientos._(Grupo_26)&amp;diff=19690</id>
		<title>Análisis del comportamiento de una placa rectangular sometida a un campo de temperaturas y desplazamientos. (Grupo 26)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=An%C3%A1lisis_del_comportamiento_de_una_placa_rectangular_sometida_a_un_campo_de_temperaturas_y_desplazamientos._(Grupo_26)&amp;diff=19690"/>
				<updated>2014-12-03T23:57:54Z</updated>
		
		<summary type="html">&lt;p&gt;Almudena: /* MASA DE LA PLACA */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2014-15]]&lt;br /&gt;
{{Trabajo|Análisis del comportamiento de una placa rectangular sometida a un campo de temperaturas y desplazamientos|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2014-15|2014-15]]}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
 [[Categoría:TC14/15]]&lt;br /&gt;
&amp;lt;br /&amp;gt;&lt;br /&gt;
== INTRODUCCIÓN ==&lt;br /&gt;
Este trabajo esta focalizado en el estudio físico de una placa rectangular de dos dimensiones.&lt;br /&gt;
Este estudio se realiza analizando la temperatura y las deformaciones tratandolos como campos vectoriales.&lt;br /&gt;
&lt;br /&gt;
== CONDICIONES GENERALES ==&lt;br /&gt;
El estudio como mencionamos antes se realiza sobre una placa rectangular que abarca la región [-0.5;0.5]x[0;2] . Para representarla usaremos el software científico de visualización MATLAB.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
clear all&lt;br /&gt;
h=0.1;                 &lt;br /&gt;
u=-0.5:h:0.5;               &lt;br /&gt;
v=0:h:4;            % Definimos la región [-0,5;0;5]x[0;4]&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Mallado&lt;br /&gt;
figure(1)&lt;br /&gt;
xx=uu;        &lt;br /&gt;
yy=vv;&lt;br /&gt;
mesh(xx,yy,0*xx)       % Dibujamos el mesh&lt;br /&gt;
axis([-2,2,-1,5])      % Definimos la regiÛn de dibujo &lt;br /&gt;
view(2)                % El dibujo en planta&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura1.png|Mallado de la placa rectangular&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
==CAMPO DE TEMPERATURA==&lt;br /&gt;
La temperatura de la placa esta distribuida mediante un campo escalar que depende de las dos variables espaciales (x,y),  el campo escalar es T (x, y) = (8 − y2 + 2y)e−x2 &lt;br /&gt;
En esta función el punto de máxima temperatura se sitúa en el punto (0,1) con una temperatura de 9 u.&lt;br /&gt;
===DISTRIBUCIÓN DE TEMPERATURAS===&lt;br /&gt;
Analizando el campo escalar, veremos que depende de forma exponencial de la variable &amp;quot;x&amp;quot;, por lo que cuanto más nos alejemos del centro, menos temperatura habrá. En la variable “Y” la relación es parabólica, siendo una parábola cóncava hacia abajo y cuyo centro está en el punto 1, por lo que entendemos que el punto de mayor temperatura sea el (0,1).Para poder ilustrar esta distribución de temperaturas, adjuntamos el siguiente código MATLAB junto con su gráfico.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=-0.5:0.1:0.5;       % definimos el intervalo [-1/2,1/2]&lt;br /&gt;
y=0:0.1:4;            % definimos el intervalo [0,2]&lt;br /&gt;
[xx,yy]=meshgrid(x,y); % matrices de x e y&lt;br /&gt;
figure(1)&lt;br /&gt;
T=(8-(yy).*(yy)-2.*(yy)).*(exp(-(xx).*(xx))); % Campo escalar&lt;br /&gt;
surf(xx,yy,T)       % Dibujar el campo&lt;br /&gt;
hold on                % dibujamos el lÌmite inferior&lt;br /&gt;
plot(xx,yy,'k','linewidth',1);&lt;br /&gt;
axis([-2,2,-1,5])      % seleccionamos una regiÛn de dibujo&lt;br /&gt;
view(2)                % Vemos el dibujo en planta&lt;br /&gt;
}}&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura2def.png|Distribución de la temperatura&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===VARIACIÓN DE TEMPERATURA===&lt;br /&gt;
La variación de la temperatura como cualquier campo escalar, se estudia analizando su gradiente.&lt;br /&gt;
El gradiente en nuestro caso es &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; =-2x.&amp;lt;math&amp;gt;e^(-x^2)\,&amp;lt;/math&amp;gt;(8-&amp;lt;math&amp;gt;y^2 &amp;lt;/math&amp;gt;+2y)&amp;lt;math&amp;gt;\vec{i} &amp;lt;/math&amp;gt;+(-2y+2)&amp;lt;math&amp;gt;e^(-x^2)\,&amp;lt;/math&amp;gt;&amp;lt;math&amp;gt;\vec{j} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Ahora representamos este campo vectorial junto a las curvas de nivel:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
x=-0.5:h:0.5;&lt;br /&gt;
y=0:h:4;&lt;br /&gt;
[xx,yy]=meshgrid(x,y);&lt;br /&gt;
%Como ya tenemos definida la malla y el campo T, calculamos directamente el gradiente&lt;br /&gt;
Tx=-2*xx.*exp(-(xx).*(xx)).*(8-(yy).*(yy)-2*(yy));&lt;br /&gt;
Ty=(-2*(yy)+2).*exp(-(xx).*(xx));&lt;br /&gt;
%Dibujamos el Vector gradiente (figura 3)&lt;br /&gt;
quiver(xx,yy,Tx,Ty)&lt;br /&gt;
hold on &lt;br /&gt;
contour(xx,yy,T)       % lineas de nivel&lt;br /&gt;
plot(x,x-x,'m','linewidth',1);&lt;br /&gt;
plot(x,2+x-x,'m','linewidth',1);&lt;br /&gt;
plot(-0.5+y-y,y,'m','linewidth',1);&lt;br /&gt;
plot(0.5+y-y,y,'m','linewidth',1);&lt;br /&gt;
axis([-1,1,-0.5,5]) %Numeramos los ejes&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura3def.png|Representación del vector gradiente y las curvas de nivel&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
==CAMPO DE DESPLAZAMIENTOS==&lt;br /&gt;
Nuestra placa sufre desplazamientos debido a la acción de una fuerza determinada. &lt;br /&gt;
Estos desplazamientos se representan mediante el vector de desplazamientos &amp;lt;math&amp;gt;\vec{U} &amp;lt;/math&amp;gt;definido como:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec{U}=y^2/2\vec{j} &amp;lt;/math&amp;gt;&lt;br /&gt;
Este vector representa el desplazamiento de cada punto de la placa que mediante el código MATLAB que se adjunta podremos representarlo en la siguiente gráfica:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
h=0.1;&lt;br /&gt;
x=-0.5:h:0.5; %definimos el intervalo [-1/2,1/2]&lt;br /&gt;
y=0:h:4; %definimos el intervalo [0,4]&lt;br /&gt;
[xx,yy]=meshgrid(x,y); %definimos las matrices xx y yy&lt;br /&gt;
Ux=0*xx; %matriz de ceros para que cuadren las dimensiones&lt;br /&gt;
Uy=0.1*(yy.*yy); %vector desplazamiento&lt;br /&gt;
quiver(xx,yy,Ux,Uy); %dibujamos el campo&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura4.png|Campo de desplazamientos&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En la representación del campo de vectores se observa que:el campo toma la dirección del eje de ordenadas, pues sólo tiene componente \(\vec j \).El sentido es ascendente, ya el vector desplazamiento corresponde a una función parabólica.&lt;br /&gt;
Para visualizar el sólido antes y después de que se aplique el campo de vectores utilizamos el siguiente código Matlab:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
x=-0.5:h:0.5;% defino el intervalo [-1/2,1/2]&lt;br /&gt;
y=0:h:4;% defino el intervalo [0,4]&lt;br /&gt;
[xx,yy]=meshgrid(x,y);% creo la matriz de xx yy&lt;br /&gt;
subplot(1,2,1) % lo dibujo en la primera ventana&lt;br /&gt;
mesh(xx,yy,0*xx) % gráfico&lt;br /&gt;
axis([-1,1,-1,6])&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,2,2) % dibujo en la segunda ventana&lt;br /&gt;
Ux=0*xx;&lt;br /&gt;
Uy=0.1*(yy.*yy);&lt;br /&gt;
mesh(xx+Ux,yy+Uy,0*xx)&lt;br /&gt;
axis([-1,1,-1,6])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura5.png|Desplazamiento respecto a la posición original&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
El desplazamiento se produce en los extremos en dirección vertical con sentido positivo. La parte mas baja de la placa no tiene movimiento y la parte superior de la placa tiende a ascender. La consecuencia de todo esto es una tracción en vertical de la placa.&lt;br /&gt;
===DIVERGENCIA DE &amp;lt;math&amp;gt;\vec{U} &amp;lt;/math&amp;gt;===&lt;br /&gt;
La divergencia en nuestro caso, se refiere a un campo vectorial expresado en coordenadas cartesianas, por lo que su expresión sería:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\nabla\cdot\vec U = \frac{\partial U_x}{\partial x}+ \frac{\partial U_y}{\partial y}+&lt;br /&gt;
\frac{\partial U_z}{\partial z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Y aplicándolo a nuestro campo vectorial la expresión de la divergencia sería así:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\nabla\cdot\vec U = (y^2)/5&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Para representarla gráficamente utilizamos el siguiente código:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=-0.5:0.1:0.5; % definimos el intervalo [-1/2,1/2]&lt;br /&gt;
y=0.5:0.1:4; % definimos el intervalo [0,2]&lt;br /&gt;
[X,Y]=meshgrid(x,y); %definimos las matrices X e Y&lt;br /&gt;
Div=2*Y/10; % divergencia del campo&lt;br /&gt;
surf(X,Y,Div); % dibujamos la superficie&lt;br /&gt;
view(2) % dibujamos el campo en 2D&lt;br /&gt;
}}&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura6.png|Divergencia&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
Podemos observar en el gráfico y comprobar analíticamente que los puntos de mayor divergencia están en torno a y=4.&lt;br /&gt;
&lt;br /&gt;
===ROTACIONAL DE &amp;lt;math&amp;gt;\vec{U} &amp;lt;/math&amp;gt;===&lt;br /&gt;
El rotaciones de un campo vectorial es un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto.&lt;br /&gt;
Como mencionamos anteriormente, nuestro campo esta expresado en coordenadas cartesianas por lo que debemos buscar la forma más concisa para su cálculo. Ayudándonos del operador nabla como un producto vectorial, podemos obtenerlo calculando su determinante, que aunque esta expresión carezca de sentido, ya que no se trata de un determinante en realidad, nos ayuda a recordar fácilmente la expresión de rotacional, que sería:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\nabla\times \vec U=\left|&lt;br /&gt;
\begin{matrix}&lt;br /&gt;
\hat x &amp;amp; \hat y &amp;amp; \hat z  \\&lt;br /&gt;
&amp;amp; &amp;amp; \\&lt;br /&gt;
\frac{\partial}{\partial x} &amp;amp; \frac{\partial}{\partial y} &amp;amp; \frac{\partial}{\partial z}&lt;br /&gt;
\\ &amp;amp; &amp;amp; \\&lt;br /&gt;
U_x &amp;amp; U_y &amp;amp; U_z &lt;br /&gt;
\end{matrix}\right|&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Sustituyendo debidamente las incógnitas de dicha expresión, llegamos a que el rotacional en este campo es nulo, lo que implica que las deformaciones que representa este campo no tienden a rotar en ninguno de los puntos de la placa.&lt;br /&gt;
Por lo que:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\nabla\times \vec U=\left|&lt;br /&gt;
\begin{matrix}&lt;br /&gt;
\hat x &amp;amp; \hat y &amp;amp; \hat z  \\&lt;br /&gt;
&amp;amp; &amp;amp; \\&lt;br /&gt;
\frac{\partial}{\partial x} &amp;amp; \frac{\partial}{\partial y} &amp;amp; \frac{\partial}{\partial z}&lt;br /&gt;
\\ &amp;amp; &amp;amp; \\&lt;br /&gt;
U_x &amp;amp; U_y &amp;amp; U_z &lt;br /&gt;
\end{matrix}\right|=0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==TENSIONES DE LA PLACA==&lt;br /&gt;
El conjunto de tensiones que puede sufrir un cuerpo, se pueden representar matemáticamente gracias al tensor de tensiones, pues representará el valor de las nueve tensiones posibles en cada punto del mismo. En el siguiente esquema se adjuntan las nueve tensiones diferentes y el lugar que tienen en el tensor de tensiones:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
[σ]_{xyz} =\begin{bmatrix}&lt;br /&gt;
  \sigma_x &amp;amp; \tau_{xy} &amp;amp; \tau_{xz} \\&lt;br /&gt;
  \tau_{yx} &amp;amp; \sigma_y &amp;amp; \tau_{yz} \\  &lt;br /&gt;
  \tau_{zx} &amp;amp; \tau_{zy} &amp;amp; \sigma_z &lt;br /&gt;
\end{bmatrix}&lt;br /&gt;
&amp;lt;/math&amp;gt;[[Archivo:Tenseur des contraintes generalise.png|300px|thumb|Representación gráfica de las componentes del tensor tensión en una base ortogonal.]]&lt;br /&gt;
En nuestro caso, el tensor de tensiones de nuestra placa tendría la siguiente expresión:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
[σ]_{xyz} =\begin{bmatrix}&lt;br /&gt;
  y/5&amp;amp; 0 &amp;amp; 0 \\&lt;br /&gt;
  0 &amp;amp; (3×y)/5 &amp;amp; 0 \\  &lt;br /&gt;
  0 &amp;amp; 0 &amp;amp; y/5 &lt;br /&gt;
\end{bmatrix}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===TENSIONES NORMALES EN LA DIRECCIÓN &amp;lt;math&amp;gt;\vec{i} &amp;lt;/math&amp;gt;===&lt;br /&gt;
Estas tensiones estarían situadas en la fila 1 y columna 1 de la matriz del tensor de tensiones, por lo que su valor es:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_x=y/5&amp;lt;/math&amp;gt;&lt;br /&gt;
Esto quiere decir que en la dirección del eje x, las tensiones normales aumentarían proporcionalmente al aumentar el valor de y, es decir, que en el extremo superior de la placa obtendremos las mayores tensiones.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                 &lt;br /&gt;
x=-0.5:h:0.5;               &lt;br /&gt;
y=0:h:4;           &lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
%TENSIONES NORMALES DEL EJE Y&lt;br /&gt;
ty=0*Y;&lt;br /&gt;
tx=0.6*Y;&lt;br /&gt;
% dibujamos %  &lt;br /&gt;
quiver(X,Y,tx,ty)&lt;br /&gt;
ylabel('tensiones normales eje Y')&lt;br /&gt;
axis([-1,1,-0.5,5])    &lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura8a.png|Tensiones normales en la dirección del vector i&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===TENSIONES NORMALES EN LA DIRECCIÓN &amp;lt;math&amp;gt;\vec{j} &amp;lt;/math&amp;gt;===&lt;br /&gt;
Estas tensiones estarían situadas en la fila 2 y columna 2 de la matriz del tensor de tensiones, por lo que su valor es:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_y=y×(3/5)&amp;lt;/math&amp;gt;&lt;br /&gt;
Esto quiere decir que en la dirección del eje y, las tensiones normales aumentarían proporcionalmente al aumentar el valor de y, y también aumentán tres veces más que en el caso de las tensiones normales respecto al eje x antes estudiadas. Las tensiones normales máximas respecto al eje y también se encontrarían en el extremo superior de la placa.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                 &lt;br /&gt;
x=-0.5:h:0.5;               &lt;br /&gt;
y=0:h:4;           &lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
%TENSIONES NORMALES DEL EJE Y&lt;br /&gt;
ty=6*Y;&lt;br /&gt;
tx=0*Y;&lt;br /&gt;
% dibujamos %  &lt;br /&gt;
quiver(X,Y,tx,ty)&lt;br /&gt;
xlabel('tensiones normales eje X')&lt;br /&gt;
axis([-1,1,-0.5,5])    &lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura8b.png|Tensiones normales en la dirección del vector j&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===TENSIONES TANGENCIALES RESPECTO AL PLANO ORTOGONAL A &amp;lt;math&amp;gt;\vec{i} &amp;lt;/math&amp;gt;===&lt;br /&gt;
Estas tensiones estarían situadas en la columna 1 y en las filas 2 y 3, es decir, que serían las tensiones&lt;br /&gt;
&amp;lt;math&amp;gt;\tau_{yx} \tau_{zx} &amp;lt;/math&amp;gt; que en nuestro caso su valor es &amp;lt;math&amp;gt;\tau_{yx}=0  \tau_{zx} =0&amp;lt;/math&amp;gt;&lt;br /&gt;
Por lo que llegamos a la conclusión de que en nuestro caso no existen este tipo de tensiones tangenciales.&lt;br /&gt;
&lt;br /&gt;
===TENSIONES TANGENCIALES RESPECTO AL PLANO ORTOGONAL A &amp;lt;math&amp;gt;\vec{j} &amp;lt;/math&amp;gt;===&lt;br /&gt;
Estas tensiones estarían situadas en la columna 2 y en las filas 1 y 3, es decir que serían las tensiones &amp;lt;math&amp;gt;\tau_{xy} \tau_{zy} &amp;lt;/math&amp;gt; que en nuestro caso su valor es &amp;lt;math&amp;gt;\tau_{xy}=0  \tau_{zy} =0&amp;lt;/math&amp;gt; Por lo que llegamos a la conclusión de que en nuestro caso no existen tensiones tangenciales de este tipo.&lt;br /&gt;
==MASA DE LA PLACA==&lt;br /&gt;
La masa de nuestra placa vamos a calcularla mediante el siguiente código MATLAB a partir de su función densidad que tiene un valor &amp;lt;math&amp;gt;d(x,y,z)=xylog{x+2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
N1=200; N2=100;                  %Numero de puntos&lt;br /&gt;
a=1; b=2; c=1; d=4;             %Extremos del intervalo&lt;br /&gt;
h1=(b-a)/N1; h2=(d-c)/N2;&lt;br /&gt;
u=a:h1:b; v=c:h2:d;              %coordenadas iniciales&lt;br /&gt;
[uu,vv]=meshgrid(u,v);           %coordenadas del rectángulo&lt;br /&gt;
f=vv.*uu.*log(uu+2);                %función&lt;br /&gt;
w1=ones(N1+1,1);                 %vector de masas&lt;br /&gt;
w(1)=1/2; w(N1+1)=1/2;&lt;br /&gt;
w2=ones(N2+1,1);                 %vector de masas&lt;br /&gt;
w(1)=1/2; w(N2+1)=1/2;&lt;br /&gt;
result=h1*h2*w2'*f*w1&lt;br /&gt;
}}&lt;/div&gt;</summary>
		<author><name>Almudena</name></author>	</entry>

	</feed>