<?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=Mokhtar+Benslim</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=Mokhtar+Benslim"/>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/wiki/Especial:Contribuciones/Mokhtar_Benslim"/>
		<updated>2026-04-30T02:11:17Z</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_9_A)&amp;diff=6829</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6829"/>
				<updated>2013-12-09T23:40:53Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones tangenciales respecto al plano ortogonal a \vec g_\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|500px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia=[];                                                % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^3} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^3} &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^3} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^3}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB40.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_\theta /\rho&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
rhosigmarho=(pi*cos(pi.*vv))./(20.*(uu.^3));                        % Tensiones normales en la dirección del eje grho.&lt;br /&gt;
thetasigmatheta=(3*pi*cos(pi.*vv))./(20.*(uu.^3));                  % Tensiones normales en la dirección del eje gtheta/rho.&lt;br /&gt;
subplot(2,2,1);                                                     % Muestra varias imágenes. 1º Imagen. Vista superior tensiones normales según eje grho.&lt;br /&gt;
mesh(xx,yy,rhosigmarho); colorbar                                   % Mallado más leyenda en color.&lt;br /&gt;
view(2)                                                             % Ver imagen desde arriba.&lt;br /&gt;
subplot(2,2,3);                                                     % Muestra varias imágenes. 3º Imagen. Vista superior tensiones normales según eje gtheta/rho.&lt;br /&gt;
mesh(xx,yy,thetasigmatheta); colorbar                               % Mallado más leyenda en color.&lt;br /&gt;
view(2)                                                             % Ver imagen desde arriba.&lt;br /&gt;
subplot(2,2,2);                                                     % Muestra varias imágenes. 2º Imagen. Tensiones normales según eje grho.&lt;br /&gt;
mesh(xx,yy,rhosigmarho);                                            % Mallado.&lt;br /&gt;
subplot(2,2,4);                                                     % Muestra varias imágenes. 4º Imagen. Tensiones normales según eje gtheta/rho.&lt;br /&gt;
mesh(xx,yy,thetasigmatheta);                                        % Mallado.                               &lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación como consecuencia de la percusión.&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|Tensiones tangenciales respecto al plano ortogonal a&amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-3*sin(pi.*vv)./20*uu.^(4));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-3*sin(pi.*vv)./20*uu.^(4));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = ((pi*cos(pi.*vv)./(uu.^2))*(20.^(-1)+ 10.*(uu.^(-1)); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = ((-3*sin(pi.*vv)./20*uu.^(4)); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6826</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6826"/>
				<updated>2013-12-09T23:39:00Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones tangenciales respecto al plano ortogonal a \vec g_\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|500px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia=[];                                                % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^3} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^3} &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^3} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^3}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^3}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB40.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_\theta /\rho&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
