<?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=Charoruizserrano</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=Charoruizserrano"/>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/wiki/Especial:Contribuciones/Charoruizserrano"/>
		<updated>2026-04-30T08:57:54Z</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=27998</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=27998"/>
				<updated>2015-03-06T12:27:58Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* Aproximación de la cantidad de material extraído con los métodos de Runge kutta y Heun */&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;
Dada la ecuación diferencial proporcionada en el problema, donde se tiene la derivada de Q con respecto al tiempo, la función de producción es la propia derivada, ya que Q es la función de distribución y P es la densidad, con lo cual la relación entre ambas es la derivada, esto es:&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&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,&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&lt;br /&gt;
sabemos que la producción máxima es de 240, por tanto, derivando la función P e igualando a 0 obtenemos donde se produce el máximo&lt;br /&gt;
 dP/dt=0    t= c/r&lt;br /&gt;
que introducido en la ecuación  P e igualando a 240 se obtiene el valor de la tase de crecimiento r pedido &lt;br /&gt;
 r= 240e/k =0.06&lt;br /&gt;
&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|500px|centre|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|700px|centre|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;
Sea el problema de valor inicial dQ/dt=r*Q*log(k/Q) tal que Q(0)=0.1, 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;
c=log(log(k/q(1)));&lt;br /&gt;
Q=k/(exp(exp(-r*t+c)));&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;
[[Archivo:abc.jpg|500px|centre|Comparación de gráficos]]&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;
&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;
[[Archivo:trabec.jpg|500px|centre|Comparación de gráficos]]&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|centre|Límite]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Representación de la función P(t)'''==&lt;br /&gt;
Se adjunta el código matlab que da la función de producción en función del tiempo. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
t=0:1:200;&lt;br /&gt;
n=length(t);&lt;br /&gt;
Q0=0.1;&lt;br /&gt;
K=10875;&lt;br /&gt;
r=240*exp(1)/K;&lt;br /&gt;
C=log(log(K/Q0));&lt;br /&gt;
for i=1:n&lt;br /&gt;
    P(i)=(K*r*exp(-r*t(i)+C))/(exp(exp(-r*t(i)+C)));&lt;br /&gt;
end&lt;br /&gt;
[maximo,tiempo]=max(P) %maximo de la funcion P y y tiempo en el que se alcanza en años&lt;br /&gt;
plot(t,P)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
El máximo alcanzado por la función P(t) es 239.9906 ton., y se alcanza a los 42 años&lt;br /&gt;
La función resultante es:&lt;br /&gt;
[[Archivo:Graficamat.jpg|500px|centre|Límite]]&lt;br /&gt;
&lt;br /&gt;
=='''Cantidad de mineral sin extraer una vez transcurrida la vida útil '''==&lt;br /&gt;
&lt;br /&gt;
En apartados anteriores hemos obtenido la función de euler para la cantidad de mineral extraído (Q). Creamos un vector q a lo largo del tiempo, y sabemos que en el último punto del vector la función tiene el valor del total extraído. Sabiendo que k es la cantidad total que se puede extraer, basta con restarle a este valor la q calculada para obtener lo que queda sin extraer. Para ello hemos utilizado el siguiente código matlab:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
q0=0.1;             &lt;br /&gt;
h=1/12;&lt;br /&gt;
t=t0;&lt;br /&gt;
k=10875;    &lt;br /&gt;
r=240*exp(1)/k; %Tasa intrínseca de crecimiento modelo de Gompertz&lt;br /&gt;
q(1)=q0;&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)); %euler&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;r*q(i-1)*log(k/q(i-1))&amp;gt;r*q(i)*log(k/q(i))&lt;br /&gt;
break&lt;br /&gt;
    end&lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
N=length(q);&lt;br /&gt;
extraido=q(N); %cantidad de mineral extraida&lt;br /&gt;
sinextraer=k-extraido %cantidad de mineral que queda por extraer }}&lt;br /&gt;
&lt;br /&gt;
La cantidad de mineral que queda sin extraer es:  424.4179 ton.&lt;br /&gt;
&lt;br /&gt;
=='''Modelo Logístico. Aproximación de Heun '''==&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
t=t0;&lt;br /&gt;
q0=0.1;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
r=(240*4)/k; %Tasa intrínseca de crecimiento según el modelo de Verhulst&lt;br /&gt;
q(1)=q0;&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;
     P(i+1)=r*q(i)*(1-q(i)/k);&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)*(1-q(i)/k)-25)&amp;lt;0.1&amp;amp;&amp;amp;r*q(i-1)*(1-q(i-1)/k)&amp;gt;r*q(i)*(1-q(i)/k)&lt;br /&gt;
break&lt;br /&gt;
    end&lt;br /&gt;
    %Heun&lt;br /&gt;
    k1=r*q(i)*(1-q(i)/k);&lt;br /&gt;
    k2=r*(q(i)+k1*h)*(1-(q(i)+k1*h)/k);&lt;br /&gt;
    q(i+1)=q(i)+(h/2)*(k1+k2);       &lt;br /&gt;
    t(i+1)=t(i)+h;       &lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
[maximo,tiempo]=max(P) %maximo de la funcion P y y tiempo en el que se alcanza en años&lt;br /&gt;
N=length(q);&lt;br /&gt;
extraido=q(N); %cantidad de mineral extraída&lt;br /&gt;
sinextraer=k-extraido %cantidad de mineral que queda por extraer&lt;br /&gt;
plot(t,P) }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Heun10.jpg|600px|thumb|centre|Heun]]&lt;br /&gt;
&lt;br /&gt;
Repitiendo los apartados anteriores por aproximación de Heun, obtenemos los siguientes resultados:&lt;br /&gt;
· La producción máxima resulta ser  239.9993 ton. y se alcanza en 1578 años.&lt;br /&gt;
· Quedarán sin extraer  288.8542 ton.&lt;br /&gt;
&lt;br /&gt;
=='''Reajuste de Datos  '''==&lt;br /&gt;
En este apartado, se propone la revisión del modelo pasados 12 años. Los datos reales proporcionados son: la cantidad de mineral extraído hasta ese momento es de 2695 toneladas; y la cantidad de mineral que falta por extraer es de 9075 toneladas;(K-Q(12)=9075). Por lo tanto la cantidad total de mineral que se podía extraer es de K= 9075+2695=11770 toneladas.&lt;br /&gt;
&lt;br /&gt;
Basándonos en la indicación del problema la tasa intrínseca de crecimiento (r) se calcula mediante un bucle que dando valores a r para que se obtenga el valor de la cantidad de mineral extraído a los 12 años. &lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos calculado con el modelo de Gompertz inicial los valores de la producción (P) y la cantidad de mineral extraído, para ello hemos utilizado el bucle del apartado uno y la solución del problema de valor inicial planteado. Una vez conocido la cantidad de mineral extraído a lo largo del tiempo hemos tomado el tomado el valor para t=12 años que ocupa la posición número 13 del vector (q). A continuación hemos reajustado el modelo de forma que la nueva población límite pasa a ser de 9075 toneladas. Realizando un bucle &amp;quot;while&amp;quot;  hemos introducido los valores de la producción inicial obteniendo distintos valores para la (r), siendo el que más se aproxima a nuestro valor r=0.0708.&lt;br /&gt;
&lt;br /&gt;
Se observa que la tasa intrínseca de rendimiento (r) es mayor una vez revisado el modelo, lo cual es evidente ya que se han producido mejoras en las técnicas de extracción del mineral.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 clear all, clc&lt;br /&gt;
    b=240&lt;br /&gt;
    k=10875;&lt;br /&gt;
    r0=b*exp(1)/k;&lt;br /&gt;
    t0=0;&lt;br /&gt;
    tN=25;&lt;br /&gt;
    h=1/12; &lt;br /&gt;
    N=(tN-t0)/h;&lt;br /&gt;
    C=log(log(k/0.1));&lt;br /&gt;
    q=zeros(1,N);&lt;br /&gt;
    q(1)=0.1&lt;br /&gt;
    P=zeros(1,N);&lt;br /&gt;
    t=t0:h:tN;&lt;br /&gt;
    for i=1:N&lt;br /&gt;
       P(i)=r0*q(i)*log(k/q(i));&lt;br /&gt;
       q(i+1)=k/(exp(exp(-r0*t(i)+C)));&lt;br /&gt;
    end&lt;br /&gt;
    q0=q(13);&lt;br /&gt;
    K=9075;&lt;br /&gt;
    n=1;&lt;br /&gt;
    while 1&lt;br /&gt;
    r(n)=(C-log(log(K/q(n))))/t(n);&lt;br /&gt;
    if n&amp;gt;1&amp;amp;&amp;amp;q(n)&amp;gt;q0&lt;br /&gt;
        r(n-1);&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
    n=n+1;&lt;br /&gt;
    end&lt;br /&gt;
    r(length(r)) }}&lt;br /&gt;
&lt;br /&gt;
Para la nueva r y la nueva K procedemos a realizar la aproximación mediante  el método de Heun y compararla &lt;br /&gt;
para los valores nobtenidos en los apartados anteriores.&lt;br /&gt;
&lt;br /&gt;
 {{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
%Aproximacion de Heun en el modelo nuevo&lt;br /&gt;
%Condiciones iniciales&lt;br /&gt;
t0=0;&lt;br /&gt;
q0=2695;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=9075;&lt;br /&gt;
r=0.0708;&lt;br /&gt;
%Variable dependiente&lt;br /&gt;
t=t0;&lt;br /&gt;
q(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)+K1*h)*(log(k)-log(q(i)+K1*h));&lt;br /&gt;
q(i+1)=q(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*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;
q&lt;br /&gt;
P=zeros(size(q));&lt;br /&gt;
for m=1:length(q)&lt;br /&gt;
    P(m)=r*q(m)*log(k/q(m));&lt;br /&gt;
end&lt;br /&gt;
P&lt;br /&gt;
%Aproximacion de Heun en el modelo antiguo&lt;br /&gt;
T0=0;&lt;br /&gt;
z0=2695;&lt;br /&gt;
K=10875;&lt;br /&gt;
b=240;&lt;br /&gt;
R=b*exp(1)/K;&lt;br /&gt;
T=T0;&lt;br /&gt;
z(1)=z0;&lt;br /&gt;
w=1;&lt;br /&gt;
&lt;br /&gt;
while 1&lt;br /&gt;
    K1=R*z(w)*(log(K)-log(z(w)));&lt;br /&gt;
    K2=R*(z(w)+K1*h)*(log(K)-log(z(w)+K1*h));&lt;br /&gt;
    z(w+1)=z(w)+h/2*(K1+K2);&lt;br /&gt;
    T(w+1)=T(w)+h;&lt;br /&gt;
    if w&amp;gt;1&amp;amp;&amp;amp;abs(R*z(w)*(log(K)-log(z(w)))-25)&amp;lt;0.1&amp;amp;&amp;amp;R*z(w-1)*(log(K)-log(z(w-1)))&amp;gt;R*z(w)*(log(K)-log(z(w)))&lt;br /&gt;
        &lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
w=w+1;&lt;br /&gt;
end&lt;br /&gt;
z&lt;br /&gt;
P2=zeros(size(z));&lt;br /&gt;
for s=1:length(z)&lt;br /&gt;
    P2(s)=R*z(s)*log(K/z(s));&lt;br /&gt;
end&lt;br /&gt;
P2&lt;br /&gt;
subplot(3,1,1)&lt;br /&gt;
plot(t,q,'g')&lt;br /&gt;
legend('Modelo Gompertz Modificado','Location','best') %Leyenda&lt;br /&gt;
xlabel('tiempo (años)')&lt;br /&gt;
ylabel('Material extraido (tm)')&lt;br /&gt;
subplot(3,1,2)&lt;br /&gt;
plot(t,P)&lt;br /&gt;
legend('Modelo Gompertz Modificado: Producción','Location','best') %Leyenda&lt;br /&gt;
xlabel('tiempo (años)')&lt;br /&gt;
ylabel('Producción (tm/años)')&lt;br /&gt;
subplot(3,1,3)&lt;br /&gt;
plot(z,P2,'r')&lt;br /&gt;
legend('Modelo Gompertz Inicial: Producción','Location','best') %Leyenda&lt;br /&gt;
xlabel('Material extraido (tm)')&lt;br /&gt;
ylabel('Producción (tm/años)')&lt;br /&gt;
%Maximo&lt;br /&gt;
max(P)}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:3graficas.jpg|800px|thumb|centre|Graficos comparados]]&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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=27932</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=27932"/>
				<updated>2015-03-06T12:10:04Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* Modelo Logístico. Aproximación de Heun  */&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;
Dada la ecuación diferencial proporcionada en el problema, donde se tiene la derivada de Q con respecto al tiempo, la función de producción es la propia derivada, ya que Q es la función de distribución y P es la densidad, con lo cual la relación entre ambas es la derivada, esto es:&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&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,&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&lt;br /&gt;
sabemos que la producción máxima es de 240, por tanto, derivando la función P e igualando a 0 obtenemos donde se produce el máximo&lt;br /&gt;
 dP/dt=0    t= c/r&lt;br /&gt;
que introducido en la ecuación  P e igualando a 240 se obtiene el valor de la tase de crecimiento r pedido &lt;br /&gt;
 r= 240e/k =0.06&lt;br /&gt;
&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|500px|centre|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|700px|centre|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;
Sea el problema de valor inicial dQ/dt=r*Q*log(k/Q) tal que Q(0)=0.1, 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;
c=log(log(k/q(1)));&lt;br /&gt;
Q=k/(exp(exp(-r*t+c)));&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;
[[Archivo:abc.jpg|500px|centre|Comparación de gráficos]]&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;
[[Archivo:trabec.jpg|500px|centre|Comparación de gráficos]]&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|centre|Límite]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Representación de la función P(t)'''==&lt;br /&gt;
Se adjunta el código matlab que da la función de producción en función del tiempo. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
t=0:1:200;&lt;br /&gt;
n=length(t);&lt;br /&gt;
Q0=0.1;&lt;br /&gt;
K=10875;&lt;br /&gt;
r=240*exp(1)/K;&lt;br /&gt;
C=log(log(K/Q0));&lt;br /&gt;
for i=1:n&lt;br /&gt;
    P(i)=(K*r*exp(-r*t(i)+C))/(exp(exp(-r*t(i)+C)));&lt;br /&gt;
