<?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=IAGO+RODRIGUEZ+ROMERO</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=IAGO+RODRIGUEZ+ROMERO"/>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/wiki/Especial:Contribuciones/IAGO_RODRIGUEZ_ROMERO"/>
		<updated>2026-04-29T16:03:40Z</updated>
		<subtitle>Contribuciones del usuario</subtitle>
		<generator>MediaWiki 1.26.2</generator>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7965</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7965"/>
				<updated>2013-12-12T10:36:19Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar la superficie&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Siendo &amp;lt;math&amp;gt; \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt; y calculando el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; como:: &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt; Podemos calcular el tensor de deformaciones como 1-contravariante 1-covariante::&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes tendríamos:: &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo ahora los valores en la fórmula del tensor de tensiones,y tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;, siendo &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; los conocidos como coeficientes de Lamé, obtenemos:: &amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación se muestra el código Matlab empleado para dibujar estas tensiones normales en ambas direcciones:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&lt;br /&gt;
Por un lado, vamos a analizar las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt;::&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi\rho cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones son máximas cuando $\rho$ =2 y $\cos(\pi\theta/2)=\pm1$.&lt;br /&gt;
&lt;br /&gt;
Por otro lado, analizamos las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
&lt;br /&gt;
En Matlab podemos dibujar estas tensiones mediante el siguiente código:&lt;br /&gt;
[[Archivo:Fig333def.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi.*uu.*cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7964</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7964"/>
				<updated>2013-12-12T10:34:04Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Respecto al plano ortogonal a \vec g_\rho y respecto al plano ortogonal a \vec g_\theta/\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar la superficie&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Siendo &amp;lt;math&amp;gt; \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt; y calculando el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; como:: &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt; Podemos calcular el tensor de deformaciones como 1-contravariante 1-covariante::&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes tendríamos:: &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo ahora los valores en la fórmula del tensor de tensiones,y tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;, siendo &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; los conocidos como coeficientes de Lamé, obtenemos:: &amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación se muestra el código Matlab empleado para dibujar estas tensiones normales en ambas direcciones:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&lt;br /&gt;
Por un lado, vamos a analizar las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt;::&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi\rho cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones son máximas cuando $\rho$ =2 y $\cos(\pi\theta/2)=\pm1$.&lt;br /&gt;
&lt;br /&gt;
Por otro lado, analizamos las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
&lt;br /&gt;
En Matlab podemos dibujar estas tensiones mediante el siguiente código:&lt;br /&gt;
[[Archivo:Fig333def.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi.*uu.*cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7963</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7963"/>
				<updated>2013-12-12T10:31:03Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Respecto al plano ortogonal a \vec g_\rho y respecto al plano ortogonal a \vec g_\theta/\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar la superficie&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Siendo &amp;lt;math&amp;gt; \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt; y calculando el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; como:: &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt; Podemos calcular el tensor de deformaciones como 1-contravariante 1-covariante::&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes tendríamos:: &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo ahora los valores en la fórmula del tensor de tensiones,y tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;, siendo &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; los conocidos como coeficientes de Lamé, obtenemos:: &amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación se muestra el código Matlab empleado para dibujar estas tensiones normales en ambas direcciones:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&lt;br /&gt;
Por un lado, vamos a analizar las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt;::&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi\rho cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$.&lt;br /&gt;
&lt;br /&gt;
Por otro lado, analizamos las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
&lt;br /&gt;
En Matlab podemos dibujar estas tensiones mediante el siguiente código:&lt;br /&gt;
[[Archivo:Fig333def.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi.*uu.*cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Fig333def.jpg&amp;diff=7962</id>
		<title>Archivo:Fig333def.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Fig333def.jpg&amp;diff=7962"/>
				<updated>2013-12-12T10:30:11Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7961</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7961"/>
				<updated>2013-12-12T10:29:06Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Respecto al plano ortogonal a \vec g_\rho y respecto al plano ortogonal a \vec g_\theta/\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar la superficie&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Siendo &amp;lt;math&amp;gt; \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt; y calculando el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; como:: &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt; Podemos calcular el tensor de deformaciones como 1-contravariante 1-covariante::&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes tendríamos:: &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo ahora los valores en la fórmula del tensor de tensiones,y tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;, siendo &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; los conocidos como coeficientes de Lamé, obtenemos:: &amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación se muestra el código Matlab empleado para dibujar estas tensiones normales en ambas direcciones:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&lt;br /&gt;
Por un lado, vamos a analizar las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt;::&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi\rho cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$.&lt;br /&gt;
&lt;br /&gt;
Por otro lado, analizamos las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
&lt;br /&gt;
En Matlab podemos dibujar estas tensiones mediante el siguiente código:&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi.*uu.*cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7955</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7955"/>
				<updated>2013-12-12T08:41:33Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Comportamientos ante un foco calorífico */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar la superficie&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Siendo &amp;lt;math&amp;gt; \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt; y calculando el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; como:: &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt; Podemos calcular el tensor de deformaciones como 1-contravariante 1-covariante::&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes tendríamos:: &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo ahora los valores en la fórmula del tensor de tensiones,y tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;, siendo &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; los conocidos como coeficientes de Lamé, obtenemos:: &amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación se muestra el código Matlab empleado para dibujar estas tensiones normales en ambas direcciones:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&lt;br /&gt;
Por un lado, vamos a analizar las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt;::&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$.&lt;br /&gt;
&lt;br /&gt;
Por otro lado, analizamos las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
&lt;br /&gt;
En Matlab podemos dibujar estas tensiones mediante el siguiente código:&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7781</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7781"/>
				<updated>2013-12-10T21:38:13Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Respecto al plano ortogonal a \vec g_\rho y respecto al plano ortogonal a \vec g_\theta/\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Siendo &amp;lt;math&amp;gt; \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt; y calculando el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; como:: &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt; Podemos calcular el tensor de deformaciones como 1-contravariante 1-covariante::&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes tendríamos:: &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo ahora los valores en la fórmula del tensor de tensiones,y tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;, siendo &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; los conocidos como coeficientes de Lamé, obtenemos:: &amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación se muestra el código Matlab empleado para dibujar estas tensiones normales en ambas direcciones:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&lt;br /&gt;
Por un lado, vamos a analizar las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt;::&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$.&lt;br /&gt;
&lt;br /&gt;
Por otro lado, analizamos las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
&lt;br /&gt;
En Matlab podemos dibujar estas tensiones mediante el siguiente código:&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7777</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7777"/>
				<updated>2013-12-10T21:35:49Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Respecto al plano ortogonal a \vec g_\rho y respecto al plano ortogonal a \vec g_\theta/\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Siendo &amp;lt;math&amp;gt; \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt; y calculando el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; como:: &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt; Podemos calcular el tensor de deformaciones como 1-contravariante 1-covariante::&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes tendríamos:: &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo ahora los valores en la fórmula del tensor de tensiones,y tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;, siendo &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; los conocidos como coeficientes de Lamé, obtenemos:: &amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación se muestra el código Matlab empleado para dibujar estas tensiones normales en ambas direcciones:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&lt;br /&gt;
Por un lado, vamos a analizar las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt;::&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$.&lt;br /&gt;
&lt;br /&gt;
Por otro lado, analizamos las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7765</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7765"/>
				<updated>2013-12-10T21:26:09Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del tensor de tensiones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Siendo &amp;lt;math&amp;gt; \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt; y calculando el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; como:: &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt; Podemos calcular el tensor de deformaciones como 1-contravariante 1-covariante::&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes tendríamos:: &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo ahora los valores en la fórmula del tensor de tensiones,y tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;, siendo &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; los conocidos como coeficientes de Lamé, obtenemos:: &amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; serían:: &amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación se muestra el código Matlab empleado para dibujar estas tensiones normales en ambas direcciones:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$ que son los puntos donde hay una menor deformación al aplicarle el campo vectorial $\vec u$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7737</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7737"/>
				<updated>2013-12-10T21:09:00Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del tensor de tensiones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$ que son los puntos donde hay una menor deformación al aplicarle el campo vectorial $\vec u$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7734</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7734"/>
				<updated>2013-12-10T21:08:12Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio de la divergencia */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$ que son los puntos donde hay una menor deformación al aplicarle el campo vectorial $\vec u$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7733</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7733"/>
				<updated>2013-12-10T21:07:38Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Campo de desplazamiento */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$ que son los puntos donde hay una menor deformación al aplicarle el campo vectorial $\vec u$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7732</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7732"/>
				<updated>2013-12-10T21:07:19Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Variación de la temperatura */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$ que son los puntos donde hay una menor deformación al aplicarle el campo vectorial $\vec u$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7731</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7731"/>
				<updated>2013-12-10T21:06:57Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Espacio de trabajo */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por::&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$ que son los puntos donde hay una menor deformación al aplicarle el campo vectorial $\vec u$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7730</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7730"/>
				<updated>2013-12-10T21:06:18Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$ que son los puntos donde hay una menor deformación al aplicarle el campo vectorial $\vec u$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7729</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7729"/>
				<updated>2013-12-10T21:05:59Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto::&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$ que son los puntos donde hay una menor deformación al aplicarle el campo vectorial $\vec u$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7725</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7725"/>
				<updated>2013-12-10T21:04:26Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto.:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$ que son los puntos donde hay una menor deformación al aplicarle el campo vectorial $\vec u$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7696</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7696"/>
				<updated>2013-12-10T20:56:55Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Matemáticamente, los puntos en los que hay un mayor rotacional son aquellos en los que &amp;lt;math&amp;gt;\cos(\pi\theta/2)=\pm 1 &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\rho=1&amp;lt;/math&amp;gt;. Gráficamente, estas zonas con un mayor valor del rotacional vienen representadas con un color rojizo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$ que son los puntos donde hay una menor deformación al aplicarle el campo vectorial $\vec u$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7685</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7685"/>
				<updated>2013-12-10T20:42:49Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Variación de la temperatura */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo. Podemos por tanto decir que el gradiente es menor cuanto más se aproxima al origen de coordenadas. &lt;br /&gt;
&lt;br /&gt;
Gráficamente observamos que &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; es ortogonal a las curvas de nivel de la temperatura.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$ que son los puntos donde hay una menor deformación al aplicarle el campo vectorial $\vec u$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7667</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7667"/>
				<updated>2013-12-10T20:32:58Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Comportamientos ante un foco calorífico */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio (valor de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt;) , es decir cuanto más cerca del foco nos encontramos. En este caso el foco calorífico no varía en función de &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$ que son los puntos donde hay una menor deformación al aplicarle el campo vectorial $\vec u$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7454</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7454"/>
				<updated>2013-12-10T15:37:30Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del tensor de tensiones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Definamos &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;, la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina tensor de deformaciones. En un medio elástico lineal, isótropo y homogéneo los desplazamientos permiten escribir el tensor de tensiones &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; a través de la fórmula:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=\lambda \nabla \cdot \vec u \delta_{ij} + 2\mu \epsilon_{ij},&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\epsilon^i_{.j})=(\nabla \vec u + \nabla \vec u^t)/2=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\cos(\pi\theta/2)}{120\rho}&amp;amp; \frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Como podemos observar, en este caso, las tensiones no dependen de $\rho$ y son máximas cuando $\cos(\pi\theta/2)=\pm1$ que son los puntos donde hay una menor deformación al aplicarle el campo vectorial $\vec u$.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En este otro caso, las tensiones son máximas cuando $\rho=1$ y $\cos(\pi\theta/2)=\pm1$, por tanto observamos que coinciden con los puntos en los cuales es máximo el rotacional.&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7439</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7439"/>
				<updated>2013-12-10T15:16:44Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Comportamientos ante un foco calorífico */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
[[Archivo:Figbar.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\lambda \nabla \cdot \vec u\delta_{ij}+2\mu \epsilon_{ij}&amp;lt;/math&amp;gt;  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Figbar.jpg&amp;diff=7434</id>
		<title>Archivo:Figbar.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Figbar.jpg&amp;diff=7434"/>
				<updated>2013-12-10T15:14:36Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: Campo de temperaturas sobre la placa (3D).&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Campo de temperaturas sobre la placa (3D).&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7427</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7427"/>
				<updated>2013-12-10T15:11:23Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Respecto al plano ortogonal a \vec g_\rho y respecto al plano ortogonal a \vec g_\theta/\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\lambda \nabla \cdot \vec u\delta_{ij}+2\mu \epsilon_{ij}&amp;lt;/math&amp;gt;  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig123hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Fig123hoy.jpg&amp;diff=7425</id>
		<title>Archivo:Fig123hoy.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Fig123hoy.jpg&amp;diff=7425"/>
				<updated>2013-12-10T15:10:42Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ (izquierda) y respecto al plano ortogonal a g⃗ θ/ρ (derecha)&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7420</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7420"/>
				<updated>2013-12-10T15:09:18Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Respecto al plano ortogonal a \vec g_\rho y respecto al plano ortogonal a \vec g_\theta/\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\lambda \nabla \cdot \vec u\delta_{ij}+2\mu \epsilon_{ij}&amp;lt;/math&amp;gt;  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=abs((cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=abs((pi*(cos(pi*vv./2)))./(60*uu.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7384</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7384"/>
				<updated>2013-12-10T14:24:59Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Respecto al plano ortogonal a \vec g_\rho y respecto al plano ortogonal a \vec g_\theta/\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\lambda \nabla \cdot \vec u\delta_{ij}+2\mu \epsilon_{ij}&amp;lt;/math&amp;gt;  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60 \rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7383</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7383"/>
				<updated>2013-12-10T14:20:13Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Respecto al plano ortogonal a \vec g_\rho y respecto al plano ortogonal a \vec g_\theta/\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\lambda \nabla \cdot \vec u\delta_{ij}+2\mu \epsilon_{ij}&amp;lt;/math&amp;gt;  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{ cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7380</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7380"/>
				<updated>2013-12-10T14:03:42Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del tensor de tensiones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\lambda \nabla \cdot \vec u\delta_{ij}+2\mu \epsilon_{ij}&amp;lt;/math&amp;gt;  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Figdehoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Figdehoy.jpg&amp;diff=7379</id>
		<title>Archivo:Figdehoy.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Figdehoy.jpg&amp;diff=7379"/>
				<updated>2013-12-10T14:02:26Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: Tensiones normales en diversas direcciones.&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Tensiones normales en diversas direcciones.&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7378</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7378"/>
				<updated>2013-12-10T14:00:43Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del tensor de tensiones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\lambda \nabla \cdot \vec u\delta_{ij}+2\mu \epsilon_{ij}&amp;lt;/math&amp;gt;  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = \frac{\sin(\pi\theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=sin(pi.*vv/2)./(15.*uu.^2);  % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7377</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7377"/>
				<updated>2013-12-10T13:49:28Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del tensor de tensiones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
Calculamos el gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;,  &amp;lt;math&amp;gt;\nabla\vec u=u^i_{.j}\vec g_i \otimes \vec g^j&amp;lt;/math&amp;gt; donde &amp;lt;math&amp;gt;u^i_{.j}= \vec g^i \nabla\vec u  \vec g_j=\frac{\partial u^i}{\partial x^j}+\Gamma^i_{kj}u^k.&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\lambda \nabla \cdot \vec u\delta_{ij}+2\mu \epsilon_{ij}&amp;lt;/math&amp;gt;  &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; Siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En coordenadas 2-covariantes &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2=(\epsilon_{ij})=G(\epsilon^i_{.j})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{30\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{120\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{120}&amp;amp; \frac{\sin(\pi\theta/2)}{30}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(\sigma_{ij})=2(\epsilon_{ij})=\left(\begin{array}{ccc}-\frac{\sin(\pi\theta/2)}{15\rho^2}&amp;amp; \frac{\pi \cos(\pi\theta/2)}{60\rho}&amp;amp;0\\\frac{\pi\rho\cos(\pi\theta/2)}{60}&amp;amp; \frac{\sin(\pi\theta/2)}{15}&amp;amp;0\\0&amp;amp;0&amp;amp;0\end{array}\right)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7361</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7361"/>
				<updated>2013-12-10T12:55:44Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fignn.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=1  \nabla \cdot \vec u \delta_{ij} + 2×1 ×× \epsilon_{ij} &amp;lt;/math&amp;gt;    &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \vec u = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{30\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \sigma_{ij} = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{15\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Fignn.jpg&amp;diff=7360</id>
		<title>Archivo:Fignn.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Fignn.jpg&amp;diff=7360"/>
				<updated>2013-12-10T12:54:58Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: Campo rotacional aplicado a una placa circular (3D).&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Campo rotacional aplicado a una placa circular (3D).&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7355</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7355"/>
				<updated>2013-12-10T12:51:29Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fignueva.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fig33hoy.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=1  \nabla \cdot \vec u \delta_{ij} + 2×1 ×× \epsilon_{ij} &amp;lt;/math&amp;gt;    &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \vec u = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{30\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \sigma_{ij} = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{15\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Fignueva.jpg&amp;diff=7353</id>
		<title>Archivo:Fignueva.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Fignueva.jpg&amp;diff=7353"/>
				<updated>2013-12-10T12:50:23Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: Campo Rotacional aplicado a una placa circular (2D).&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Campo Rotacional aplicado a una placa circular (2D).&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7350</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7350"/>
				<updated>2013-12-10T12:47:15Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Figrot.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fig33hoy.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
     &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    f=abs(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
&lt;br /&gt;
    hold on               &lt;br /&gt;
&lt;br /&gt;
    view(2)            &lt;br /&gt;
    &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)           &lt;br /&gt;
&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=1  \nabla \cdot \vec u \delta_{ij} + 2×1 ×× \epsilon_{ij} &amp;lt;/math&amp;gt;    &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \vec u = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{30\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \sigma_{ij} = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{15\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7315</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7315"/>
				<updated>2013-12-10T12:04:47Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio de la divergencia */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
La '''divergencia''' es una medida del cambio de volumen local debido al desplazamiento. En este caso vamos a estudiarla tomando como volumen el de nuestra placa. En este caso, al considerar el campo &amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}&amp;lt;/math&amp;gt;, la divergencia la obtenemos con la siguiente expresión en coordenadas cilíndricas:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla \cdot \vec u = \frac{1}{\sqrt{|g|}} \frac{\partial}{\partial x^i}&lt;br /&gt;
\left(\sqrt{|g|} u^i \right)= \frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\  &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Figrot.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fig33hoy.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Para obtener el rotacional en 2D&lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
    contour(uu,vv,f)       % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)            &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
% Para obtener el rotacional en 3D &lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)                &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=1  \nabla \cdot \vec u \delta_{ij} + 2×1 ×× \epsilon_{ij} &amp;lt;/math&amp;gt;    &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \vec u = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{30\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \sigma_{ij} = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{15\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7309</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7309"/>
				<updated>2013-12-10T11:53:28Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec u =\frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Una vez calculado el rotacional, obtenemos su módulo:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Figrot.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fig33hoy.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Para obtener el rotacional en 2D&lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
    contour(uu,vv,f)       % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)            &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
% Para obtener el rotacional en 3D &lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)                &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=1  \nabla \cdot \vec u \delta_{ij} + 2×1 ×× \epsilon_{ij} &amp;lt;/math&amp;gt;    &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \vec u = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{30\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \sigma_{ij} = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{15\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7298</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7298"/>
				<updated>2013-12-10T11:48:30Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec u =\frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
En la corona circular de estudio donde los desplazamientos vienen representados por el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el '''rotacional''' simboliza el efecto de giro del sólido alrededor del vector &amp;lt;math&amp;gt; \vec n&amp;lt;/math&amp;gt; perpendicular a la placa debido al desplazamiento:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Figrot.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fig33hoy.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Para obtener el rotacional en 2D&lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
    contour(uu,vv,f)       % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)            &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
% Para obtener el rotacional en 3D &lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)                &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=1  \nabla \cdot \vec u \delta_{ij} + 2×1 ×× \epsilon_{ij} &amp;lt;/math&amp;gt;    &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \vec u = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{30\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \sigma_{ij} = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{15\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7282</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7282"/>
				<updated>2013-12-10T11:42:39Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec u =\frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec u =&lt;br /&gt;
   \frac{1}{\rho}&lt;br /&gt;
   \begin{vmatrix}&lt;br /&gt;
      \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\&lt;br /&gt;
      \frac{\partial}{\partial \rho} &amp;amp; \frac{\partial}{\partial \theta} &amp;amp; \frac{\partial}{\partial z} \\&lt;br /&gt;
      \frac{\sin(\pi \theta/2)}{30\rho} &amp;amp; 0 &amp;amp; 0&lt;br /&gt;
   \end{vmatrix}&lt;br /&gt;
   = \frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}= -\frac{\pi}{2}\frac{\cos(\pi \theta/2)}{30\rho^2}\vec g_{z}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Figrot.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fig33hoy.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Para obtener el rotacional en 2D&lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
    contour(uu,vv,f)       % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)            &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
% Para obtener el rotacional en 3D &lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)                &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=1  \nabla \cdot \vec u \delta_{ij} + 2×1 ×× \epsilon_{ij} &amp;lt;/math&amp;gt;    &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \vec u = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{30\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \sigma_{ij} = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{15\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7262</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7262"/>
				<updated>2013-12-10T11:37:31Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio de la divergencia */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec u =\frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla × \vec u =\frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Figrot.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fig33hoy.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Para obtener el rotacional en 2D&lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
    contour(uu,vv,f)       % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)            &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
% Para obtener el rotacional en 3D &lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)                &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=1  \nabla \cdot \vec u \delta_{ij} + 2×1 ×× \epsilon_{ij} &amp;lt;/math&amp;gt;    &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \vec u = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{30\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \sigma_{ij} = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{15\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7231</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=7231"/>
				<updated>2013-12-10T11:20:23Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del tensor de tensiones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec u =\frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla × \vec u =\frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Figrot.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fig33hoy.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Para obtener el rotacional en 2D&lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
    contour(uu,vv,f)       % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)            &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
% Para obtener el rotacional en 3D &lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)                &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=1  \nabla \cdot \vec u \delta_{ij} + 2×1 ×× \epsilon_{ij} &amp;lt;/math&amp;gt;    &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \vec u = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{30\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; \sigma_{ij} = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{15\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=6992</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=6992"/>
				<updated>2013-12-10T08:43:37Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Respecto al plano ortogonal a \vec g_\rho y respecto al plano ortogonal a \vec g_\theta/\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec u =\frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla × \vec u =\frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Figrot.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fig33hoy.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Para obtener el rotacional en 2D&lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
    contour(uu,vv,f)       % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)            &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
% Para obtener el rotacional en 3D &lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)                &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=1  \nabla \cdot \vec u \delta_{ij} + 2×1 ×× \epsilon_{ij} &amp;lt;/math&amp;gt;    &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \vec u = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{30\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix}&lt;br /&gt;
&lt;br /&gt;
 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho| = \frac{\pi cos(\pi \theta/2)}{60} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\sigma \cdot \vec g_\theta/\rho-(\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho) \vec g_\theta/\rho|= \frac{\pi cos(\pi \theta/2)}{60}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=6990</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=6990"/>
				<updated>2013-12-10T08:38:38Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del tensor de tensiones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec u =\frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla × \vec u =\frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Figrot.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fig33hoy.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Para obtener el rotacional en 2D&lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
    contour(uu,vv,f)       % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)            &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
% Para obtener el rotacional en 3D &lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)                &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=1  \nabla \cdot \vec u \delta_{ij} + 2×1 ×× \epsilon_{ij} &amp;lt;/math&amp;gt;    &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt; siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \vec u = \begin{pmatrix} \frac{-sen(\pi \theta/2)}{30\rho^2} &amp;amp; \frac{\pi cos(\pi \theta/2)}{60\rho} &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \\ 0 &amp;amp; 0 &amp;amp; 0 \end{pmatrix}&lt;br /&gt;
&lt;br /&gt;
 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=6986</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=6986"/>
				<updated>2013-12-10T08:27:02Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del tensor de tensiones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec u =\frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla × \vec u =\frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Figrot.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fig33hoy.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Para obtener el rotacional en 2D&lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
    contour(uu,vv,f)       % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)            &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
% Para obtener el rotacional en 3D &lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)                &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=1  \nabla \cdot \vec u \delta_{ij} + 2×1 ×× \epsilon_{ij},    siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=6985</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=6985"/>
				<updated>2013-12-10T08:26:19Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del tensor de tensiones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec u =\frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla × \vec u =\frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Figrot.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fig33hoy.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Para obtener el rotacional en 2D&lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
    contour(uu,vv,f)       % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)            &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
% Para obtener el rotacional en 3D &lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)                &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=1  \nabla \cdot \vec u \delta_{ij} + 2×1 ×× \epsilon_{ij},    siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho =\frac{-sen(\pi \theta/2)}{15\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=6982</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=6982"/>
				<updated>2013-12-10T08:20:42Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del tensor de tensiones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec u =\frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla × \vec u =\frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Figrot.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fig33hoy.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Para obtener el rotacional en 2D&lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
    contour(uu,vv,f)       % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)            &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
% Para obtener el rotacional en 3D &lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)                &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\sigma_{ij}=1  \nabla \cdot \vec u \delta_{ij} + 2×1 ×× \epsilon_{ij},    siendo:  \nabla \cdot \vec u = 0&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=6979</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=6979"/>
				<updated>2013-12-10T08:10:18Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec u =\frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla × \vec u =\frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho})\vec g_{z}. &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;|\nabla × \vec u| =\frac{\pi \cos(\pi \theta/2)}{60\rho^2} &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Figrot.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fig33hoy.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Para obtener el rotacional en 2D&lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
    contour(uu,vv,f)       % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)            &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
% Para obtener el rotacional en 3D &lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)                &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=6974</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad. (Grupo 15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_escalares_y_vectoriales_en_elasticidad._(Grupo_15-C)&amp;diff=6974"/>
				<updated>2013-12-10T07:59:01Z</updated>
		
		<summary type="html">&lt;p&gt;IAGO RODRIGUEZ ROMERO: /* Estudio del rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{beta}}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C|[[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
== Introducción ==&lt;br /&gt;
&lt;br /&gt;
Vamos a realizar el estudio de una placa plana con forma de corona circular centrada en el origen y de radio interior 1 y radio exterior 2, al verse sometida a diversos campos.&lt;br /&gt;
Para empezar, representamos el mallado sobre el que vamos a trabajar. La visualización de la misma nos sirve para situar la placa en nuestro espacio de trabajo.&lt;br /&gt;
&lt;br /&gt;
== Espacio de trabajo ==&lt;br /&gt;
En nuestro caso vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las dos coordenadas polares &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; y el tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;\vec u(\rho,\theta,t)&amp;lt;/math&amp;gt;. De esta forma, si definimos &amp;lt;math&amp;gt;r_0(\rho,\theta)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo, la posición de cada punto &amp;lt;math&amp;gt;(\rho,\theta)&amp;lt;/math&amp;gt; de la placa en un instante de tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt; viene dada por: &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec r (\rho,\theta,t)= \vec r_{0}(\rho,\theta)+\vec u(\rho,\theta,t).&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Queda reflejado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig1buena.jpg|miniaturadeimagen]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                      % Intervalos de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho [1,2]&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta [0,2*pi]&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de u y v&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Tras la visualización deseamos estudiar cómo nuestra placa se va a comportar frente a un foco calorífico.&lt;br /&gt;
&lt;br /&gt;
== Comportamientos ante un foco calorífico ==&lt;br /&gt;
Nuestro foco calorífico se sitúa en el origen de coordenadas, siguiendo la expresión    &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt;.&lt;br /&gt;
Representado en Matlab con el siguiente código:&lt;br /&gt;
[[Archivo:Fig2lunes.jpg|miniaturadeimagen|derecha|Campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
 h=(0.1);                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];           % Intervalo de theta [0,2π]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);    % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);           % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)             % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])         % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como observamos en la ilustración la temperatura desciende a medida que nos alejamos del origen de coordenadas. Por lo tanto la placa tiene mayor temperatura cuánto menor es su radio, es decir cuanto más cerca del foco nos encontramos.&lt;br /&gt;
&lt;br /&gt;
=== Variación de la temperatura ===&lt;br /&gt;
Derivando la función &amp;lt;math&amp;gt;T(\rho,\theta)=-\log(\rho+0.1)&amp;lt;/math&amp;gt; en función de &amp;lt;math&amp;gt;\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\theta&amp;lt;/math&amp;gt;, obtenemos una expresión del gradiente de la temperatura que en coordenadas cartesianas nos da como resultado el siguiente campo vectorial:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla T = (\frac{-x}{x^2+y^2+0.1\sqrt{x^2+y^2}},\frac{-y}{x^2+y^2+0.1\sqrt{x^2+y^2}})&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4ord.jpg|miniaturadeimagen|derecha|Gradiente del campo de temperaturas sobre la placa.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
  h=0.1;                      % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;                % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;           % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    &lt;br /&gt;
    f=-log(0.1+sqrt(xx.^2+yy.^2)); % Campo escalar&lt;br /&gt;
    &lt;br /&gt;
    contour(xx,yy,f)        % Dibujar las líneas de nivel&lt;br /&gt;
&lt;br /&gt;
    hold on&lt;br /&gt;
    &lt;br /&gt;
    fx=-xx./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada parcial respecto de X&lt;br /&gt;
    &lt;br /&gt;
    fy=-yy./((xx.^2+yy.^2)+0.1.*sqrt(xx.^2+yy.^2)); % Derivada Parcial respecto de Y&lt;br /&gt;
&lt;br /&gt;
    quiver(xx,yy,fx,fy)     % Dibujar el Campo Vectorial&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región del dibujo&lt;br /&gt;
&lt;br /&gt;
    view(2)               &lt;br /&gt;
&lt;br /&gt;
    colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Si observamos la imagen obtenida con Matlab, podemos ver que las curvas de nivel de la temperatura parten del foco calorífico formando circunferencias concéntricas sin respetar una equidistancia determinada, ya que la función logarítmica no es lineal. Por tanto, estas líneas tienen mayor temperatura cuanto más próximas a él se localicen. &lt;br /&gt;
&lt;br /&gt;
Por otro lado podemos observar que las flechas que representan el gradiente son radiales y que apuntan hacia el origen de coordenadas, debido a que el signo obtenido en las derivadas parciales es negativo.&lt;br /&gt;
&lt;br /&gt;
== Campo de desplazamiento ==&lt;br /&gt;
&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibración de manera que los desplazamientos en un tiempo &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; dado vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta/2)}{30\rho}\vec g_{\rho}.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
El código de Matlab para dibujar el campo de vectores en los puntos del mallado del sólido es el que mostramos a continuación:&lt;br /&gt;
[[Archivo:Fig4final.jpg|miniaturadeimagen|derecha|Campo de desplazamiento.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;              % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;         % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);% Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);       % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    figure(1)&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
    quiver(xx,yy,m,n);    % Dibujo de la función&lt;br /&gt;
    view&lt;br /&gt;
}}&lt;br /&gt;
=== Aplicación del desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
El desplazamiento que realiza la placa consiste en una serie de movimientos transversales en distintas direcciones. Como podemos ver en la siguiente imagen, obtenida con el código Matlab, el desplazamiento es prácticamente inapreciable.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Fig4hoy.jpg|marco|derecha|Desplazamiento de la placa producido por un campo vectorial. Estado inicial y final.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo del mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo &lt;br /&gt;
&lt;br /&gt;
    axis equal                   &lt;br /&gt;
    &lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
   h=0.1                   % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    m=((sin((pi.*vv)./2).*cos(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    n=((sin((pi.*vv)./2).*sin(vv))./(30*uu));&lt;br /&gt;
&lt;br /&gt;
    mesh(m+xx,n+yy,xx*0)   % Dibujo de las funciones&lt;br /&gt;
&lt;br /&gt;
    axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
    axis equal&lt;br /&gt;
&lt;br /&gt;
    view&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== Estudio de la divergencia ==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \cdot \vec u =\frac{1}{\rho} \frac{\partial}{\partial\rho} ({\rho} \frac{\sin(\pi \theta/2)}{30\rho})= 0\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En el estudio de la divergencia nos damos cuenta de que todos los puntos tienen la misma, ya que sobre nuestra placa es cero. Esto se debe a que la placa se ve sometida a desplazamientos transversales (como hemos visto en el apartado anterior) sin deformación de volumen, por lo que no habría un cambio del mismo.&lt;br /&gt;
&lt;br /&gt;
== Estudio del rotacional ==&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla × \vec u =\frac{1}{\rho} \frac{\partial}{\partial\theta} (\frac{\sin(\pi \theta/2)}{30\rho}) &amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Figrot.jpg|miniaturadeimagen|derecha|Campo Rotacional aplicado a una placa circular (2D).]]&lt;br /&gt;
[[Archivo:Fig33hoy.jpg|miniaturadeimagen|derecha|Campo rotacional aplicado a una placa circular (3D).]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
% Para obtener el rotacional en 2D&lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional&lt;br /&gt;
    contour(uu,vv,f)       % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)            &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
% Para obtener el rotacional en 3D &lt;br /&gt;
u=-2:0.1:2;                % Intervalo de x&lt;br /&gt;
    v=-2:0.1:2;            % Intervalo de y&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matrices de x e y&lt;br /&gt;
    figure(1)&lt;br /&gt;
    f=(pi.*cos((pi.*vv)./2))./(60.*uu.^2); % Campo del rotacional &lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    surf(xx,yy,f)          % Líneas de nivel del rotacional&lt;br /&gt;
    hold on               &lt;br /&gt;
    view(2)                &lt;br /&gt;
h=0.1;                     % Intervalo de separación&lt;br /&gt;
    u=1:h:2;               % Intervalo de rho&lt;br /&gt;
    v=0:h:2*pi+h;          % Intervalo de theta&lt;br /&gt;
    [uu,vv]=meshgrid(u,v); % Matriz de rho y theta&lt;br /&gt;
    figure(1)&lt;br /&gt;
    xx=uu.*cos(vv);        % Parametrización&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
    mesh(xx,yy,0*xx)       % Dibujo de la malla&lt;br /&gt;
    axis([-3,3,-3,3])      % Región del dibujo&lt;br /&gt;
    view(2)               &lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Los puntos externos a la placa y cercanos al origen, tienen un rotacional mayor que los del interior de la placa. &lt;br /&gt;
Como se puede observar en la imagen adjunta, se produce una simetría alrededor del eje X ya que, visualmente, se traduce como un giro en torno a este eje.&lt;br /&gt;
&lt;br /&gt;
== Estudio del tensor de tensiones  ==&lt;br /&gt;
[[Archivo:Fig7hoy.jpg|marco|derecha|Tensiones normales en diversas direcciones.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:0.1:2];               % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];            % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);     % Matrices de rho and theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);            % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=((-sin(pi*vv./2))./(15*(xx.^2+yy.^2))); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región seleccionada&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub rho')&lt;br /&gt;
&lt;br /&gt;
    view(2)                  &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=0*xx;                    % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)              % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])          % Región del dibujo&lt;br /&gt;
    &lt;br /&gt;
    axis equal&lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    title('Tensión normal en dirección g sub theta')&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
=== Tensiones tangenciales ===&lt;br /&gt;
==== Respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
[[Archivo:Fig71hoy.jpg|marco|derecha|Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; (izquierda) y respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; (derecha)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=(0.1);                    % Intervalo de separación&lt;br /&gt;
&lt;br /&gt;
    u=[1:h:2];              % Intervalo de rho [1,2]&lt;br /&gt;
&lt;br /&gt;
    v=[0:h:2*pi+h];         % Intervalo de theta [0,2*pi]&lt;br /&gt;
&lt;br /&gt;
    [uu,vv]=meshgrid(u,v);  % Matrices de rho y theta&lt;br /&gt;
&lt;br /&gt;
    figure(1)&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1)&lt;br /&gt;
&lt;br /&gt;
    xx=uu.*cos(vv);         % Parametrización&lt;br /&gt;
&lt;br /&gt;
    yy=uu.*sin(vv);&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)           % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])       % Región para dibujar&lt;br /&gt;
    &lt;br /&gt;
    axis equal &lt;br /&gt;
 &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2)&lt;br /&gt;
&lt;br /&gt;
    f=(pi*(cos(pi*vv./2)))./(60); % Campo escalar&lt;br /&gt;
&lt;br /&gt;
    surf(xx,yy,f)          % Dibujar el mallado&lt;br /&gt;
&lt;br /&gt;
    axis([-2,2,-2,2])      % Región para dibujar&lt;br /&gt;
&lt;br /&gt;
    axis equal &lt;br /&gt;
    &lt;br /&gt;
    colorbar&lt;br /&gt;
&lt;br /&gt;
    view(2)                &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>IAGO RODRIGUEZ ROMERO</name></author>	</entry>

	</feed>