rhosigmarho=(pi*cos(pi.*vv))./(20.*(uu.^3));                        % Tensiones normales en la dirección del eje grho.&lt;br /&gt;
thetasigmatheta=(3*pi*cos(pi.*vv))./(20.*(uu.^3));                  % Tensiones normales en la dirección del eje gtheta/rho.&lt;br /&gt;
subplot(2,2,1);                                                     % Muestra varias imágenes. 1º Imagen. Vista superior tensiones normales según eje grho.&lt;br /&gt;
mesh(xx,yy,rhosigmarho); colorbar                                   % Mallado más leyenda en color.&lt;br /&gt;
view(2)                                                             % Ver imagen desde arriba.&lt;br /&gt;
subplot(2,2,3);                                                     % Muestra varias imágenes. 3º Imagen. Vista superior tensiones normales según eje gtheta/rho.&lt;br /&gt;
mesh(xx,yy,thetasigmatheta); colorbar                               % Mallado más leyenda en color.&lt;br /&gt;
view(2)                                                             % Ver imagen desde arriba.&lt;br /&gt;
subplot(2,2,2);                                                     % Muestra varias imágenes. 2º Imagen. Tensiones normales según eje grho.&lt;br /&gt;
mesh(xx,yy,rhosigmarho);                                            % Mallado.&lt;br /&gt;
subplot(2,2,4);                                                     % Muestra varias imágenes. 4º Imagen. Tensiones normales según eje gtheta/rho.&lt;br /&gt;
mesh(xx,yy,thetasigmatheta);                                        % Mallado.                               &lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación como consecuencia de la percusión.&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|Tensiones tangenciales respecto al plano ortogonal a g⃗ ρ]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-3*sin(pi.*vv)./20*uu.^(4));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-3*sin(pi.*vv)./20*uu.^(4));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = ((pi*cos(pi.*vv)./(uu.^2))*(20.^(-1)+ 10.*(uu.^(-1)); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = ((-3*sin(pi.*vv)./20*uu.^(4)); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6600</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6600"/>
				<updated>2013-12-09T20:45:09Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Resultado de la percusión del solido */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|500px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^3} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{\rho^{2}}(\frac{1}{20}+\frac{1}{10\rho})&amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi \theta)}{\rho^{2}}(\frac{1}{20}+\frac{1}{10\rho})&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = ((pi*cos(pi.*vv)./(uu.^2))*(20.^(-1)+ 10.*(uu.^(-1)));&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-3*sin(pi.*vv)./20*uu.^(4));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-3*sin(pi.*vv)./20*uu.^(4));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = ((pi*cos(pi.*vv)./(uu.^2))*(20.^(-1)+ 10.*(uu.^(-1)); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = ((-3*sin(pi.*vv)./20*uu.^(4)); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6598</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6598"/>
				<updated>2013-12-09T20:42:33Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^3} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{\rho^{2}}(\frac{1}{20}+\frac{1}{10\rho})&amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi \theta)}{\rho^{2}}(\frac{1}{20}+\frac{1}{10\rho})&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = ((pi*cos(pi.*vv)./(uu.^2))*(20.^(-1)+ 10.*(uu.^(-1)));&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-3*sin(pi.*vv)./20*uu.^(4));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-3*sin(pi.*vv)./20*uu.^(4));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = ((pi*cos(pi.*vv)./(uu.^2))*(20.^(-1)+ 10.*(uu.^(-1)); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = ((-3*sin(pi.*vv)./20*uu.^(4)); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6594</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6594"/>
				<updated>2013-12-09T20:39:20Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^3} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{\rho^{2}}(\frac{1}{20}+\frac{1}{10\rho})&amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi \theta)}{\rho^{2}}(\frac{1}{20}+\frac{1}{10\rho})&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = ((pi*cos(pi.*vv)./(uu.^2))*(20.^(-1)+ 10.*(uu.^(-1)));&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-3*sin(pi.*vv)./20*uu.^(4));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-3*sin(pi.*vv)./20*uu.^(4));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = ((pi*cos(pi.*vv)./(uu.^2))*(20.^(-1)+ 10.*(uu.^(-1)); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6519</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6519"/>
				<updated>2013-12-09T19:28:25Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones tangenciales respecto al plano ortogonal a \vec g_\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^3} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{\rho^{2}}(\frac{1}{20}+\frac{1}{10\rho})&amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi \theta)}{\rho^{2}}(\frac{1}{20}+\frac{1}{10\rho})&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv)./(uu.^2)*(1/20+1/10.*uu);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-3*sin(pi.*vv)./20*uu.^(4));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-3*sin(pi.*vv)./20*uu.^(4));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6509</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6509"/>
				<updated>2013-12-09T19:26:27Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^3} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{\rho^{2}}(\frac{1}{20}+\frac{1}{10\rho})&amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi \theta)}{\rho^{2}}(\frac{1}{20}+\frac{1}{10\rho})&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv)./(uu.^2)*(1/20+1/10.*uu);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6500</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6500"/>
				<updated>2013-12-09T19:24:12Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^3} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{\rho^{2}}(\frac{1}{20}+\frac{1}{10\rho})&amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi \theta)}{\rho^{2}}(\frac{1}{20}+\frac{1}{10\rho})&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6496</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6496"/>
				<updated>2013-12-09T19:22:45Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^3} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{\rho^{2}}(\frac{1}{20}+\frac{1}{10\rho})&amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^4}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6492</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6492"/>
				<updated>2013-12-09T19:22:06Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^3} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-3sin(\pi \theta)}{10\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{10\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{\rho^{2}}(\frac{1}{20}+\frac{1}{10\rho})&amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^4}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6490</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6490"/>
				<updated>2013-12-09T19:21:40Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^3} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-3sin(\pi \theta)}{10\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{10\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^{2}}(\frac{1}{\20}+\frac{1}{10\rho})&amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^4}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6481</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6481"/>
				<updated>2013-12-09T19:18:40Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^3} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-3sin(\pi \theta)}{10\rho^{4}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{2}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^4}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6479</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6479"/>
				<updated>2013-12-09T19:17:49Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^3} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{2}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^4}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6477</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6477"/>
				<updated>2013-12-09T19:17:19Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^4}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6475</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6475"/>
				<updated>2013-12-09T19:16:56Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\ \frac{-3sin(\pi \theta)}{20\rho^{4}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{2}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^4}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6352</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6352"/>
				<updated>2013-12-09T18:35:32Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{2}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^4}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6351</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6351"/>
				<updated>2013-12-09T18:35:03Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{2}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6306</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6306"/>
				<updated>2013-12-09T18:19:30Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones tangenciales respecto al plano ortogonal a \vec g_\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &amp;lt;math&amp;gt;|\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6281</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6281"/>
				<updated>2013-12-09T18:11:05Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y en las de dirección &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6271</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6271"/>
				<updated>2013-12-09T18:07:10Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones tangenciales respecto al plano ortogonal a \vec g_\theta/\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección g⃗ ρ y en las de dirección g⃗ θ/ρ son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección g⃗ ρ, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector g⃗ θ/ρ, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt; y al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;  lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6263</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6263"/>
				<updated>2013-12-09T18:04:35Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones tangenciales respecto al plano ortogonal a \vec g_\theta/\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección g⃗ ρ y en las de dirección g⃗ θ/ρ son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección g⃗ ρ, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector g⃗ θ/ρ, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