end&lt;br /&gt;
[maximo,tiempo]=max(P) %maximo de la funcion P y y tiempo en el que se alcanza en años&lt;br /&gt;
plot(t,P)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
El máximo alcanzado por la función P(t) es 239.9906 ton., y se alcanza a los 42 años&lt;br /&gt;
La función resultante es:&lt;br /&gt;
[[Archivo:Graficamat.jpg|500px|centre|Límite]]&lt;br /&gt;
&lt;br /&gt;
=='''Cantidad de mineral sin extraer una vez transcurrida la vida útil '''==&lt;br /&gt;
&lt;br /&gt;
En apartados anteriores hemos obtenido la función de euler para la cantidad de mineral extraído (Q). Creamos un vector q a lo largo del tiempo, y sabemos que en el último punto del vector la función tiene el valor del total extraído. Sabiendo que k es la cantidad total que se puede extraer, basta con restarle a este valor la q calculada para obtener lo que queda sin extraer. Para ello hemos utilizado el siguiente código matlab:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
q0=0.1;             &lt;br /&gt;
h=1/12;&lt;br /&gt;
t=t0;&lt;br /&gt;
k=10875;    &lt;br /&gt;
r=240*exp(1)/k; %Tasa intrínseca de crecimiento modelo de Gompertz&lt;br /&gt;
q(1)=q0;&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)); %euler&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;r*q(i-1)*log(k/q(i-1))&amp;gt;r*q(i)*log(k/q(i))&lt;br /&gt;
break&lt;br /&gt;
    end&lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
N=length(q);&lt;br /&gt;
extraido=q(N); %cantidad de mineral extraida&lt;br /&gt;
sinextraer=k-extraido %cantidad de mineral que queda por extraer }}&lt;br /&gt;
&lt;br /&gt;
La cantidad de mineral que queda sin extraer es:  424.4179 ton.&lt;br /&gt;
&lt;br /&gt;
=='''Modelo Logístico. Aproximación de Heun '''==&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
t=t0;&lt;br /&gt;
q0=0.1;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
r=(240*4)/k; %Tasa intrínseca de crecimiento según el modelo de Verhulst&lt;br /&gt;
q(1)=q0;&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;
     P(i+1)=r*q(i)*(1-q(i)/k);&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)*(1-q(i)/k)-25)&amp;lt;0.1&amp;amp;&amp;amp;r*q(i-1)*(1-q(i-1)/k)&amp;gt;r*q(i)*(1-q(i)/k)&lt;br /&gt;
break&lt;br /&gt;
    end&lt;br /&gt;
    %Heun&lt;br /&gt;
    k1=r*q(i)*(1-q(i)/k);&lt;br /&gt;
    k2=r*(q(i)+k1*h)*(1-(q(i)+k1*h)/k);&lt;br /&gt;
    q(i+1)=q(i)+(h/2)*(k1+k2);       &lt;br /&gt;
    t(i+1)=t(i)+h;       &lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
[maximo,tiempo]=max(P) %maximo de la funcion P y y tiempo en el que se alcanza en años&lt;br /&gt;
N=length(q);&lt;br /&gt;
extraido=q(N); %cantidad de mineral extraída&lt;br /&gt;
sinextraer=k-extraido %cantidad de mineral que queda por extraer&lt;br /&gt;
plot(t,P) }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Heun10.jpg|600px|thumb|centre|Heun]]&lt;br /&gt;
&lt;br /&gt;
Repitiendo los apartados anteriores por aproximación de Heun, obtenemos los siguientes resultados:&lt;br /&gt;
· La producción máxima resulta ser  239.9993 ton. y se alcanza en 1578 años.&lt;br /&gt;
· Quedarán sin extraer  288.8542 ton.&lt;br /&gt;
&lt;br /&gt;
=='''Reajuste de Datos  '''==&lt;br /&gt;
En este apartado, se propone la revisión del modelo pasados 12 años. Los datos reales proporcionados son: la cantidad de mineral extraído hasta ese momento es de 2695 toneladas; y la cantidad de mineral que falta por extraer es de 9075 toneladas;(K-Q(12)=9075). Por lo tanto la cantidad total de mineral que se podía extraer es de K= 9075+2695=11770 toneladas.&lt;br /&gt;
&lt;br /&gt;
Basándonos en la indicación del problema la tasa intrínseca de crecimiento (r) se calcula mediante un bucle que dando valores a r para que se obtenga el valor de la cantidad de mineral extraído a los 12 años. &lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos calculado con el modelo de Gompertz inicial los valores de la producción (P) y la cantidad de mineral extraído, para ello hemos utilizado el bucle del apartado uno y la solución del problema de valor inicial planteado. Una vez conocido la cantidad de mineral extraído a lo largo del tiempo hemos tomado el tomado el valor para t=12 años que ocupa la posición número 13 del vector (q). A continuación hemos reajustado el modelo de forma que la nueva población límite pasa a ser de 9075 toneladas. Realizando un bucle &amp;quot;while&amp;quot;  hemos introducido los valores de la producción inicial obteniendo distintos valores para la (r), siendo el que más se aproxima a nuestro valor r=0.0708.&lt;br /&gt;
&lt;br /&gt;
Se observa que la tasa intrínseca de rendimiento (r) es mayor una vez revisado el modelo, lo cual es evidente ya que se han producido mejoras en las técnicas de extracción del mineral.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 clear all, clc&lt;br /&gt;
    b=240&lt;br /&gt;
    k=10875;&lt;br /&gt;
    r0=b*exp(1)/k;&lt;br /&gt;
    t0=0;&lt;br /&gt;
    tN=25;&lt;br /&gt;
    h=1/12; &lt;br /&gt;
    N=(tN-t0)/h;&lt;br /&gt;
    C=log(log(k/0.1));&lt;br /&gt;
    q=zeros(1,N);&lt;br /&gt;
    q(1)=0.1&lt;br /&gt;
    P=zeros(1,N);&lt;br /&gt;
    t=t0:h:tN;&lt;br /&gt;
    for i=1:N&lt;br /&gt;
       P(i)=r0*q(i)*log(k/q(i));&lt;br /&gt;
       q(i+1)=k/(exp(exp(-r0*t(i)+C)));&lt;br /&gt;
    end&lt;br /&gt;
    q0=q(13);&lt;br /&gt;
    K=9075;&lt;br /&gt;
    n=1;&lt;br /&gt;
    while 1&lt;br /&gt;
    r(n)=(C-log(log(K/q(n))))/t(n);&lt;br /&gt;
    if n&amp;gt;1&amp;amp;&amp;amp;q(n)&amp;gt;q0&lt;br /&gt;
        r(n-1);&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
    n=n+1;&lt;br /&gt;
    end&lt;br /&gt;
    r(length(r)) }}&lt;br /&gt;
&lt;br /&gt;
para la nueva r y la nueva K procedemos a realizar la aproximación mediante  el método de Heun y compararla &lt;br /&gt;
para los valores de  &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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=27898</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=27898"/>
				<updated>2015-03-06T12:00:46Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* Modelo Logístico. Aproximación de Heun  */&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;
Dada la ecuación diferencial proporcionada en el problema, donde se tiene la derivada de Q con respecto al tiempo, la función de producción es la propia derivada, ya que Q es la función de distribución y P es la densidad, con lo cual la relación entre ambas es la derivada, esto es:&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&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,&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&lt;br /&gt;
sabemos que la producción máxima es de 240, por tanto, derivando la función P e igualando a 0 obtenemos donde se produce el máximo&lt;br /&gt;
 dP/dt=0    t= c/r&lt;br /&gt;
que introducido en la ecuación  P e igualando a 240 se obtiene el valor de la tase de crecimiento r pedido &lt;br /&gt;
 r= 240e/k =0.06&lt;br /&gt;