Podemos concluir que en las zonas donde se produce un mayor desplazamiento, las tensiones que presenta el sólido son mayores. Asimismo se puede observar la ortogonalidad de ambas tensiones tangenciales al plano ortogonal a g⃗ ρ y al plano ortogonal a g⃗ θ/ρ lo que confirma que las tensiones del sólido se pueden descomponer en dos componentes g⃗ θ/ρ y g⃗ ρ.&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6259</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6259"/>
				<updated>2013-12-09T18:03:49Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones tangenciales respecto al plano ortogonal a \vec g_\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección g⃗ ρ y en las de dirección g⃗ θ/ρ son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección g⃗ ρ, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector g⃗ θ/ρ, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6256</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6256"/>
				<updated>2013-12-09T18:03:19Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones tangenciales respecto al plano ortogonal a \vec g_\theta/\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección g⃗ ρ y en las de dirección g⃗ θ/ρ son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección g⃗ ρ, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector g⃗ θ/ρ, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6252</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6252"/>
				<updated>2013-12-09T18:01:40Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones tangenciales respecto al plano ortogonal a \vec g_\theta/\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección g⃗ ρ y en las de dirección g⃗ θ/ρ son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección g⃗ ρ, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector g⃗ θ/ρ, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./10.*(uu.^6); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6248</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6248"/>
				<updated>2013-12-09T17:58:51Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones tangenciales respecto al plano ortogonal a \vec g_\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección g⃗ ρ y en las de dirección g⃗ θ/ρ son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección g⃗ ρ, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector g⃗ θ/ρ, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir, &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|&amp;lt;/math&amp;gt;. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6217</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6217"/>
				<updated>2013-12-09T17:49:55Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones tangenciales respecto al plano ortogonal a \vec g_\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección g⃗ ρ y en las de dirección g⃗ θ/ρ son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección g⃗ ρ, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector g⃗ θ/ρ, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
[[Archivo:MATLAB30.jpg|400px|miniaturadeimagen|centro|gsgshtgh]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(-sin(pi.*vv))./(10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
 }}&lt;br /&gt;
Calcularemos las tensiones tangenciales al plano ortogonal a g⃗ θ/ρ, es decir, |σ⋅g⃗ θ/ρ−(g⃗ θ/ρ⋅σ⋅g⃗ θ/ρ)g⃗ θ/ρ|. La representación de estas, nos indicará en qué puntos las tensiones son mayores, y dado que el estudio se realiza en un medio elástico lineal, isótropo y homogéneo, en estos puntos citados las deformaciones también serán máximas.&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6194</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6194"/>
				<updated>2013-12-09T17:42:47Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones tangenciales respecto al plano ortogonal a \vec g_\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección g⃗ ρ y en las de dirección g⃗ θ/ρ son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección g⃗ ρ, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector g⃗ θ/ρ, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6193</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6193"/>
				<updated>2013-12-09T17:41:55Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones tangenciales respecto al plano ortogonal a \vec g_\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección g⃗ ρ y en las de dirección g⃗ θ/ρ son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección g⃗ ρ, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector g⃗ θ/ρ, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6188</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6188"/>
				<updated>2013-12-09T17:39:36Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones tangenciales respecto al plano ortogonal a \vec g_\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección g⃗ ρ y en las de dirección g⃗ θ/ρ son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección g⃗ ρ, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector g⃗ θ/ρ, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv)./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=((-sin(pi.*vv))./10*uu.^(-3));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6175</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6175"/>
				<updated>2013-12-09T17:35:08Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones tangenciales respecto al plano ortogonal a \vec g_\rho */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección g⃗ ρ y en las de dirección g⃗ θ/ρ son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección g⃗ ρ, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector g⃗ θ/ρ, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2); &lt;br /&gt;
&lt;br /&gt;
&amp;gt;&amp;gt;     sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,1);&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,sigmaro); &lt;br /&gt;
&lt;br /&gt;
    subplot(1,2,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
&lt;br /&gt;
    tenstangencialplanoro=((-sin(pi.*vv))./10)*(uu.^(-3));&lt;br /&gt;
&lt;br /&gt;
    mesh(xx,yy,tenstangencialplanoro); &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6170</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6170"/>
				<updated>2013-12-09T17:31:41Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB20.jpg|400px|miniaturadeimagen|centro|Tensiones normales en la direccion de &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
Tal y como se observa en la figura, las tensiones normales en la dirección g⃗ ρ y en las de dirección g⃗ θ/ρ son mayores en las zonas que presentan una mayor deformación consecuencia de la percusión.Ademas puede observarse que las tensiones normales en la dirección g⃗ ρ, aumenta su intensidad a medida que nos vamos acercando al borde interior de la placa; mientras que las dadas por el vector g⃗ θ/ρ, aumentan según nos acercamos al borde exterior de la misma. &lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6145</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6145"/>
				<updated>2013-12-09T17:23:54Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&amp;lt;/math&amp;gt;:     &amp;lt;math&amp;gt;&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:Dibujo matlab20.jpg|400px|miniaturadeimagen|derecha|Tensiones normales en la direccion del i y j]]&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6128</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6128"/>
				<updated>2013-12-09T17:17:55Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3*pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6125</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6125"/>
				<updated>2013-12-09T17:17:23Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (3pi*cos(pi.*vv))./20.*(uu.^6);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6119</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6119"/>
				<updated>2013-12-09T17:15:53Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{3\pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6117</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6117"/>
				<updated>2013-12-09T17:15:08Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\3pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6115</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6115"/>
				<updated>2013-12-09T17:14:51Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &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 [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos &amp;lt;math&amp;gt;\sigma_{ij}&amp;lt;/math&amp;gt; utilizando la fórmula, dando como resultado la siguiente matriz:&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\{3}pi\cos(\pi\theta)}{20\rho^6}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6098</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6098"/>
				<updated>2013-12-09T17:09:04Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt; como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;2\mu \epsilon_{ij}=\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &amp;lt;/math&amp;gt; Calculamos σij utilizando la formula, dando como resultado la siguiente matriz&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi\theta)}{10\rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6086</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6086"/>
				<updated>2013-12-09T17:05:51Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt; como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix}  Calculamos σij utilizando la formula, dando como resultado la siguiente matriz&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{3\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección &lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi\theta)}{10\rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6084</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6084"/>
				<updated>2013-12-09T17:04:49Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt; como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix}  Calculamos σij utilizando la formula, dando como resultado la siguiente matriz&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{\{3}pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección &lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi\theta)}{10\rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6082</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6082"/>
				<updated>2013-12-09T17:03:43Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt; como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix}  Calculamos σij utilizando la formula, dando como resultado la siguiente matriz&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{\3pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección &lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi\theta)}{10\rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6077</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6077"/>
				<updated>2013-12-09T17:02:27Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt; como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix}  Calculamos σij utilizando la formula, dando como resultado la siguiente matriz&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^{4}} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección &lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi\theta)}{10\rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6066</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6066"/>
				<updated>2013-12-09T16:58:55Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u =\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt; como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix}  Calculamos σij utilizando la formula, dando como resultado la siguiente matriz&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10} (\frac{1}{2\rho^2}+1) &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección &lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi\theta)}{10\rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6054</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6054"/>
				<updated>2013-12-09T16:57:16Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u =\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u =\begin{bmatrix} g_{\rho} &amp;amp; g_{\theta} &amp;amp; g_{z} \\ \frac{\rho}(\rho)}{10\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10} (\frac{1}{2\rho^2}+1) &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
 &lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u =\begin{bmatrix}  \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\ \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z}  \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ {bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt; como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} &lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10} (\frac{1}{2\rho^2}+1) &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección &lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi\theta)}{10\rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=6048</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=6048"/>
				<updated>2013-12-09T16:55:15Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u =\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u =\begin{bmatrix} g_{\rho} &amp;amp; g_{\theta} &amp;amp; g_{z} \\ \frac{\rho}(\rho)}{10\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10} (\frac{1}{2\rho^2}+1) &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix}=\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z} \\ 0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\delta}{\delta \rho} &amp;amp; \frac{\delta}{\delta \theta} &amp;amp; \frac{\delta}{\delta z} \\ \vec g_{\rho} &amp;amp; \vec g_{\theta} &amp;amp; \vec g_{z} \\  0 &amp;amp; \frac{\sin(\pi \theta)}{20\rho^2} &amp;amp; 0 \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt; como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;,El resultado de la parte simetrica del gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