&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|500px|centre|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|700px|centre|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;
Sea el problema de valor inicial dQ/dt=r*Q*log(k/Q) tal que Q(0)=0.1, 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;
c=log(log(k/q(1)));&lt;br /&gt;
Q=k/(exp(exp(-r*t+c)));&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;
[[Archivo:abc.jpg|500px|centre|Comparación de gráficos]]&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;
[[Archivo:trabec.jpg|500px|centre|Comparación de gráficos]]&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|centre|Límite]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Representación de la función P(t)'''==&lt;br /&gt;
Se adjunta el código matlab que da la función de producción en función del tiempo. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
t=0:1:200;&lt;br /&gt;
n=length(t);&lt;br /&gt;
Q0=0.1;&lt;br /&gt;
K=10875;&lt;br /&gt;
r=240*exp(1)/K;&lt;br /&gt;
C=log(log(K/Q0));&lt;br /&gt;
for i=1:n&lt;br /&gt;
    P(i)=(K*r*exp(-r*t(i)+C))/(exp(exp(-r*t(i)+C)));&lt;br /&gt;
end&lt;br /&gt;
[maximo,tiempo]=max(P) %maximo de la funcion P y y tiempo en el que se alcanza en años&lt;br /&gt;
plot(t,P)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
El máximo alcanzado por la función P(t) es 239.9906 ton., y se alcanza a los 42 años&lt;br /&gt;
La función resultante es:&lt;br /&gt;
[[Archivo:Graficamat.jpg|500px|centre|Límite]]&lt;br /&gt;
&lt;br /&gt;
=='''Cantidad de mineral sin extraer una vez transcurrida la vida útil '''==&lt;br /&gt;
&lt;br /&gt;
En apartados anteriores hemos obtenido la función de euler para la cantidad de mineral extraído (Q). Creamos un vector q a lo largo del tiempo, y sabemos que en el último punto del vector la función tiene el valor del total extraído. Sabiendo que k es la cantidad total que se puede extraer, basta con restarle a este valor la q calculada para obtener lo que queda sin extraer. Para ello hemos utilizado el siguiente código matlab:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
q0=0.1;             &lt;br /&gt;
h=1/12;&lt;br /&gt;
t=t0;&lt;br /&gt;
k=10875;    &lt;br /&gt;
r=240*exp(1)/k; %Tasa intrínseca de crecimiento modelo de Gompertz&lt;br /&gt;
q(1)=q0;&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)); %euler&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;r*q(i-1)*log(k/q(i-1))&amp;gt;r*q(i)*log(k/q(i))&lt;br /&gt;
break&lt;br /&gt;
    end&lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
N=length(q);&lt;br /&gt;
extraido=q(N); %cantidad de mineral extraida&lt;br /&gt;
sinextraer=k-extraido %cantidad de mineral que queda por extraer }}&lt;br /&gt;
&lt;br /&gt;
La cantidad de mineral que queda sin extraer es:  424.4179 ton.&lt;br /&gt;
&lt;br /&gt;
=='''Modelo Logístico. Aproximación de Heun '''==&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
t=t0;&lt;br /&gt;
q0=0.1;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
r=(240*4)/k; %Tasa intrínseca de crecimiento según el modelo de Verhulst&lt;br /&gt;
q(1)=q0;&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;
     P(i+1)=r*q(i)*(1-q(i)/k);&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)*(1-q(i)/k)-25)&amp;lt;0.1&amp;amp;&amp;amp;r*q(i-1)*(1-q(i-1)/k)&amp;gt;r*q(i)*(1-q(i)/k)&lt;br /&gt;
break&lt;br /&gt;
    end&lt;br /&gt;
    %Heun&lt;br /&gt;
    k1=r*q(i)*(1-q(i)/k);&lt;br /&gt;
    k2=r*(q(i)+k1*h)*(1-(q(i)+k1*h)/k);&lt;br /&gt;
    q(i+1)=q(i)+(h/2)*(k1+k2);       &lt;br /&gt;
    t(i+1)=t(i)+h;       &lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
[maximo,tiempo]=max(P) %maximo de la funcion P y y tiempo en el que se alcanza en años&lt;br /&gt;
N=length(q);&lt;br /&gt;
extraido=q(N); %cantidad de mineral extraida&lt;br /&gt;
sinextraer=k-extraido %cantidad de mineral que queda por extraer&lt;br /&gt;
plot(t,P) }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Heun10.jpg|600px|thumb|Heun]]&lt;br /&gt;
&lt;br /&gt;
=='''Reajuste de Datos  '''==&lt;br /&gt;
En este apartado, se propone la revisión del modelo pasados 12 años. Los datos reales proporcionados son: la cantidad de mineral extraído hasta ese momento es de 2695 toneladas; y la cantidad de mineral que falta por extraer es de 9075 toneladas;(K-Q(12)=9075). Por lo tanto la cantidad total de mineral que se podía extraer es de K= 9075+2695=11770 toneladas.&lt;br /&gt;
&lt;br /&gt;
Basándonos en la indicación del problema la tasa intrínseca de crecimiento (r) se calcula mediante un bucle que dando valores a r para que se obtenga el valor de la cantidad de mineral extraído a los 12 años. &lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos calculado con el modelo de Gompertz inicial los valores de la producción (P) y la cantidad de mineral extraído, para ello hemos utilizado el bucle del apartado uno y la solución del problema de valor inicial planteado. Una vez conocido la cantidad de mineral extraído a lo largo del tiempo hemos tomado el tomado el valor para t=12 años que ocupa la posición número 13 del vector (q). A continuación hemos reajustado el modelo de forma que la nueva población límite pasa a ser de 9075 toneladas. Realizando un bucle &amp;quot;while&amp;quot;  hemos introducido los valores de la producción inicial obteniendo distintos valores para la (r), siendo el que más se aproxima a nuestro valor r=0.0708.&lt;br /&gt;
&lt;br /&gt;
Se observa que la tasa intrínseca de rendimiento (r) es mayor una vez revisado el modelo, lo cual es evidente ya que se han producido mejoras en las técnicas de extracción del mineral.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 clear all, clc&lt;br /&gt;
    b=240&lt;br /&gt;
    k=10875;&lt;br /&gt;
    r0=b*exp(1)/k;&lt;br /&gt;
    t0=0;&lt;br /&gt;
    tN=25;&lt;br /&gt;
    h=1/12; &lt;br /&gt;
    N=(tN-t0)/h;&lt;br /&gt;
    C=log(log(k/0.1));&lt;br /&gt;
    q=zeros(1,N);&lt;br /&gt;
    q(1)=0.1&lt;br /&gt;
    P=zeros(1,N);&lt;br /&gt;
    t=t0:h:tN;&lt;br /&gt;
    for i=1:N&lt;br /&gt;
       P(i)=r0*q(i)*log(k/q(i));&lt;br /&gt;
       q(i+1)=k/(exp(exp(-r0*t(i)+C)));&lt;br /&gt;
    end&lt;br /&gt;
    q0=q(13);&lt;br /&gt;
    K=9075;&lt;br /&gt;
    n=1;&lt;br /&gt;
    while 1&lt;br /&gt;
    r(n)=(C-log(log(K/q(n))))/t(n);&lt;br /&gt;
    if n&amp;gt;1&amp;amp;&amp;amp;q(n)&amp;gt;q0&lt;br /&gt;
        r(n-1);&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
    n=n+1;&lt;br /&gt;
    end&lt;br /&gt;
    r(length(r)) }}&lt;br /&gt;
&lt;br /&gt;
para la nueva r y la nueva K procedemos a realizar la aproximación mediante  el método de Heun y compararla &lt;br /&gt;
para los valores de  &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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=27892</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=27892"/>
				<updated>2015-03-06T11:59:41Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* Modelo Logístico. Aproximación de Heun  */&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;
Dada la ecuación diferencial proporcionada en el problema, donde se tiene la derivada de Q con respecto al tiempo, la función de producción es la propia derivada, ya que Q es la función de distribución y P es la densidad, con lo cual la relación entre ambas es la derivada, esto es:&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&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,&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&lt;br /&gt;
sabemos que la producción máxima es de 240, por tanto, derivando la función P e igualando a 0 obtenemos donde se produce el máximo&lt;br /&gt;
 dP/dt=0    t= c/r&lt;br /&gt;
que introducido en la ecuación  P e igualando a 240 se obtiene el valor de la tase de crecimiento r pedido &lt;br /&gt;
 r= 240e/k =0.06&lt;br /&gt;
&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|500px|centre|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|700px|centre|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;
Sea el problema de valor inicial dQ/dt=r*Q*log(k/Q) tal que Q(0)=0.1, 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;
c=log(log(k/q(1)));&lt;br /&gt;
Q=k/(exp(exp(-r*t+c)));&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;
[[Archivo:abc.jpg|500px|centre|Comparación de gráficos]]&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;
[[Archivo:trabec.jpg|500px|centre|Comparación de gráficos]]&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|centre|Límite]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Representación de la función P(t)'''==&lt;br /&gt;
Se adjunta el código matlab que da la función de producción en función del tiempo. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
t=0:1:200;&lt;br /&gt;
n=length(t);&lt;br /&gt;
Q0=0.1;&lt;br /&gt;
K=10875;&lt;br /&gt;
r=240*exp(1)/K;&lt;br /&gt;
C=log(log(K/Q0));&lt;br /&gt;
for i=1:n&lt;br /&gt;
    P(i)=(K*r*exp(-r*t(i)+C))/(exp(exp(-r*t(i)+C)));&lt;br /&gt;
end&lt;br /&gt;
[maximo,tiempo]=max(P) %maximo de la funcion P y y tiempo en el que se alcanza en años&lt;br /&gt;
plot(t,P)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
El máximo alcanzado por la función P(t) es 239.9906 ton., y se alcanza a los 42 años&lt;br /&gt;
La función resultante es:&lt;br /&gt;
[[Archivo:Graficamat.jpg|500px|centre|Límite]]&lt;br /&gt;
&lt;br /&gt;
=='''Cantidad de mineral sin extraer una vez transcurrida la vida útil '''==&lt;br /&gt;
&lt;br /&gt;
En apartados anteriores hemos obtenido la función de euler para la cantidad de mineral extraído (Q). Creamos un vector q a lo largo del tiempo, y sabemos que en el último punto del vector la función tiene el valor del total extraído. Sabiendo que k es la cantidad total que se puede extraer, basta con restarle a este valor la q calculada para obtener lo que queda sin extraer. Para ello hemos utilizado el siguiente código matlab:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
q0=0.1;             &lt;br /&gt;
h=1/12;&lt;br /&gt;
t=t0;&lt;br /&gt;
k=10875;    &lt;br /&gt;
r=240*exp(1)/k; %Tasa intrínseca de crecimiento modelo de Gompertz&lt;br /&gt;
q(1)=q0;&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)); %euler&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;r*q(i-1)*log(k/q(i-1))&amp;gt;r*q(i)*log(k/q(i))&lt;br /&gt;
break&lt;br /&gt;
    end&lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
N=length(q);&lt;br /&gt;
extraido=q(N); %cantidad de mineral extraida&lt;br /&gt;
sinextraer=k-extraido %cantidad de mineral que queda por extraer }}&lt;br /&gt;
&lt;br /&gt;
La cantidad de mineral que queda sin extraer es:  424.4179 ton.&lt;br /&gt;
&lt;br /&gt;
=='''Modelo Logístico. Aproximación de Heun '''==&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
t=t0;&lt;br /&gt;
q0=0.1;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
r=(240*4)/k; %Tasa intrínseca de crecimiento según el modelo de Verhulst&lt;br /&gt;
q(1)=q0;&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;
     P(i+1)=r*q(i)*(1-q(i)/k);&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)*(1-q(i)/k)-25)&amp;lt;0.1&amp;amp;&amp;amp;r*q(i-1)*(1-q(i-1)/k)&amp;gt;r*q(i)*(1-q(i)/k)&lt;br /&gt;
break&lt;br /&gt;
    end&lt;br /&gt;
    %Heun&lt;br /&gt;
    k1=r*q(i)*(1-q(i)/k);&lt;br /&gt;
    k2=r*(q(i)+k1*h)*(1-(q(i)+k1*h)/k);&lt;br /&gt;
    q(i+1)=q(i)+(h/2)*(k1+k2);       &lt;br /&gt;
    t(i+1)=t(i)+h;       &lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