\begin{bmatrix} 0 &amp;amp; \frac{-sin(\pi \theta)}{20\rho} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{20\rho} &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; 0 \end{bmatrix} dibujamos las tensiones normales en la dirección que marca el eje &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho&amp;lt;/math&amp;gt; y las tensiones normales en la dirección  &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10} (\frac{1}{2\rho^2}+1) &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección &lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi\theta)}{10\rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=5991</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=5991"/>
				<updated>2013-12-09T16:33:16Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u =\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt; como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;, dibujamos las tensiones normales en la dirección que marca el eje &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho&amp;lt;/math&amp;gt; y las tensiones normales en la dirección  &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10} (\frac{1}{2\rho^2}+1) &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección &lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi\theta)}{10\rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=5989</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=5989"/>
				<updated>2013-12-09T16:32:26Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tensiones debidas a la perturbación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|400px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|400px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u =\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB11.jpg|400px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones debidas a la perturbación===&lt;br /&gt;
Se define como &amp;lt;math&amp;gt;\epsilon(\vec u)=(\nabla \vec u + \nabla \vec u^t)/2&amp;lt;/math&amp;gt; como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, que se denomina [http://en.wikipedia.org/wiki/Infinitesimal_strain_theory tensor de deformaciones]:&lt;br /&gt;
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;
donde &amp;lt;math&amp;gt;\lambda&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;\mu&amp;lt;/math&amp;gt; son los conocidos como [http://en.wikipedia.org/wiki/Lam%C3%A9_parameters coeficientes de Lamé] que dependen de las propiedades elásticas de cada material. Tomando &amp;lt;math&amp;gt;\lambda=\mu=1&amp;lt;/math&amp;gt;, dibujamos las tensiones normales en la dirección que marca el eje &amp;lt;math&amp;gt;\vec g_{\rho}&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho&amp;lt;/math&amp;gt; y las tensiones normales en la dirección  &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt;, es decir &amp;lt;math&amp;gt;\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{10\rho} &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{10\rho^{3}} &amp;amp; \frac{\pi\cos(\pi \theta)}{10} (\frac{1}{2\rho^2}+1) &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
También calculamos las tensiones normales en la dirección &lt;br /&gt;
&amp;lt;math&amp;gt;\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi\theta)}{10\rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=5939</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=5939"/>
				<updated>2013-12-09T16:04:20Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Tendencia a la rotación */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|300px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|300px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u =\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB11.jpg|300px|miniaturadeimagen|centro|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones normales debidas a la perturbacion===&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi\theta)}{10\rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=5938</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=5938"/>
				<updated>2013-12-09T16:03:58Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* Cambio de volumen local debido al desplazamiento */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|300px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|300px|miniaturadeimagen|centro|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u =\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB11.jpg|300px|miniaturadeimagen|derecha|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones normales debidas a la perturbacion===&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi\theta)}{10\rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</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_9_A)&amp;diff=5936</id>
		<title>Visualización de campos escalares y vectoriales en elasticidad (grupo 9 A)</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_9_A)&amp;diff=5936"/>
				<updated>2013-12-09T16:03:36Z</updated>
		
		<summary type="html">&lt;p&gt;Mokhtar Benslim: /* º Campo de desplazamientos */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{beta}}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa plana (en 2 dimensiones) que ocupa el anillo comprendido entre las circunferencias centradas en el origen de radios 2 y 1. En ella 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;
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 instante &amp;lt;math&amp;gt;t_0&amp;lt;/math&amp;gt; vienen dados por:&lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta} &amp;lt;/math&amp;gt; {{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[:Categoría:Teoría de Campos|Teoría de campos]]|[[:Categoría:Trabajos 2013-14|2013-14]]}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==º Mallado del sólido ==&lt;br /&gt;
&lt;br /&gt;
Nuestro mallado se ha centrado en la representación de los puntos interiores de una placa sólida, con forma de corona circular. Tomando como paso de muestreo &amp;lt;math&amp;gt;h=\frac{1}{10}&amp;lt;/math&amp;gt; para las variables &amp;lt;math&amp;gt;x&amp;lt;/math&amp;gt; e &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, los comandos en Matlab para la visualización de nuestra placa son los siguientes:&lt;br /&gt;
[[Archivo:Dibujo matlab2.jpg|400px|miniaturadeimagen|centro|Placa mallada con forma de corona circular.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;                 % Paso de muestreo.&lt;br /&gt;
u=1:h:2;               % Intervalo [1,2].&lt;br /&gt;
v=0:h:2*pi+h;          % Intervalo [0,2*pi].&lt;br /&gt;
[uu,vv]=meshgrid(u,v); % Matrices.&lt;br /&gt;
xx=uu.*cos(vv);        % Parametrización X.&lt;br /&gt;
yy=uu.*sin(vv);        % Parametrización Y.&lt;br /&gt;
subplot(1,2,1);        % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx)       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])      % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                % Ver imagen desde arriba.&lt;br /&gt;
subplot(1,2,2);        % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,0*xx);      % Visión general.}}&lt;br /&gt;
&lt;br /&gt;
==º Temperatura del sólido ==&lt;br /&gt;
Teniendo en cuenta que la temperatura es un campo escalar y que en nuestro caso viene definida por  &amp;lt;math&amp;gt;T(x,y)=e^{-y}&amp;lt;/math&amp;gt;,vamos a tratar de observar su comportamiento a lo largo de nuestra corona circular plana. Nuestra función depende únicamente de la segunda variable, esto quiere decir que la temperatura se mantendrá constante para cada valor &amp;lt;math&amp;gt;y_{0}&amp;lt;/math&amp;gt;. Es decir, cada recta paralela al eje de abcisas tendrá una temperatura &amp;lt;math&amp;gt;T(x,y_{0})=e^{-y_{0}}=cte&amp;lt;/math&amp;gt;. Además, por el signo negativo del exponente, la &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; va aumentando a medida que disminuye la coordenada &amp;lt;math&amp;gt;y&amp;lt;/math&amp;gt;, ubicándose el foco de calor en la zona más inferior de la placa &amp;lt;math&amp;gt;(0,-2)&amp;lt;/math&amp;gt; . Así pues, se observa claramente en la figura como la temperatura va descendiendo a medida que nos vamos alejando del foco.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab3.jpg|400px|miniaturadeimagen|centro|&amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt; a lo largo de la placa.]] &lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
f=exp(-yy); 	          % Campo escalar de la Temperatura.&lt;br /&gt;
subplot(1,2,1);           % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
surf(xx,yy,f);            % Visualización 2D.&lt;br /&gt;
view(2)                   % Ver imagen desde arriba.&lt;br /&gt;
axis([-3,3,-3,3])         % Selecciona la regíon a representar en 2D.  &lt;br /&gt;
subplot(1,2,2);           % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
surf(xx,yy,f); colorbar;  % Visualización 3D más leyenda en color. }}&lt;br /&gt;
&lt;br /&gt;
=== Variación de la Temperatura (&amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;)  ===&lt;br /&gt;
Para estudiar la variación del campo escalar &amp;lt;math&amp;gt;T&amp;lt;/math&amp;gt;, haremos uso del gradiente &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt; . Se puede observar, por la propia definición del &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;, que dicho campo vectorial es perpendicular a las curvas de nivel de nuestra placa plana. A medida que nos acercamos a temperaturas más elevadas, la pendiente del &amp;lt;math&amp;gt;\vec\nabla&amp;lt;/math&amp;gt; en cada punto va siendo mayor.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Dibujo matlab4.jpg|400px|miniaturadeimagen|centro|Campo &amp;lt;math&amp;gt;\nabla T&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Grad=-exp(-yy);	                   % Gradiente del campo.&lt;br /&gt;
subplot(1,2,1);                    % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
surf(xx,yy,f);                     % Muestra la corona circular mallada y coloreada.&lt;br /&gt;
quiver3(xx,yy,f,0*xx,Grad,0*f);    % Visión tridimensional de los vectores gradientes del campo escalar.&lt;br /&gt;
hold off                           % Final superposición de gráficos&lt;br /&gt;
subplot(1,2,2)                     % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
hold on                            % Inicio superposición de gráficos.&lt;br /&gt;
quiver(xx,yy,0*xx,Grad); colorbar; % Visión bidimensional de los vectores gradientes del campo escalar más leyenda en color.&lt;br /&gt;
contour(xx,yy,f,20)                % Define 20 líneas de nivel.&lt;br /&gt;
hold off                           % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==º Campo de desplazamientos ==&lt;br /&gt;
&lt;br /&gt;
Nuestra superficie sufre un desplazamiento en un instante &amp;lt;math&amp;gt;t_{0}&amp;lt;/math&amp;gt; debido a una percusión. Dicho campo viene dado por el siguiente vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(\rho,\theta)=\frac{\sin(\pi \theta)}{20\rho^2}\vec g_{\theta}=\frac{-\sin(\theta)\sin(\pi \theta)}{20\rho}\vec i + \frac{\cos(\theta)\sin(\pi \theta)}{20\rho}\vec j&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando este campo a cada punto del solido obtendremos los vectores de desplazamiento de los mismos ante dicha percusión.&lt;br /&gt;
[[Archivo:MATLAB5.jpg|300px|miniaturadeimagen|centro|Vectores &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; de desplazamiento del sólido.]]&lt;br /&gt;
&lt;br /&gt;
===Resultado de la percusión del solido===&lt;br /&gt;
En la figura se muestran los vectores de desplazamiento de cada uno de los puntos del sólido según el campo vectorial &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;.&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux=[];                                                      % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy=[];                                                      % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
quiver(xx,yy,Ux,Uy);	                                    % Representación del campo vectorial de desplazamientos.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; que hace que el solido sufra una percusión, tiene un modulo muy pequeño, lo que dificulta el estudio y visión de la deformación a la que es sometido. Para apreciar mejor el efecto de la percusión en el sólido, procedemos a incrementar el tamaño de la deformación por &amp;lt;math&amp;gt;10&amp;lt;/math&amp;gt;. En la figura adjunta a la derecha se puede apreciar claramente las distintas fases de la deformación del solido: el sólido en reposo, el sólido deformado debido a &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; y el sólido deformado debido a &amp;lt;math&amp;gt;10\cdot\vec u&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:MATLAB10.jpg|400px|miniaturadeimagen|centro|Grados de deformación según la variación del módulo del vector &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
subplot(1,3,1); 		                            % Muestra varias imágenes. 1º Imagen: sólido sin deformar.&lt;br /&gt;
mesh(xx,yy,0*xx)                                            % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
Ux =[];                                                     % Matrices de vectores componentes x de u(rho,theta).&lt;br /&gt;
Uy =[];                                                     % Matrices de vectores componentes y de u(rho,theta).&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                              &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));   % Proyección de u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(20*uu(i,j));    % Proyección de u(rho,theta) sobre y.&lt;br /&gt;
    Uxx(i,j)=xx(i,j)+Ux(i,j);                               % Proyección vector posición tras la deformación sobre x.&lt;br /&gt;
    Uyy(i,j)=yy(i,j)+Uy(i,j);                               % Proyección vector posición tras la deformación sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,2);                                             % Muestra varias imágenes. 2º Imagen: sólido deformado por u(rho,theta).&lt;br /&gt;
mesh(Uxx,Uyy,0*xx);                                         % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.   &lt;br /&gt;
i=1; j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i=1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j=1:11                                                % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.                                            &lt;br /&gt;
    Ux(i,j)=-sin(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));    % Proyección de 10u(rho,theta) sobre x.&lt;br /&gt;
    Uy(i,j)=cos(vv(i,j))*(sin(pi*vv(i,j)))/(2*uu(i,j));     % Proyección de 10u(rho,theta) sobre y.&lt;br /&gt;
    Uxxx(i,j)=xx(i,j)+Ux(i,j);                              % Proyección vector posición tras la deformación ampliada sobre x.&lt;br /&gt;
    Uyyy(i,j)=yy(i,j)+Uy(i,j);                              % Proyección vector posición tras la deformación ampliada sobre y.&lt;br /&gt;
    j=j+1;                                                  % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i=i+1;                                                    % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,3,3);                                             % Muestra varias imágenes. 3º Imagen: sólido deformado por 10u(rho,theta).&lt;br /&gt;
mesh(Uxxx,Uyyy,0*xx);                                       % Mallado.&lt;br /&gt;
axis([-3,3,-3,3])                                           % Selecciona la regíon a dibujar.&lt;br /&gt;
view(2)                                                     % Ver imagen desde arriba.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Cambio de volumen local debido al desplazamiento ===&lt;br /&gt;
&lt;br /&gt;
Para estudiar la variación del volumen después de la percusión, hacemos uso de la divergencia del vector &amp;lt;math&amp;gt;\vec u(\rho,\theta)&amp;lt;/math&amp;gt;. Aplicando este operador al campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, obtenemos la función escalar divergencia de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u=\frac{\pi\cos(\pi \theta)}{20\rho^2}&amp;lt;/math&amp;gt; &lt;br /&gt;
Aplicando la divergencia observamos las variaciones de volumen en cada punto del sólido.&lt;br /&gt;
[[Archivo:MATLAB4.jpg|300px|miniaturadeimagen|derecha|Variacion del volumen según &amp;lt;math&amp;gt;\nabla\cdot\vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab| codigo=&lt;br /&gt;
Divergencia = [];                                              % Definición de la matriz Divergencia.&lt;br /&gt;
i=1;j=1;	                                               % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                               % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                                 % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Divergencia(i,j)=pi*(cos(pi.*vv(i,j)))/(20*(uu(i,j).^2));  % Cálculo de la divergencia del campo u.&lt;br /&gt;
    j = j+1;                                                   % Bucle j.&lt;br /&gt;
    end                                                        % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                      % Bucle i.&lt;br /&gt;
end                                                            % Fin del bucle i.&lt;br /&gt;
hold on                                                        % Inicio superposición de gráficos.&lt;br /&gt;
contour(xx,yy,Divergencia,20); colorbar;                       % Define 20 líneas de nivel más leyenda en color.&lt;br /&gt;
hold off                                                       % Fin superposición de gráficos.&lt;br /&gt;
}}&lt;br /&gt;
Se observa que los puntos con el máximo aumento y disminución de volumen se encuentran en la circunferencia interior de la corona, donde observamos mayor número de líneas de nivel.&lt;br /&gt;
&lt;br /&gt;
=== Tendencia a la rotación===&lt;br /&gt;
El rotacional se define como un operador vectorial que muestra la tendencia de un campo vectorial a inducir rotación alrededor de un punto. En nuestro campo de desplazamiento &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;, el rotacional será:&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla \times \vec u =\frac{-sin(\pi \theta)}{10\rho^3}\vec g_{z}\ &amp;lt;/math&amp;gt;&lt;br /&gt;
Según se observa en el gráfico adjunto, la tendencia a la rotación es mayor en los picos más inferiores y superiores, en los cuales &amp;lt;math&amp;gt;\nabla\cdot\vec u = 0&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:MATLAB11.jpg|300px|miniaturadeimagen|derecha|Nivel de rotación de los puntos del sólido según &amp;lt;math&amp;gt;\nabla \times \vec u&amp;lt;/math&amp;gt;.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
Rotacional=[];                                              % Definición de la matriz Rotacional.&lt;br /&gt;
i=1;j=1;	                                            % Definición de las variables para el bucle.&lt;br /&gt;
for i= 1:64	                                            % Inicio bucle para calcular el vector de cada punto. De 1 a 64 para v.&lt;br /&gt;
  for j = 1:11                                              % Inicio bucle para calcular el vector de cada punto. De 1 a 11 para u.&lt;br /&gt;
    Rotacional(i,j)=-sin(pi.*vv(i,j))/(10*(uu(i,j)^3));     % Cálculo del rotacional del campo u.&lt;br /&gt;
    j = j+1;                                                % Bucle j.&lt;br /&gt;
    end                                                     % Fin del bucle j.&lt;br /&gt;
  i= i+1;                                                   % Bucle i.&lt;br /&gt;