[maximo,tiempo]=max(P) %maximo de la funcion P y y tiempo en el que se alcanza en años&lt;br /&gt;
N=length(q);&lt;br /&gt;
extraido=q(N); %cantidad de mineral extraida&lt;br /&gt;
sinextraer=k-extraido %cantidad de mineral que queda por extraer&lt;br /&gt;
plot(t,P) }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Heun10.jpg|800px|thumb|Heun]]&lt;br /&gt;
&lt;br /&gt;
=='''Reajuste de Datos  '''==&lt;br /&gt;
En este apartado, se propone la revisión del modelo pasados 12 años. Los datos reales proporcionados son: la cantidad de mineral extraído hasta ese momento es de 2695 toneladas; y la cantidad de mineral que falta por extraer es de 9075 toneladas;(K-Q(12)=9075). Por lo tanto la cantidad total de mineral que se podía extraer es de K= 9075+2695=11770 toneladas.&lt;br /&gt;
&lt;br /&gt;
Basándonos en la indicación del problema la tasa intrínseca de crecimiento (r) se calcula mediante un bucle que dando valores a r para que se obtenga el valor de la cantidad de mineral extraído a los 12 años. &lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos calculado con el modelo de Gompertz inicial los valores de la producción (P) y la cantidad de mineral extraído, para ello hemos utilizado el bucle del apartado uno y la solución del problema de valor inicial planteado. Una vez conocido la cantidad de mineral extraído a lo largo del tiempo hemos tomado el tomado el valor para t=12 años que ocupa la posición número 13 del vector (q). A continuación hemos reajustado el modelo de forma que la nueva población límite pasa a ser de 9075 toneladas. Realizando un bucle &amp;quot;while&amp;quot;  hemos introducido los valores de la producción inicial obteniendo distintos valores para la (r), siendo el que más se aproxima a nuestro valor r=0.0708.&lt;br /&gt;
&lt;br /&gt;
Se observa que la tasa intrínseca de rendimiento (r) es mayor una vez revisado el modelo, lo cual es evidente ya que se han producido mejoras en las técnicas de extracción del mineral.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 clear all, clc&lt;br /&gt;
    b=240&lt;br /&gt;
    k=10875;&lt;br /&gt;
    r0=b*exp(1)/k;&lt;br /&gt;
    t0=0;&lt;br /&gt;
    tN=25;&lt;br /&gt;
    h=1/12; &lt;br /&gt;
    N=(tN-t0)/h;&lt;br /&gt;
    C=log(log(k/0.1));&lt;br /&gt;
    q=zeros(1,N);&lt;br /&gt;
    q(1)=0.1&lt;br /&gt;
    P=zeros(1,N);&lt;br /&gt;
    t=t0:h:tN;&lt;br /&gt;
    for i=1:N&lt;br /&gt;
       P(i)=r0*q(i)*log(k/q(i));&lt;br /&gt;
       q(i+1)=k/(exp(exp(-r0*t(i)+C)));&lt;br /&gt;
    end&lt;br /&gt;
    q0=q(13);&lt;br /&gt;
    K=9075;&lt;br /&gt;
    n=1;&lt;br /&gt;
    while 1&lt;br /&gt;
    r(n)=(C-log(log(K/q(n))))/t(n);&lt;br /&gt;
    if n&amp;gt;1&amp;amp;&amp;amp;q(n)&amp;gt;q0&lt;br /&gt;
        r(n-1);&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
    n=n+1;&lt;br /&gt;
    end&lt;br /&gt;
    r(length(r)) }}&lt;br /&gt;
&lt;br /&gt;
para la nueva r y la nueva K procedemos a realizar la aproximación mediante  el método de Heun y compararla &lt;br /&gt;
para los valores de  &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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Heun10.jpg&amp;diff=27887</id>
		<title>Archivo:Heun10.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Heun10.jpg&amp;diff=27887"/>
				<updated>2015-03-06T11:58:46Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=27885</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=27885"/>
				<updated>2015-03-06T11:58:17Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* Modelo Logístico   */&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;
Dada la ecuación diferencial proporcionada en el problema, donde se tiene la derivada de Q con respecto al tiempo, la función de producción es la propia derivada, ya que Q es la función de distribución y P es la densidad, con lo cual la relación entre ambas es la derivada, esto es:&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&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,&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&lt;br /&gt;
sabemos que la producción máxima es de 240, por tanto, derivando la función P e igualando a 0 obtenemos donde se produce el máximo&lt;br /&gt;
 dP/dt=0    t= c/r&lt;br /&gt;
que introducido en la ecuación  P e igualando a 240 se obtiene el valor de la tase de crecimiento r pedido &lt;br /&gt;
 r= 240e/k =0.06&lt;br /&gt;
&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|500px|centre|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|700px|centre|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;
Sea el problema de valor inicial dQ/dt=r*Q*log(k/Q) tal que Q(0)=0.1, 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;
c=log(log(k/q(1)));&lt;br /&gt;
Q=k/(exp(exp(-r*t+c)));&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;
[[Archivo:abc.jpg|500px|centre|Comparación de gráficos]]&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;
[[Archivo:trabec.jpg|500px|centre|Comparación de gráficos]]&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|centre|Límite]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Representación de la función P(t)'''==&lt;br /&gt;
Se adjunta el código matlab que da la función de producción en función del tiempo. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
t=0:1:200;&lt;br /&gt;
n=length(t);&lt;br /&gt;
Q0=0.1;&lt;br /&gt;
K=10875;&lt;br /&gt;
r=240*exp(1)/K;&lt;br /&gt;
C=log(log(K/Q0));&lt;br /&gt;
for i=1:n&lt;br /&gt;
    P(i)=(K*r*exp(-r*t(i)+C))/(exp(exp(-r*t(i)+C)));&lt;br /&gt;
end&lt;br /&gt;
[maximo,tiempo]=max(P) %maximo de la funcion P y y tiempo en el que se alcanza en años&lt;br /&gt;
plot(t,P)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
El máximo alcanzado por la función P(t) es 239.9906 ton., y se alcanza a los 42 años&lt;br /&gt;
La función resultante es:&lt;br /&gt;
[[Archivo:Graficamat.jpg|500px|centre|Límite]]&lt;br /&gt;
&lt;br /&gt;
=='''Cantidad de mineral sin extraer una vez transcurrida la vida útil '''==&lt;br /&gt;
&lt;br /&gt;
En apartados anteriores hemos obtenido la función de euler para la cantidad de mineral extraído (Q). Creamos un vector q a lo largo del tiempo, y sabemos que en el último punto del vector la función tiene el valor del total extraído. Sabiendo que k es la cantidad total que se puede extraer, basta con restarle a este valor la q calculada para obtener lo que queda sin extraer. Para ello hemos utilizado el siguiente código matlab:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
q0=0.1;             &lt;br /&gt;
h=1/12;&lt;br /&gt;
t=t0;&lt;br /&gt;
k=10875;    &lt;br /&gt;
r=240*exp(1)/k; %Tasa intrínseca de crecimiento modelo de Gompertz&lt;br /&gt;
q(1)=q0;&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)); %euler&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;r*q(i-1)*log(k/q(i-1))&amp;gt;r*q(i)*log(k/q(i))&lt;br /&gt;
break&lt;br /&gt;
    end&lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
N=length(q);&lt;br /&gt;
extraido=q(N); %cantidad de mineral extraida&lt;br /&gt;
sinextraer=k-extraido %cantidad de mineral que queda por extraer }}&lt;br /&gt;
&lt;br /&gt;
La cantidad de mineral que queda sin extraer es:  424.4179 ton.&lt;br /&gt;
&lt;br /&gt;
=='''Modelo Logístico. Aproximación de Heun '''==&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
t=t0;&lt;br /&gt;
q0=0.1;&lt;br /&gt;
h=1/12;&lt;br /&gt;
k=10875;&lt;br /&gt;
r=(240*4)/k; %Tasa intrínseca de crecimiento según el modelo de Verhulst&lt;br /&gt;
q(1)=q0;&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;
     P(i+1)=r*q(i)*(1-q(i)/k);&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)*(1-q(i)/k)-25)&amp;lt;0.1&amp;amp;&amp;amp;r*q(i-1)*(1-q(i-1)/k)&amp;gt;r*q(i)*(1-q(i)/k)&lt;br /&gt;
break&lt;br /&gt;
    end&lt;br /&gt;
    %Heun&lt;br /&gt;
    k1=r*q(i)*(1-q(i)/k);&lt;br /&gt;
    k2=r*(q(i)+k1*h)*(1-(q(i)+k1*h)/k);&lt;br /&gt;
    q(i+1)=q(i)+(h/2)*(k1+k2);       &lt;br /&gt;
    t(i+1)=t(i)+h;       &lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
[maximo,tiempo]=max(P) %maximo de la funcion P y y tiempo en el que se alcanza en años&lt;br /&gt;
N=length(q);&lt;br /&gt;
extraido=q(N); %cantidad de mineral extraida&lt;br /&gt;
sinextraer=k-extraido %cantidad de mineral que queda por extraer&lt;br /&gt;
plot(t,P) }}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Heun10.jpg|300px|thumb|left|Heun]]&lt;br /&gt;
&lt;br /&gt;
=='''Reajuste de Datos  '''==&lt;br /&gt;
En este apartado, se propone la revisión del modelo pasados 12 años. Los datos reales proporcionados son: la cantidad de mineral extraído hasta ese momento es de 2695 toneladas; y la cantidad de mineral que falta por extraer es de 9075 toneladas;(K-Q(12)=9075). Por lo tanto la cantidad total de mineral que se podía extraer es de K= 9075+2695=11770 toneladas.&lt;br /&gt;
&lt;br /&gt;
Basándonos en la indicación del problema la tasa intrínseca de crecimiento (r) se calcula mediante un bucle que dando valores a r para que se obtenga el valor de la cantidad de mineral extraído a los 12 años. &lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos calculado con el modelo de Gompertz inicial los valores de la producción (P) y la cantidad de mineral extraído, para ello hemos utilizado el bucle del apartado uno y la solución del problema de valor inicial planteado. Una vez conocido la cantidad de mineral extraído a lo largo del tiempo hemos tomado el tomado el valor para t=12 años que ocupa la posición número 13 del vector (q). A continuación hemos reajustado el modelo de forma que la nueva población límite pasa a ser de 9075 toneladas. Realizando un bucle &amp;quot;while&amp;quot;  hemos introducido los valores de la producción inicial obteniendo distintos valores para la (r), siendo el que más se aproxima a nuestro valor r=0.0708.&lt;br /&gt;
&lt;br /&gt;
Se observa que la tasa intrínseca de rendimiento (r) es mayor una vez revisado el modelo, lo cual es evidente ya que se han producido mejoras en las técnicas de extracción del mineral.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 clear all, clc&lt;br /&gt;
    b=240&lt;br /&gt;
    k=10875;&lt;br /&gt;
    r0=b*exp(1)/k;&lt;br /&gt;
    t0=0;&lt;br /&gt;
    tN=25;&lt;br /&gt;
    h=1/12; &lt;br /&gt;
    N=(tN-t0)/h;&lt;br /&gt;
    C=log(log(k/0.1));&lt;br /&gt;
    q=zeros(1,N);&lt;br /&gt;
    q(1)=0.1&lt;br /&gt;
    P=zeros(1,N);&lt;br /&gt;
    t=t0:h:tN;&lt;br /&gt;
    for i=1:N&lt;br /&gt;
       P(i)=r0*q(i)*log(k/q(i));&lt;br /&gt;
       q(i+1)=k/(exp(exp(-r0*t(i)+C)));&lt;br /&gt;
    end&lt;br /&gt;
    q0=q(13);&lt;br /&gt;
    K=9075;&lt;br /&gt;
    n=1;&lt;br /&gt;
    while 1&lt;br /&gt;
    r(n)=(C-log(log(K/q(n))))/t(n);&lt;br /&gt;
    if n&amp;gt;1&amp;amp;&amp;amp;q(n)&amp;gt;q0&lt;br /&gt;
        r(n-1);&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
    n=n+1;&lt;br /&gt;
    end&lt;br /&gt;
    r(length(r)) }}&lt;br /&gt;
&lt;br /&gt;
para la nueva r y la nueva K procedemos a realizar la aproximación mediante  el método de Heun y compararla &lt;br /&gt;
para los valores de  &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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=27728</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=27728"/>
				<updated>2015-03-06T11:23:38Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* Representación de la función P(t) */&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;
Dada la ecuación diferencial proporcionada en el problema, donde se tiene la derivada de Q con respecto al tiempo, la función de producción es la propia derivada, ya que Q es la función de distribución y P es la densidad, con lo cual la relación entre ambas es la derivada, esto es:&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&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,&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&lt;br /&gt;
sabemos que la producción máxima es de 240, por tanto, derivando la función P e igualando a 0 obtenemos donde se produce el máximo&lt;br /&gt;
 dP/dt=0    t= c/r&lt;br /&gt;
que introducido en la ecuación  P e igualando a 240 se obtiene el valor de la tase de crecimiento r pedido &lt;br /&gt;
 r= 240e/k =0.06&lt;br /&gt;
&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|500px|centre|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|700px|centre|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;
Sea el problema de valor inicial dQ/dt=r*Q*log(k/Q) tal que Q(0)=0.1, 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;
c=log(log(k/q(1)));&lt;br /&gt;
Q=k/(exp(exp(-r*t+c)));&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;
[[Archivo:abc.jpg|500px|centre|Comparación de gráficos]]&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;
[[Archivo:trabec.jpg|500px|centre|Comparación de gráficos]]&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|centre|Límite]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Representación de la función P(t)'''==&lt;br /&gt;
Se adjunta el código matlab que da la función de producción en función del tiempo. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
t=0:1:200;&lt;br /&gt;
n=length(t);&lt;br /&gt;
Q0=0.1;&lt;br /&gt;
K=10875;&lt;br /&gt;
r=240*exp(1)/K;&lt;br /&gt;
C=log(log(K/Q0));&lt;br /&gt;
for i=1:n&lt;br /&gt;
    P(i)=(K*r*exp(-r*t(i)+C))/(exp(exp(-r*t(i)+C)));&lt;br /&gt;