end                                                         % Fin del bucle i.&lt;br /&gt;
subplot(1,2,1)                                              % Muestra varias imágenes. 1º Imagen.&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,Rotacional);                   % Visión tridimensional de los vectores rotacional.&lt;br /&gt;
subplot(1,2,2)                                              % Muestra varias imágenes. 2º Imagen.&lt;br /&gt;
mesh(xx,yy,Rotacional); colorbar;                           % Mallado más leyenda en color.&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=== Tensiones normales debidas a la perturbacion===&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{ij}=\begin{bmatrix} \frac{\pi\cos(\pi \theta)}{20\rho^2} &amp;amp; \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; 0 \\ \frac{-sin(\pi \theta)}{40}(\frac{1}{\rho}+\frac{1}{\rho^3}) &amp;amp; \frac{\pi\cos(\pi \theta)}{10\rho^2} &amp;amp; 0 \\  0 &amp;amp; 0 &amp;amp; \frac{\pi\cos(\pi \theta)}{20\rho^2} \end{bmatrix}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_{\rho} \cdot \sigma \cdot \vec g_\rho = \frac{\pi\cos(\pi\theta)}{20\rho^2}\\&lt;br /&gt;
&lt;br /&gt;
\vec g_\theta/\rho \cdot \sigma \cdot \vec g_\theta/\rho =\frac{\pi\cos(\pi\theta)}{10\rho^2}&amp;lt;/math&amp;gt;&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%% tensiones normales en la dirección de los ejes gro y gtheta/ro&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2));&lt;br /&gt;
&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2);&lt;br /&gt;
%% representación del mallado y de las tensiones en plano&lt;br /&gt;
subplot(2,2,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(2,2,3);&lt;br /&gt;
mesh(xx,yy,sigmatheta); colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
%% representación del mallado y de las tensiones en 3D&lt;br /&gt;
subplot(2,2,2);&lt;br /&gt;
mesh(xx,yy,sigmaro);&lt;br /&gt;
subplot(2,2,4);&lt;br /&gt;
mesh(xx,yy,sigmatheta);&lt;br /&gt;
}}&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
sigmaro = (pi*cos(pi.*vv))./(20.*(uu.^2)); 	%% tensión en dirección gro&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmaro); &lt;br /&gt;
subplot(1,3,2); 	%% tensión tangencial respecto al plano ortogonal a gro (3D)&lt;br /&gt;
tenstangencialplanoro=(((sin(pi.*vv))./40).*(uu.^(-1)+uu.^(-3)));&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro);&lt;br /&gt;
subplot(1,3,3); %% tensión tangencial respecto al plano ortogonal a gro (2D)&lt;br /&gt;
mesh(xx,yy,tenstangencialplanoro); colorbar&lt;br /&gt;
view(2);  &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
==== Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec g_\theta/\rho&amp;lt;/math&amp;gt; ====&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%% tensión en dirección gtheta/ro&lt;br /&gt;
sigmatheta = (pi*cos(pi.*vv))./10.*(uu.^2); &lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
mesh(xx,yy,sigmatheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 3D&lt;br /&gt;
tenstangencialplanotheta = (((sin(pi.*vv))./(40.*uu)).*(uu.^(-1)+uu.^(-3))); &lt;br /&gt;
subplot(1,3,2);&lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); &lt;br /&gt;
%% tensión tangencial respecto al plano ortogonal a gtheta/ro 2D&lt;br /&gt;
subplot(1,3,3); &lt;br /&gt;
mesh(xx,yy,tenstangencialplanotheta); colorbar&lt;br /&gt;
view(2);   &lt;br /&gt;
}}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Mokhtar Benslim</name></author>	</entry>

	</feed>