end&lt;br /&gt;
[maximo,tiempo]=max(P) %maximo de la funcion P y y tiempo en el que se alcanza en años&lt;br /&gt;
plot(t,P)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
El máximo alcanzado por la función P(t) es 239.9906 ton., y se alcanza a los 42 años&lt;br /&gt;
La función resultante es:&lt;br /&gt;
[[Archivo:Graficamat.jpg|500px|centre|Límite]]&lt;br /&gt;
&lt;br /&gt;
=='''Cantidad de mineral sin extraer una vez transcurrida la vida útil '''==&lt;br /&gt;
&lt;br /&gt;
En apartados anteriores hemos obtenido la función de euler para la cantidad de mineral extraído (Q). Creamos un vector q a lo largo del tiempo, y sabemos que en el último punto del vector la función tiene el valor del total extraído. Sabiendo que k es la cantidad total que se puede extraer, basta con restarle a este valor la q calculada para obtener lo que queda sin extraer. Para ello hemos utilizado el siguiente código matlab:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
q0=0.1;             &lt;br /&gt;
h=1/12;&lt;br /&gt;
t=t0;&lt;br /&gt;
k=10875;    &lt;br /&gt;
r=240*exp(1)/k; %Tasa intrínseca de crecimiento modelo de Gompertz&lt;br /&gt;
q(1)=q0;&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)); %euler&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;r*q(i-1)*log(k/q(i-1))&amp;gt;r*q(i)*log(k/q(i))&lt;br /&gt;
break&lt;br /&gt;
    end&lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
N=length(q);&lt;br /&gt;
extraido=q(N); %cantidad de mineral extraida&lt;br /&gt;
sinextraer=k-extraido %cantidad de mineral que queda por extraer }}&lt;br /&gt;
&lt;br /&gt;
La cantidad de mineral que queda sin extraer es:  424.4179 ton.&lt;br /&gt;
&lt;br /&gt;
=='''Modelo Logístico  '''==&lt;br /&gt;
=='''Reajuste de Datos  '''==&lt;br /&gt;
En este apartado, se propone la revisión del modelo pasados 12 años. Los datos reales proporcionados son: la cantidad de mineral extraído hasta ese momento es de 2695 toneladas; y la cantidad de mineral que falta por extraer es de 9075 toneladas;(K-Q(12)=9075). Por lo tanto la cantidad total de mineral que se podía extraer es de K= 9075+2695=11770 toneladas.&lt;br /&gt;
&lt;br /&gt;
Basándonos en la indicación del problema la tasa intrínseca de crecimiento (r) se calcula mediante un bucle que dando valores a r para que se obtenga el valor de la cantidad de mineral extraído a los 12 años. &lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos calculado con el modelo de Gompertz inicial los valores de la producción (P) y la cantidad de mineral extraído, para ello hemos utilizado el bucle del apartado uno y la solución del problema de valor inicial planteado. Una vez conocido la cantidad de mineral extraído a lo largo del tiempo hemos tomado el tomado el valor para t=12 años que ocupa la posición número 13 del vector (q). A continuación hemos reajustado el modelo de forma que la nueva población límite pasa a ser de 9075 toneladas. Realizando un bucle &amp;quot;while&amp;quot;  hemos introducido los valores de la producción inicial obteniendo distintos valores para la (r), siendo el que más se aproxima a nuestro valor r=0.0708.&lt;br /&gt;
&lt;br /&gt;
Se observa que la tasa intrínseca de rendimiento (r) es mayor una vez revisado el modelo, lo cual es evidente ya que se han producido mejoras en las técnicas de extracción del mineral.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 clear all, clc&lt;br /&gt;
    b=240&lt;br /&gt;
    k=10875;&lt;br /&gt;
    r0=b*exp(1)/k;&lt;br /&gt;
    t0=0;&lt;br /&gt;
    tN=25;&lt;br /&gt;
    h=1/12; &lt;br /&gt;
    N=(tN-t0)/h;&lt;br /&gt;
    C=log(log(k/0.1));&lt;br /&gt;
    q=zeros(1,N);&lt;br /&gt;
    q(1)=0.1&lt;br /&gt;
    P=zeros(1,N);&lt;br /&gt;
    t=t0:h:tN;&lt;br /&gt;
    for i=1:N&lt;br /&gt;
       P(i)=r0*q(i)*log(k/q(i));&lt;br /&gt;
       q(i+1)=k/(exp(exp(-r0*t(i)+C)));&lt;br /&gt;
    end&lt;br /&gt;
    q0=q(13);&lt;br /&gt;
    K=9075;&lt;br /&gt;
    n=1;&lt;br /&gt;
    while 1&lt;br /&gt;
    r(n)=(C-log(log(K/q(n))))/t(n);&lt;br /&gt;
    if n&amp;gt;1&amp;amp;&amp;amp;q(n)&amp;gt;q0&lt;br /&gt;
        r(n-1);&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
    n=n+1;&lt;br /&gt;
    end&lt;br /&gt;
    r(length(r)) }}&lt;br /&gt;
&lt;br /&gt;
para la nueva r y la nueva K procedemos a realizar la aproximación mediante  el método de Heun y compararla &lt;br /&gt;
para los valores de  &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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=27723</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=27723"/>
				<updated>2015-03-06T11:22:43Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* Representación de la función P(t) */&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;
Dada la ecuación diferencial proporcionada en el problema, donde se tiene la derivada de Q con respecto al tiempo, la función de producción es la propia derivada, ya que Q es la función de distribución y P es la densidad, con lo cual la relación entre ambas es la derivada, esto es:&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&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,&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&lt;br /&gt;
sabemos que la producción máxima es de 240, por tanto, derivando la función P e igualando a 0 obtenemos donde se produce el máximo&lt;br /&gt;
 dP/dt=0    t= c/r&lt;br /&gt;
que introducido en la ecuación  P e igualando a 240 se obtiene el valor de la tase de crecimiento r pedido &lt;br /&gt;
 r= 240e/k =0.06&lt;br /&gt;
&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|500px|centre|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|700px|centre|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;
Sea el problema de valor inicial dQ/dt=r*Q*log(k/Q) tal que Q(0)=0.1, 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;
c=log(log(k/q(1)));&lt;br /&gt;
Q=k/(exp(exp(-r*t+c)));&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;
[[Archivo:abc.jpg|500px|centre|Comparación de gráficos]]&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;
[[Archivo:trabec.jpg|500px|centre|Comparación de gráficos]]&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|centre|Límite]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Representación de la función P(t)'''==&lt;br /&gt;
Se adjunta el código matlab que da la función de producción en función del tiempo. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
t=0:1:200;&lt;br /&gt;
n=length(t);&lt;br /&gt;
Q0=0.1;&lt;br /&gt;
K=10875;&lt;br /&gt;
r=240*exp(1)/K;&lt;br /&gt;
C=log(log(K/Q0));&lt;br /&gt;
for i=1:n&lt;br /&gt;
    P(i)=(K*r*exp(-r*t(i)+C))/(exp(exp(-r*t(i)+C)));&lt;br /&gt;
end&lt;br /&gt;
[maximo,tiempo]=max(P) %maximo de la funcion P y y tiempo en el que se alcanza en años&lt;br /&gt;
plot(t,P)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
El máximo alcanzado por la función P(t) es 239.9906 ton., y se alcanza a los 42 años&lt;br /&gt;
La función resultante es:&lt;br /&gt;
[[Archivo:Graficamat.jpg|500px|centre|Límite]]&lt;br /&gt;
El punto de máxima producción se encuentra en P=239.9906, en un tiempo de aproximadamente 40 años, que se obtiene en matlab mediante el comando 'max'.&lt;br /&gt;
&lt;br /&gt;
=='''Cantidad de mineral sin extraer una vez transcurrida la vida útil '''==&lt;br /&gt;
&lt;br /&gt;
En apartados anteriores hemos obtenido la función de euler para la cantidad de mineral extraído (Q). Creamos un vector q a lo largo del tiempo, y sabemos que en el último punto del vector la función tiene el valor del total extraído. Sabiendo que k es la cantidad total que se puede extraer, basta con restarle a este valor la q calculada para obtener lo que queda sin extraer. Para ello hemos utilizado el siguiente código matlab:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
q0=0.1;             &lt;br /&gt;
h=1/12;&lt;br /&gt;
t=t0;&lt;br /&gt;
k=10875;    &lt;br /&gt;
r=240*exp(1)/k; %Tasa intrínseca de crecimiento modelo de Gompertz&lt;br /&gt;
q(1)=q0;&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)); %euler&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;r*q(i-1)*log(k/q(i-1))&amp;gt;r*q(i)*log(k/q(i))&lt;br /&gt;
break&lt;br /&gt;
    end&lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
N=length(q);&lt;br /&gt;
extraido=q(N); %cantidad de mineral extraida&lt;br /&gt;
sinextraer=k-extraido %cantidad de mineral que queda por extraer }}&lt;br /&gt;
&lt;br /&gt;
La cantidad de mineral que queda sin extraer es:  424.4179 ton.&lt;br /&gt;
&lt;br /&gt;
=='''Modelo Logístico  '''==&lt;br /&gt;
=='''Reajuste de Datos  '''==&lt;br /&gt;
En este apartado, se propone la revisión del modelo pasados 12 años. Los datos reales proporcionados son: la cantidad de mineral extraído hasta ese momento es de 2695 toneladas; y la cantidad de mineral que falta por extraer es de 9075 toneladas;(K-Q(12)=9075). Por lo tanto la cantidad total de mineral que se podía extraer es de K= 9075+2695=11770 toneladas.&lt;br /&gt;
&lt;br /&gt;
Basándonos en la indicación del problema la tasa intrínseca de crecimiento (r) se calcula mediante un bucle que dando valores a r para que se obtenga el valor de la cantidad de mineral extraído a los 12 años. &lt;br /&gt;
&lt;br /&gt;
En primer lugar hemos calculado con el modelo de Gompertz inicial los valores de la producción (P) y la cantidad de mineral extraído, para ello hemos utilizado el bucle del apartado uno y la solución del problema de valor inicial planteado. Una vez conocido la cantidad de mineral extraído a lo largo del tiempo hemos tomado el tomado el valor para t=12 años que ocupa la posición número 13 del vector (q). A continuación hemos reajustado el modelo de forma que la nueva población límite pasa a ser de 9075 toneladas. Realizando un bucle &amp;quot;while&amp;quot;  hemos introducido los valores de la producción inicial obteniendo distintos valores para la (r), siendo el que más se aproxima a nuestro valor r=0.0708.&lt;br /&gt;
&lt;br /&gt;
Se observa que la tasa intrínseca de rendimiento (r) es mayor una vez revisado el modelo, lo cual es evidente ya que se han producido mejoras en las técnicas de extracción del mineral.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 clear all, clc&lt;br /&gt;
    b=240&lt;br /&gt;
    k=10875;&lt;br /&gt;
    r0=b*exp(1)/k;&lt;br /&gt;
    t0=0;&lt;br /&gt;
    tN=25;&lt;br /&gt;
    h=1/12; &lt;br /&gt;
    N=(tN-t0)/h;&lt;br /&gt;
    C=log(log(k/0.1));&lt;br /&gt;
    q=zeros(1,N);&lt;br /&gt;
    q(1)=0.1&lt;br /&gt;
    P=zeros(1,N);&lt;br /&gt;
    t=t0:h:tN;&lt;br /&gt;
    for i=1:N&lt;br /&gt;
       P(i)=r0*q(i)*log(k/q(i));&lt;br /&gt;
       q(i+1)=k/(exp(exp(-r0*t(i)+C)));&lt;br /&gt;
    end&lt;br /&gt;
    q0=q(13);&lt;br /&gt;
    K=9075;&lt;br /&gt;
    n=1;&lt;br /&gt;
    while 1&lt;br /&gt;
    r(n)=(C-log(log(K/q(n))))/t(n);&lt;br /&gt;
    if n&amp;gt;1&amp;amp;&amp;amp;q(n)&amp;gt;q0&lt;br /&gt;
        r(n-1);&lt;br /&gt;
        break&lt;br /&gt;
    end&lt;br /&gt;
    n=n+1;&lt;br /&gt;
    end&lt;br /&gt;
    r(length(r)) }}&lt;br /&gt;
&lt;br /&gt;
para la nueva r y la nueva K procedemos a realizar la aproximación mediante  el método de Heun y compararla &lt;br /&gt;
para los valores de  &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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=27437</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=27437"/>
				<updated>2015-03-06T09:40:09Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* Cantidad de mineral sin extraer una vez transcurrida la vida útil  */&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;
Dada la ecuación diferencial proporcionada en el problema, donde se tiene la derivada de Q con respecto al tiempo, la función de producción es la propia derivada, ya que Q es la función de distribución y P es la densidad, con lo cual la relación entre ambas es la derivada, esto es:&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&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,&lt;br /&gt;
 dx/dt=rQ log(K/Q)=P&lt;br /&gt;
sabemos que la producción máxima es de 240, por tanto, derivando la función P e igualando a 0 obtenemos donde se produce el máximo&lt;br /&gt;
 dP/dt=0    t= c/r&lt;br /&gt;
que introducido en la ecuación  P e igualando a 240 se obtiene el valor de la tase de crecimiento r pedido &lt;br /&gt;
 r= 240e/k =0.06&lt;br /&gt;
&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|500px|centre|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|700px|centre|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;
Sea el problema de valor inicial dQ/dt=r*Q*log(k/Q) tal que Q(0)=0.1, 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;
c=log(log(k/q(1)));&lt;br /&gt;
Q=k/(exp(exp(-r*t+c)));&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;
[[Archivo:abc.jpg|500px|centre|Comparación de gráficos]]&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;
[[Archivo:trabec.jpg|500px|centre|Comparación de gráficos]]&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|centre|Límite]]&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=='''Representación de la función P(t)'''==&lt;br /&gt;
Se adjunta el código matlab que da la función de producción en función del tiempo. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
clear all&lt;br /&gt;
t=0:1:200;&lt;br /&gt;
n=length(t);&lt;br /&gt;
Q0=0.1;&lt;br /&gt;
K=10875;&lt;br /&gt;
r=240*exp(1)/K;&lt;br /&gt;
C=log(log(K/Q0));&lt;br /&gt;
for i=1:n&lt;br /&gt;
    P(i)=(K*r*exp(-r*t(i)+C))/(exp(exp(-r*t(i)+C)));&lt;br /&gt;
    &lt;br /&gt;
end&lt;br /&gt;
plot(t,P)&lt;br /&gt;
}}&lt;br /&gt;
La función resultante es:&lt;br /&gt;
[[Archivo:Graficamat.jpg|500px|centre|Límite]]&lt;br /&gt;
El punto de máxima producción se encuentra en P=239.9906, en un tiempo de aproximadamente 40 años, que se obtiene en matlab mediante el comando 'max'.&lt;br /&gt;
=='''Cantidad de mineral sin extraer una vez transcurrida la vida útil '''==&lt;br /&gt;
&lt;br /&gt;
En apartados anteriores hemos obtenido la función de euler para la cantidad de mineral extraído (Q). Creamos un vector q a lo largo del tiempo, y sabemos que en el último punto del vector la función tiene el valor del total extraído. Sabiendo que k es la cantidad total que se puede extraer, basta con restarle a este valor la q calculada para obtener lo que queda sin extraer. Para ello hemos utilizado el siguiente código matlab:&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
t0=0;&lt;br /&gt;
q0=0.1;             &lt;br /&gt;
h=1/12;&lt;br /&gt;
t=t0;&lt;br /&gt;
k=10875;    &lt;br /&gt;
r=240*exp(1)/k; %Tasa intrínseca de crecimiento modelo de Gompertz&lt;br /&gt;
q(1)=q0;&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)); %euler&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;r*q(i-1)*log(k/q(i-1))&amp;gt;r*q(i)*log(k/q(i))&lt;br /&gt;
break&lt;br /&gt;
    end&lt;br /&gt;
   i=i+1;&lt;br /&gt;
end&lt;br /&gt;
N=length(q);&lt;br /&gt;
extraido=q(N); %cantidad de mineral extraida&lt;br /&gt;
sinextraer=k-extraido %cantidad de mineral que queda por extraer }}&lt;br /&gt;
&lt;br /&gt;
La cantidad de mineral que queda sin extraer es:  424.4179 ton.&lt;br /&gt;
&lt;br /&gt;
=='''Modelo Logístico  '''==&lt;br /&gt;
=='''Reajuste de Datos  '''==&lt;br /&gt;
En este apartado, se propone la revisión del modelo pasados 12 años. los datos reales proporcionados son: la cantidad de mineral extraida hasta ese momento es de 2695 toneladas; y la cantidad de mineral que falta por extraer es de 9075 toneladas;(K-Q(12)=9075). Por lo tanto la cantidad total de mineral que se podía extraer es de K= 9075+2695=11770 toneladas.&lt;br /&gt;
&lt;br /&gt;
Basándonos en la indicación del problema la tasa intrínseca de crecimiento (r) se calcula mediante un bucle que dando valores a r para que se obtenga el valor de la cantidad de mineral extraído a los 12 años. Se tomará como valor de (r) el que mas aproxime al valor real de Q.&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>Charoruizserrano</name></author>	</entry>

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

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26352</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=26352"/>
				<updated>2015-03-05T12:09:58Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: &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;
&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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26350</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=26350"/>
				<updated>2015-03-05T12:09:42Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: &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:Gompertz.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;
&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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26291</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=26291"/>
				<updated>2015-03-05T11:54:09Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* Relación entre la producción y el volumen de toneladas extraídas modelo de Verhulst */&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;
&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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26279</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=26279"/>
				<updated>2015-03-05T11:53:06Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* Relación entre la producción y el volumen de toneladas extraídas modelo de Verhulst */&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. 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;
&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;
&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;
&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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26272</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=26272"/>
				<updated>2015-03-05T11:52:16Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* Relación entre la producción y el volumen de toneladas extraídas modelo de Verhulst */&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. 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;
&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;
&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;
&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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26268</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=26268"/>
				<updated>2015-03-05T11:51:26Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: &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. 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;
&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;
&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;
=='''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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26261</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=26261"/>
				<updated>2015-03-05T11:50:27Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: &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;
=='''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. 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;
&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;
&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;
&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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Verhulst.jpg&amp;diff=26258</id>
		<title>Archivo:Verhulst.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Verhulst.jpg&amp;diff=26258"/>
				<updated>2015-03-05T11:49:35Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26255</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=26255"/>
				<updated>2015-03-05T11:48:52Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* Relación entre la producción y el volumen de toneladas extraídas modelo de Verhulst */&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;
=='''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. 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;
&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;
&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;
=='''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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Explotaci%C3%B3n_Minera_(G15-C)&amp;diff=26244</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=26244"/>
				<updated>2015-03-05T11:45:53Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: &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;
=='''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. 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;
&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;
&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:.jpg|800px|thumb|left|Comparación de gráficos]]&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>Charoruizserrano</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=23075</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=23075"/>
				<updated>2014-12-16T08:56:43Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* MASA DE LA PLACA */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&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]]|Pablo Ribao Gil &amp;lt;br /&amp;gt;&lt;br /&gt;
Paco Durán Muñoz &amp;lt;br /&amp;gt;&lt;br /&gt;
Almudena Román Sánchez-Rey &amp;lt;br /&amp;gt;&lt;br /&gt;
Mª del Rosario Ruiz-Serrano Mulas}}&amp;lt;br /&amp;gt;&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
 [[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&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;
[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;
contour(x,y,T) %Dibujo de las curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,px,py) %Dibujo del gradiente&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. También se ve que el aumento de volumen se produce de forma lineal, con valores entre 0 y 0.8.&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 A 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:Captura8.png|Tensiones normales a la dirección del vector i&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===TENSIONES NORMALES A 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 a 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;
&lt;br /&gt;
===TENSIÓN DE VON MISES===&lt;br /&gt;
La tensión de Von Mises se define por la fórmula:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
vonmises=[];                                                       %Vector vacío para la primera interacción.&lt;br /&gt;
for y=linspace(0,4,50);                                            %Bucle para crear el vector vonmises&lt;br /&gt;
    A=[y/5 0 0;0 3*y/5 0;0 0 y/5];                                 %Matriz A&lt;br /&gt;
    L=eig(A);                                                      %Función para sacar los autovalores de la matriz A&lt;br /&gt;
    ecuacion= sqrt(((L(1)-L(2))^2+(L(2)-L(3))^2+(L(3)-L(1))^2)/2); %Ecuación de la tensión de Von Mises&lt;br /&gt;
    vonmises=[vonmises,ecuacion]                                   %Creación del vector vonmises a partir de las tensiones de las interacciones anteriores&lt;br /&gt;
end&lt;br /&gt;
plot(vonmises)                                                     %Gráfica de tensiones&lt;br /&gt;
max(vonmises)                                                      %Valor máximo del vector&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura11def.png|Tensión de Von Mises&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El punto en el que se alcanza el máximo valor será y=4, este valor es 1,6.&lt;br /&gt;
&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)=abs(xylog{x+2}) &amp;lt;/math&amp;gt;. La masa total de nuestra placa es 1.6578&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=0; 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=abs(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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura11def.png&amp;diff=20848</id>
		<title>Archivo:Captura11def.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura11def.png&amp;diff=20848"/>
				<updated>2014-12-04T20:01:38Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: Tensión de Von Mises&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Tensión de Von Mises&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</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=20843</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=20843"/>
				<updated>2014-12-04T20:00:01Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* TENSIÓN DE VON MISES */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&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]]|Pablo Ribao Gil &amp;lt;br /&amp;gt;&lt;br /&gt;
Paco Durán Muñoz &amp;lt;br /&amp;gt;&lt;br /&gt;
Almudena Román Sánchez-Rey &amp;lt;br /&amp;gt;&lt;br /&gt;
Mª del Rosario Ruiz-Serrano Mulas}}&amp;lt;br /&amp;gt;&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
 [[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&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;
[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;
contour(x,y,T) %Dibujo de las curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,px,py) %Dibujo del gradiente&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. También se ve que el aumento de volumen se produce de forma lineal, con valores entre 0 y 0.8.&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 A 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:Captura8.png|Tensiones normales a la dirección del vector i&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===TENSIONES NORMALES A 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 a 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;
&lt;br /&gt;
===TENSIÓN DE VON MISES===&lt;br /&gt;
La tensión de Von Mises se define por la fórmula:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
vonmises=[];                                                       %Vector vacío para la primera interacción.&lt;br /&gt;
for y=linspace(0,4,50);                                            %Bucle para crear el vector vonmises&lt;br /&gt;
    A=[y/5 0 0;0 3*y/5 0;0 0 y/5];                                 %Matriz A&lt;br /&gt;
    L=eig(A);                                                      %Función para sacar los autovalores de la matriz A&lt;br /&gt;
    ecuacion= sqrt(((L(1)-L(2))^2+(L(2)-L(3))^2+(L(3)-L(1))^2)/2); %Ecuación de la tensión de Von Mises&lt;br /&gt;
    vonmises=[vonmises,ecuacion]                                   %Creación del vector vonmises a partir de las tensiones de las interacciones anteriores&lt;br /&gt;
end&lt;br /&gt;
plot(vonmises)                                                     %Gráfica de tensiones&lt;br /&gt;
max(vonmises)                                                      %Valor máximo del vector&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura11def.png|Tensión de Von Mises&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El punto en el que se alcanza el máximo valor será y=4, este valor es 1,6.&lt;br /&gt;
&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.4579&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=0; 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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura11.png&amp;diff=20841</id>
		<title>Archivo:Captura11.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura11.png&amp;diff=20841"/>
				<updated>2014-12-04T19:59:22Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: Tensión de Von Mises&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Tensión de Von Mises&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</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=20837</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=20837"/>
				<updated>2014-12-04T19:58:50Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* TENSIÓN DE VON MISES */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&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]]|Pablo Ribao Gil &amp;lt;br /&amp;gt;&lt;br /&gt;
Paco Durán Muñoz &amp;lt;br /&amp;gt;&lt;br /&gt;
Almudena Román Sánchez-Rey &amp;lt;br /&amp;gt;&lt;br /&gt;
Mª del Rosario Ruiz-Serrano Mulas}}&amp;lt;br /&amp;gt;&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
 [[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&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;
[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;
contour(x,y,T) %Dibujo de las curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,px,py) %Dibujo del gradiente&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. También se ve que el aumento de volumen se produce de forma lineal, con valores entre 0 y 0.8.&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 A 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:Captura8.png|Tensiones normales a la dirección del vector i&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===TENSIONES NORMALES A 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 a 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;
&lt;br /&gt;
===TENSIÓN DE VON MISES===&lt;br /&gt;
La tensión de Von Mises se define por la fórmula:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
vonmises=[];                                                       %Vector vacío para la primera interacción.&lt;br /&gt;
for y=linspace(0,4,50);                                            %Bucle para crear el vector vonmises&lt;br /&gt;
    A=[y/5 0 0;0 3*y/5 0;0 0 y/5];                                 %Matriz A&lt;br /&gt;
    L=eig(A);                                                      %Función para sacar los autovalores de la matriz A&lt;br /&gt;
    ecuacion= sqrt(((L(1)-L(2))^2+(L(2)-L(3))^2+(L(3)-L(1))^2)/2); %Ecuación de la tensión de Von Mises&lt;br /&gt;
    vonmises=[vonmises,ecuacion]                                   %Creación del vector vonmises a partir de las tensiones de las interacciones anteriores&lt;br /&gt;
end&lt;br /&gt;
plot(vonmises)                                                     %Gráfica de tensiones&lt;br /&gt;
max(vonmises)                                                      %Valor máximo del vector&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura11.png|Tensión de Von Mises&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
El punto en el que se alcanza el máximo valor será y=4, este valor es 1,6.&lt;br /&gt;
&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.4579&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=0; 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>Charoruizserrano</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=20602</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=20602"/>
				<updated>2014-12-04T16:48:51Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* DIVERGENCIA DE \vec{U}  */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&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]]|Pablo Ribao Gil &amp;lt;br /&amp;gt;&lt;br /&gt;
Paco Durán Muñoz &amp;lt;br /&amp;gt;&lt;br /&gt;
Almudena Román Sánchez-Rey &amp;lt;br /&amp;gt;&lt;br /&gt;
Mª del Rosario Ruiz-Serrano Mulas}}&amp;lt;br /&amp;gt;&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
 [[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&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;
[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;
contour(x,y,T) %Dibujo de las curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,px,py) %Dibujo del gradiente&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. También se ve que el aumento de volumen se produce de forma lineal, con valores entre 0 y 0.8.&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 A 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:Captura8.png|Tensiones normales a la dirección del vector i&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===TENSIONES NORMALES A 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 a 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;
&lt;br /&gt;
===TENSIÓN DE VON MISES===&lt;br /&gt;
La tensión de Von Mises se define por la fórmula:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
vonmises=[];                                                       %Vector vacío para la primera interacción.&lt;br /&gt;
for y=linspace(0,4,50);                                            %Bucle para crear el vector vonmises&lt;br /&gt;
    A=[y/5 0 0;0 3*y/5 0;0 0 y/5];                                 %Matriz A&lt;br /&gt;
    L=eig(A);                                                      %Función para sacar los autovalores de la matriz A&lt;br /&gt;
    ecuacion= sqrt(((L(1)-L(2))^2+(L(2)-L(3))^2+(L(3)-L(1))^2)/2); %Ecuación de la tensión de Von Mises&lt;br /&gt;
    vonmises=[vonmises,ecuacion]                                   %Creación del vector vonmises a partir de las tensiones de las interacciones anteriores&lt;br /&gt;
end&lt;br /&gt;
plot(vonmises)                                                     %Gráfica de tensiones&lt;br /&gt;
max(vonmises)                                                      %Valor máximo del vector&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
El punto en el que se alcanza el máximo valor será y=4, este valor es 1,6.&lt;br /&gt;
&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.4579&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=0; 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>Charoruizserrano</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=20586</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=20586"/>
				<updated>2014-12-04T16:42:19Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* DIVERGENCIA DE \vec{U}  */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&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]]|Pablo Ribao Gil &amp;lt;br /&amp;gt;&lt;br /&gt;
Paco Durán Muñoz &amp;lt;br /&amp;gt;&lt;br /&gt;
Almudena Román Sánchez-Rey &amp;lt;br /&amp;gt;&lt;br /&gt;
Mª del Rosario Ruiz-Serrano Mulas}}&amp;lt;br /&amp;gt;&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
 [[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&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;
[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;
contour(x,y,T) %Dibujo de las curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,px,py) %Dibujo del gradiente&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. También se ve que el aumento de volumen se produce de forma lineal.&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 A 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:Captura8.png|Tensiones normales a la dirección del vector i&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===TENSIONES NORMALES A 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 a 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;
&lt;br /&gt;
===TENSIÓN DE VON MISES===&lt;br /&gt;
La tensión de Von Mises se define por la fórmula:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
vonmises=[];                                                       %Vector vacío para la primera interacción.&lt;br /&gt;
for y=linspace(0,4,50);                                            %Bucle para crear el vector vonmises&lt;br /&gt;
    A=[y/5 0 0;0 3*y/5 0;0 0 y/5];                                 %Matriz A&lt;br /&gt;
    L=eig(A);                                                      %Función para sacar los autovalores de la matriz A&lt;br /&gt;
    ecuacion= sqrt(((L(1)-L(2))^2+(L(2)-L(3))^2+(L(3)-L(1))^2)/2); %Ecuación de la tensión de Von Mises&lt;br /&gt;
    vonmises=[vonmises,ecuacion]                                   %Creación del vector vonmises a partir de las tensiones de las interacciones anteriores&lt;br /&gt;
end&lt;br /&gt;
plot(vonmises)                                                     %Gráfica de tensiones&lt;br /&gt;
max(vonmises)                                                      %Valor máximo del vector&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
El punto en el que se alcanza el máximo valor será y=4, este valor es 1,6.&lt;br /&gt;
&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.4579&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=0; 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>Charoruizserrano</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=20581</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=20581"/>
				<updated>2014-12-04T16:41:52Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* DIVERGENCIA DE \vec{U}  */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&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]]|Pablo Ribao Gil &amp;lt;br /&amp;gt;&lt;br /&gt;
Paco Durán Muñoz &amp;lt;br /&amp;gt;&lt;br /&gt;
Almudena Román Sánchez-Rey &amp;lt;br /&amp;gt;&lt;br /&gt;
Mª del Rosario Ruiz-Serrano Mulas}}&amp;lt;br /&amp;gt;&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
 [[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&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;
[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;
contour(x,y,T) %Dibujo de las curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,px,py) %Dibujo del gradiente&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. También se ve que el aumento de volumen se produce de forma lineal&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 A 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:Captura8.png|Tensiones normales a la dirección del vector i&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===TENSIONES NORMALES A 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 a 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;
&lt;br /&gt;
===TENSIÓN DE VON MISES===&lt;br /&gt;
La tensión de Von Mises se define por la fórmula:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
vonmises=[];                                                       %Vector vacío para la primera interacción.&lt;br /&gt;
for y=linspace(0,4,50);                                            %Bucle para crear el vector vonmises&lt;br /&gt;
    A=[y/5 0 0;0 3*y/5 0;0 0 y/5];                                 %Matriz A&lt;br /&gt;
    L=eig(A);                                                      %Función para sacar los autovalores de la matriz A&lt;br /&gt;
    ecuacion= sqrt(((L(1)-L(2))^2+(L(2)-L(3))^2+(L(3)-L(1))^2)/2); %Ecuación de la tensión de Von Mises&lt;br /&gt;
    vonmises=[vonmises,ecuacion]                                   %Creación del vector vonmises a partir de las tensiones de las interacciones anteriores&lt;br /&gt;
end&lt;br /&gt;
plot(vonmises)                                                     %Gráfica de tensiones&lt;br /&gt;
max(vonmises)                                                      %Valor máximo del vector&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
El punto en el que se alcanza el máximo valor será y=4, este valor es 1,6.&lt;br /&gt;
&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.4579&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=0; 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>Charoruizserrano</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=20572</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=20572"/>
				<updated>2014-12-04T16:40:09Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* VARIACIÓN DE TEMPERATURA */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&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]]|Pablo Ribao Gil &amp;lt;br /&amp;gt;&lt;br /&gt;
Paco Durán Muñoz &amp;lt;br /&amp;gt;&lt;br /&gt;
Almudena Román Sánchez-Rey &amp;lt;br /&amp;gt;&lt;br /&gt;
Mª del Rosario Ruiz-Serrano Mulas}}&amp;lt;br /&amp;gt;&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
 [[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&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;
[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;
contour(x,y,T) %Dibujo de las curvas de nivel&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,px,py) %Dibujo del gradiente&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 A 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:Captura8.png|Tensiones normales a la dirección del vector i&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===TENSIONES NORMALES A 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 a 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;
&lt;br /&gt;
===TENSIÓN DE VON MISES===&lt;br /&gt;
La tensión de Von Mises se define por la fórmula:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
vonmises=[];                                                       %Vector vacío para la primera interacción.&lt;br /&gt;
for y=linspace(0,4,50);                                            %Bucle para crear el vector vonmises&lt;br /&gt;
    A=[y/5 0 0;0 3*y/5 0;0 0 y/5];                                 %Matriz A&lt;br /&gt;
    L=eig(A);                                                      %Función para sacar los autovalores de la matriz A&lt;br /&gt;
    ecuacion= sqrt(((L(1)-L(2))^2+(L(2)-L(3))^2+(L(3)-L(1))^2)/2); %Ecuación de la tensión de Von Mises&lt;br /&gt;
    vonmises=[vonmises,ecuacion]                                   %Creación del vector vonmises a partir de las tensiones de las interacciones anteriores&lt;br /&gt;
end&lt;br /&gt;
plot(vonmises)                                                     %Gráfica de tensiones&lt;br /&gt;
max(vonmises)                                                      %Valor máximo del vector&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
El punto en el que se alcanza el máximo valor será y=4, este valor es 1,6.&lt;br /&gt;
&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.4579&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=0; 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>Charoruizserrano</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=20564</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=20564"/>
				<updated>2014-12-04T16:38:21Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* TENSIONES NORMALES EN LA DIRECCIÓN \vec{j}  */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&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]]|Pablo Ribao Gil &amp;lt;br /&amp;gt;&lt;br /&gt;
Paco Durán Muñoz &amp;lt;br /&amp;gt;&lt;br /&gt;
Almudena Román Sánchez-Rey &amp;lt;br /&amp;gt;&lt;br /&gt;
Mª del Rosario Ruiz-Serrano Mulas}}&amp;lt;br /&amp;gt;&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
 [[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&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 A 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:Captura8.png|Tensiones normales a la dirección del vector i&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===TENSIONES NORMALES A 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 a 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;
&lt;br /&gt;
===TENSIÓN DE VON MISES===&lt;br /&gt;
La tensión de Von Mises se define por la fórmula:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
vonmises=[];                                                       %Vector vacío para la primera interacción.&lt;br /&gt;
for y=linspace(0,4,50);                                            %Bucle para crear el vector vonmises&lt;br /&gt;
    A=[y/5 0 0;0 3*y/5 0;0 0 y/5];                                 %Matriz A&lt;br /&gt;
    L=eig(A);                                                      %Función para sacar los autovalores de la matriz A&lt;br /&gt;
    ecuacion= sqrt(((L(1)-L(2))^2+(L(2)-L(3))^2+(L(3)-L(1))^2)/2); %Ecuación de la tensión de Von Mises&lt;br /&gt;
    vonmises=[vonmises,ecuacion]                                   %Creación del vector vonmises a partir de las tensiones de las interacciones anteriores&lt;br /&gt;
end&lt;br /&gt;
plot(vonmises)                                                     %Gráfica de tensiones&lt;br /&gt;
max(vonmises)                                                      %Valor máximo del vector&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
El punto en el que se alcanza el máximo valor será y=4, este valor es 1,6.&lt;br /&gt;
&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.4579&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=0; 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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura8.png&amp;diff=20560</id>
		<title>Archivo:Captura8.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura8.png&amp;diff=20560"/>
				<updated>2014-12-04T16:37:23Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: Tensiones normales a la dirección del vector i&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Tensiones normales a la dirección del vector i&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</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=20559</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=20559"/>
				<updated>2014-12-04T16:36:48Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* TENSIONES NORMALES EN LA DIRECCIÓN \vec{i}  */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&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]]|Pablo Ribao Gil &amp;lt;br /&amp;gt;&lt;br /&gt;
Paco Durán Muñoz &amp;lt;br /&amp;gt;&lt;br /&gt;
Almudena Román Sánchez-Rey &amp;lt;br /&amp;gt;&lt;br /&gt;
Mª del Rosario Ruiz-Serrano Mulas}}&amp;lt;br /&amp;gt;&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
 [[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&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 A 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:Captura8.png|Tensiones normales a 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;
&lt;br /&gt;
===TENSIÓN DE VON MISES===&lt;br /&gt;
La tensión de Von Mises se define por la fórmula:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
vonmises=[];                                                       %Vector vacío para la primera interacción.&lt;br /&gt;
for y=linspace(0,4,50);                                            %Bucle para crear el vector vonmises&lt;br /&gt;
    A=[y/5 0 0;0 3*y/5 0;0 0 y/5];                                 %Matriz A&lt;br /&gt;
    L=eig(A);                                                      %Función para sacar los autovalores de la matriz A&lt;br /&gt;
    ecuacion= sqrt(((L(1)-L(2))^2+(L(2)-L(3))^2+(L(3)-L(1))^2)/2); %Ecuación de la tensión de Von Mises&lt;br /&gt;
    vonmises=[vonmises,ecuacion]                                   %Creación del vector vonmises a partir de las tensiones de las interacciones anteriores&lt;br /&gt;
end&lt;br /&gt;
plot(vonmises)                                                     %Gráfica de tensiones&lt;br /&gt;
max(vonmises)                                                      %Valor máximo del vector&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
El punto en el que se alcanza el máximo valor será y=4, este valor es 1,6.&lt;br /&gt;
&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.4579&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=0; 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>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura8b.png&amp;diff=19688</id>
		<title>Archivo:Captura8b.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura8b.png&amp;diff=19688"/>
				<updated>2014-12-03T23:52:45Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: Tensiones normales en la dirección del vector j&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Tensiones normales en la dirección del vector j&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</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=19687</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=19687"/>
				<updated>2014-12-03T23:51:58Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* TENSIONES NORMALES EN LA DIRECCIÓN \vec{j}  */&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)=xyexp^{-1/x^2} &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura8a.png&amp;diff=19678</id>
		<title>Archivo:Captura8a.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura8a.png&amp;diff=19678"/>
				<updated>2014-12-03T23:46:00Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: Tensiones normales en la dirección del vector i&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Tensiones normales en la dirección del vector i&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</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=19677</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=19677"/>
				<updated>2014-12-03T23:45:13Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* TENSIONES NORMALES EN LA DIRECCIÓN \vec{i}  */&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;
===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)=xyexp^{-1/x^2} &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</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=19676</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=19676"/>
				<updated>2014-12-03T23:44:30Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* TENSIONES NORMALES EN LA DIRECCIÓN \vec{i}  */&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|Tensión 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;
===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)=xyexp^{-1/x^2} &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</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=19669</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=19669"/>
				<updated>2014-12-03T23:32:18Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* DIVERGENCIA DE \vec{U}  */&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;
===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;
===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)=xyexp^{-1/x^2} &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura6.png&amp;diff=19667</id>
		<title>Archivo:Captura6.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura6.png&amp;diff=19667"/>
				<updated>2014-12-03T23:29:37Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: Divergencia&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Divergencia&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</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=19666</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=19666"/>
				<updated>2014-12-03T23:29:07Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* DIVERGENCIA DE \vec{U}  */&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;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Captura6.png|Divergencia&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&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;
===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;
===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)=xyexp^{-1/x^2} &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</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=19663</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=19663"/>
				<updated>2014-12-03T23:24:30Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* CAMPO DE DESPLAZAMIENTOS */&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;
===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;
===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;
===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)=xyexp^{-1/x^2} &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</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=19662</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=19662"/>
				<updated>2014-12-03T23:22:53Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* CAMPO DE DESPLAZAMIENTOS */&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 compresión en las proximidades de la zona central 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;
===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;
===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;
===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)=xyexp^{-1/x^2} &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura5.png&amp;diff=19659</id>
		<title>Archivo:Captura5.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura5.png&amp;diff=19659"/>
				<updated>2014-12-03T23:19:08Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: Desplazamiento respecto a la posición original&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Desplazamiento respecto a la posición original&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</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=19657</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=19657"/>
				<updated>2014-12-03T23:17:20Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* CAMPO DE DESPLAZAMIENTOS */&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;
===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;
===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;
===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;
===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)=xyexp^{-1/x^2} &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura2def.png&amp;diff=19577</id>
		<title>Archivo:Captura2def.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura2def.png&amp;diff=19577"/>
				<updated>2014-12-03T22:42:49Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: Distribución de la temperatura&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Distribución de la temperatura&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</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=19573</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=19573"/>
				<updated>2014-12-03T22:42:12Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* DISTRIBUCIÓN DE TEMPERATURAS */&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;
===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;
===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;
===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;
===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)=xyexp^{-1/x^2} &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</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=19564</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=19564"/>
				<updated>2014-12-03T22:39:33Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: /* CAMPO DE DESPLAZAMIENTOS */&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:Captura2.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;
===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;
===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;
===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;
===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)=xyexp^{-1/x^2} &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</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=19551</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=19551"/>
				<updated>2014-12-03T22:31:26Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: &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:Captura2.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;
===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;
===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;
==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;
===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;
===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)=xyexp^{-1/x^2} &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura3def.png&amp;diff=19550</id>
		<title>Archivo:Captura3def.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura3def.png&amp;diff=19550"/>
				<updated>2014-12-03T22:30:45Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: Representación de las curvas de nivel y gradiente&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Representación de las curvas de nivel y gradiente&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura4.png&amp;diff=19547</id>
		<title>Archivo:Captura4.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Captura4.png&amp;diff=19547"/>
				<updated>2014-12-03T22:25:48Z</updated>
		
		<summary type="html">&lt;p&gt;Charoruizserrano: Campo de desplazamientos&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Campo de desplazamientos&lt;/div&gt;</summary>
		<author><name>Charoruizserrano</name></author>	</entry>

	</feed>