<?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=Jaime.psoria</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=Jaime.psoria"/>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/wiki/Especial:Contribuciones/Jaime.psoria"/>
		<updated>2026-04-23T07:49:13Z</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_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=20355</id>
		<title>Visualización de Campos en un Anillo Plano (Grupo15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=20355"/>
				<updated>2014-12-04T12:56:40Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: /* . Masa del anillo */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==. Introducción ==&lt;br /&gt;
[[Archivo:c15.1.jpg|250px|thumb|derecha|''Mallada anillo plano'']]&lt;br /&gt;
Dada una placa plana con forma de anillo circular centrado en el origen, y comprendido entre los radios 1 y 2 (''Figura 1''), se estudiarán las variaciones de temperatura en este objeto y las deformaciones causadas por el campo:&lt;br /&gt;
   &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En esta placa circular consideramos dos magnitudes físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las variables espaciales &amp;lt;math&amp;gt;ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;θ&amp;lt;/math&amp;gt; y del tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;&lt;br /&gt;
\vec u (ρ,θ,t)&amp;lt;/math&amp;gt;, que dependen de los mismos parámetros que la temperatura.&lt;br /&gt;
De esta forma, si definimos &amp;lt;math&amp;gt; \vec r_0(\rho,\theta)&amp;lt;/math&amp;gt; como 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 para 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;
&lt;br /&gt;
==. Mallado del anillo plano==&lt;br /&gt;
&lt;br /&gt;
Tomamos una superficie circular plana centrada en el origen, comprendido por las circunferencias de radios 1 y 2 unidades. Utilizaremos un mallado que expresaremos en coordenadas polares, sean ρ є [1,2] y θ є [0,2Π). &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;     %Paso de muestreo&lt;br /&gt;
r=1:h:2;   %Coordenadas polares                         &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);   %Mallado      &lt;br /&gt;
x=rr.*cos(tt);   %Parametrización              &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)           &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==. Distribución de temperaturas en el anillo==&lt;br /&gt;
&lt;br /&gt;
La temperatura del sólido viene dada por la función: &amp;lt;math&amp;gt;T=(8-y^2+2y)e^{-x^2+2x-1}&amp;lt;/math&amp;gt; La representación de las curvas de nivel de la temperatura está representada en la gráfica inferior. El foco de calor viene representado en rojo y se observa que no esta en el origén. De esta forma se observa que la temperatura se propaga con curvas concéntricas isotermas.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Utilizando Matlab obtenemos que el máximo de la temperatura es &amp;lt;math&amp;gt; 8.9945 &amp;lt;/math&amp;gt;, aproximadamente &amp;lt;math&amp;gt;9&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.2.jpg|420x561px|miniaturadeimagen|derecha|Distribución de temperaturas y curvas de nivel del anillo.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado    &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x);&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
T=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);   %Expresión del campo escalar térmico &lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
surf(x,y,T)          &lt;br /&gt;
axis([-3,3,-3,3])  &lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
contour(x,y,T,25);&lt;br /&gt;
axis([-3,3,-3,3])       &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Gradiente de la temperatura==&lt;br /&gt;
&lt;br /&gt;
El gradiente de la temperatura &amp;lt;math&amp;gt;∇T=(T_1,T_2)= \frac{\partial T}{\partial x} \vec i  + \frac{\partial T}{\partial y} \vec j =  (-2x+2).e^{-x^2+2x-1} \vec i +  (-2*y+2).e^{-x^2+2*x-1} \vec j &amp;lt;/math&amp;gt;  es ortogonal a las lineas de nivel. El gradiente indica, en cada punto del sólido, la dirección en la cual la temperatura aumenta más rápido, es decir hacia el foco, y su módulo nos dirá la rápidez con la que aumenta la temperatura en esa dirección. &lt;br /&gt;
[[Archivo:c15.3.jpg|400x400px|miniaturadeimagen|derecha|Gradiente de la temperatura en el anillo]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[r,t]=meshgrid(r,t);&lt;br /&gt;
x=r.*cos(tt);&lt;br /&gt;
y=r.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2); %Relación polares-cartesianas&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
f=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);&lt;br /&gt;
fx=(-2.*x+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en x&lt;br /&gt;
fy=(-2.*y+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en y&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,fx,fy)&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
contour(x,y,f,25)    %Curvas de nivel&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Desplazamiento provocado por &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
A continuación aplicamos el campo de desplazamientos provocado por el vector :&amp;lt;math&amp;gt; \vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho} &amp;lt;/math&amp;gt; en el mallado y lo representamos gráficamente.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.4.jpg|400x400px|miniaturadeimagen|derecha|Desplazamiento en el anillo provocado por el vector u]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
x=rr.*cos(tt);&lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
ux=((1-u).^2).*x./u;  &lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
quiver(x,y,ux,uy)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Sólido antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Representamos la posición final de los puntos del anillo cuando actúa en él el desplazamiento anterior. Observamos que las partículas del sólido se mueven en la dirección de los vectores del campo &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;. El desplazamiento hace que el anillo se agrande llegando a un radio exterior de 3 unidades, siendo anteriormente 2 unidades, manteniendo el radio interior en 1 unidades.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.5.jpg|420x561px|miniaturadeimagen|derecha|expansión de la malla al aplicar &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;    %Paso de muestreo &lt;br /&gt;
r=1:h:2;   %Coordenadas polares             &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado&lt;br /&gt;
x=rr.*cos(tt);       &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x);&lt;br /&gt;
ux=((1-u).^2).*x./u;  %Desplazamientos originados por la vibración&lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
dx=x+ux; %Posición final de los puntos de la placa&lt;br /&gt;
dy=y+uy;&lt;br /&gt;
subplot(1,2,1) %Antes&lt;br /&gt;
mesh(x,y,0.*x)       &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
subplot(1,2,2)  %Despues&lt;br /&gt;
mesh(dx,dy,0.*dx)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Divergencia del campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
Calculamos la divergencia de u en todos los puntos del sólido, utilizando el operador \( \nabla \cdot \vec u \): &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
∇·\vec u=\frac{ 1}{ √g}·\frac{\partial }{\partial x^i}·(√g·u^i) &lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Los puntos de mayor divergencia están en la frontera exterior del anillo. En los puntos de la frontera interior no hay desplazamiento y observamos que aumenta progresivamente conforme se acercan a la frontera exterior.&lt;br /&gt;
No se aprecia cambio de volumen, ya que se trata de una representación de una superficie plana.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.6.jpg|300px|thumb|derecha|]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)&lt;br /&gt;
axis([-3,3,-3,3])    &lt;br /&gt;
div=1./rr-4+3.*rr;   %Expresión de la divergencia&lt;br /&gt;
surf(x,y,div)          &lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==. Rotacional &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Para aplicar la formula del rotacional necesitamos las covariantes del campo &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g^ρ = u_i . g^i&amp;lt;/math&amp;gt; que al aplicar la matriz de Gram de las coordenadas polares queda &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g_ρ = u^i . g_i&amp;lt;/math&amp;gt;&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
|\nabla\times \vec u⃗ |=\frac{ 1}{ ρ}\left|&lt;br /&gt;
\begin{matrix}&lt;br /&gt;
\ g_ρ &amp;amp; \ g_θ &amp;amp; \ g_z  \\&lt;br /&gt;
&amp;amp; &amp;amp; \\&lt;br /&gt;
\frac{\partial}{\partial ρ} &amp;amp; \frac{\partial}{\partial θ} &amp;amp; \frac{\partial}{\partial z}&lt;br /&gt;
\\ &amp;amp; &amp;amp; \\&lt;br /&gt;
(1-ρ)^2 &amp;amp; 0 &amp;amp; 0 &lt;br /&gt;
\end{matrix}\right|&lt;br /&gt;
=0&lt;br /&gt;
&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Obtención del campo de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Calculamos el tensor gradiente del campo &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; mediante la derivada covariante (forma para obtener el gradiente de un campo vectorial)y a continuación obtenemos su parte simétrica que llamaremos &amp;lt;math&amp;gt;ε&amp;lt;/math&amp;gt;. &lt;br /&gt;
Definimos el tensor de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; como &amp;lt;math&amp;gt;σ = λ∇·u1+2µε&amp;lt;/math&amp;gt; siendo los coeficientes de Lamé &amp;lt;math&amp;gt; λ &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; µ&amp;lt;/math&amp;gt; iguales a &amp;lt;math&amp;gt;1&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
El valor de la matriz del tensor es &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\begin{bmatrix}&lt;br /&gt;
\frac{ 1}{ ρ}-8+7ρ &amp;amp; 0\\&lt;br /&gt;
0 &amp;amp; \frac{ 3}{ ρ}-8+5ρ&lt;br /&gt;
\end{bmatrix}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sabiendo que el tensor se puede expresar como: &amp;lt;math&amp;gt;σ= (\frac{ 1}{ ρ}-8+7ρ).g_ρ\otimes g_ρ + (\frac{ 3}{ ρ}-8+5ρ).g_θ\otimes g_θ &amp;lt;/math&amp;gt; Ambas componentes representan &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;g_θ&amp;lt;/math&amp;gt;, respectivamente.&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
[[Archivo:c15.7.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gρ.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma1= 1./rr-8+7.*rr; %Campo de tensiones en dirección gρ&lt;br /&gt;
surf(x,y,sigma1)              &lt;br /&gt;
axis([-3,3,-3,3])          &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección  &amp;lt;math&amp;gt;g_θ/ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.8.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gθ/ρ.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma2=3./rr-8+5.*rr; %Campo de tensiones en dirección gθ/ρ&lt;br /&gt;
surf(x,y,sigma2)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Conclusión: la tensión es más elevada en la direccion g_ρ que en la g_θ por tanto es mayor en la dirección radial que en las perpendiculares a los radios.&lt;br /&gt;
&lt;br /&gt;
==. Tensiones tangenciales ==&lt;br /&gt;
Las tensiones tangenciales son cero ya que la matriz de tensiones,&amp;lt;math&amp;gt; σ &amp;lt;/math&amp;gt;, es diagonal debido a que el campo de desplazamiento produce una expansión en la dirección estrictamente radial sin producir ninguna torsión alrededor del eje vertical del origen de coordenadas. Los elementos asociados a la dirección tangencial de la tensión, es decir, los que no pertenecen a la diagonal principal, son cero, no existen tensiones en las direcciones de los planos ortogonales a g_θ y g_ρ. &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==. Tensión de Von Mises ==&lt;br /&gt;
La tensión de Von Mises es determinada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2+ (\sigma_2-\sigma_3)^2+ (\sigma_3-\sigma_1)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo &amp;lt;math&amp;gt;\sigma_{1} =\frac{ 1}{ ρ}-8+7ρ, \sigma_2=\frac{ 3}{ ρ}-8+5ρ, \sigma_3=0,&amp;lt;/math&amp;gt;  los autovalores de la matriz de tensiones. Adaptando la fórmula a nuestro caso, anillo circular plano, la desarrollamos como: &lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo los autovalores:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \frac{(-2+2.ρ^2)}{\sqrt{2}.ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.9.3d.jpg|400x400px|miniaturadeimagen|derecha|Representación de las tensiones de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
fvm=(-2+2.*rr.^2)./(rr.*sqrt(2));&lt;br /&gt;
surf(x,y,fvm)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Masa del anillo ==&lt;br /&gt;
Obtenemos la masa del anillo utilizamos la función de densidad &amp;lt;math&amp;gt; d(x,y,z) = xye^{-1/x^2} &amp;lt;/math&amp;gt; que integramos en todo dominio para hallar una aproximación de esta magnitud.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.10.png|miniaturadeimagen|400x400px|derecha|Representación de la función de masa en cada punto.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
N1=200; N2=100;                  %Numero de puntos&lt;br /&gt;
a=1; b=2; c=1; d=2;             %Extremos del intervalo&lt;br /&gt;
h1=(b-a)/N1; h2=(d-c)/N2;&lt;br /&gt;
u=a:h1:b; v=c:h2:d;              %Coordenadas iniciales&lt;br /&gt;
[uu,vv]=meshgrid(u,v);           %Coordenadas del rectángulo&lt;br /&gt;
f=vv.*uu.*exp(-1./uu.^2);                %Función&lt;br /&gt;
w1=ones(N1+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N1+1)=1/2;&lt;br /&gt;
w2=ones(N2+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N2+1)=1/2;&lt;br /&gt;
result=h1*h2*w2'*f*w1  &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La masa del anillo en el primer cuadrante es 1.4635. Debido a su simetría impar, si integraramos en todo el dominio la masa total sería 0. Como dos de los cuadrantes son de masa idéntica pero negativa, al multiplicar por 4 la masa del primer cuadrante, obtenemos lo que sería una suma de la masa en valor absoluto de todo el dominio.  &amp;lt;math&amp;gt;  1.4635 \times 4 = 5.854 = Masa  Total &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.10.png&amp;diff=20354</id>
		<title>Archivo:C15.10.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.10.png&amp;diff=20354"/>
				<updated>2014-12-04T12:56:05Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=20351</id>
		<title>Visualización de Campos en un Anillo Plano (Grupo15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=20351"/>
				<updated>2014-12-04T12:50:31Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==. Introducción ==&lt;br /&gt;
[[Archivo:c15.1.jpg|250px|thumb|derecha|''Mallada anillo plano'']]&lt;br /&gt;
Dada una placa plana con forma de anillo circular centrado en el origen, y comprendido entre los radios 1 y 2 (''Figura 1''), se estudiarán las variaciones de temperatura en este objeto y las deformaciones causadas por el campo:&lt;br /&gt;
   &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En esta placa circular consideramos dos magnitudes físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las variables espaciales &amp;lt;math&amp;gt;ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;θ&amp;lt;/math&amp;gt; y del tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;&lt;br /&gt;
\vec u (ρ,θ,t)&amp;lt;/math&amp;gt;, que dependen de los mismos parámetros que la temperatura.&lt;br /&gt;
De esta forma, si definimos &amp;lt;math&amp;gt; \vec r_0(\rho,\theta)&amp;lt;/math&amp;gt; como 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 para 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;
&lt;br /&gt;
==. Mallado del anillo plano==&lt;br /&gt;
&lt;br /&gt;
Tomamos una superficie circular plana centrada en el origen, comprendido por las circunferencias de radios 1 y 2 unidades. Utilizaremos un mallado que expresaremos en coordenadas polares, sean ρ є [1,2] y θ є [0,2Π). &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;     %Paso de muestreo&lt;br /&gt;
r=1:h:2;   %Coordenadas polares                         &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);   %Mallado      &lt;br /&gt;
x=rr.*cos(tt);   %Parametrización              &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)           &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==. Distribución de temperaturas en el anillo==&lt;br /&gt;
&lt;br /&gt;
La temperatura del sólido viene dada por la función: &amp;lt;math&amp;gt;T=(8-y^2+2y)e^{-x^2+2x-1}&amp;lt;/math&amp;gt; La representación de las curvas de nivel de la temperatura está representada en la gráfica inferior. El foco de calor viene representado en rojo y se observa que no esta en el origén. De esta forma se observa que la temperatura se propaga con curvas concéntricas isotermas.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Utilizando Matlab obtenemos que el máximo de la temperatura es &amp;lt;math&amp;gt; 8.9945 &amp;lt;/math&amp;gt;, aproximadamente &amp;lt;math&amp;gt;9&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.2.jpg|420x561px|miniaturadeimagen|derecha|Distribución de temperaturas y curvas de nivel del anillo.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado    &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x);&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
T=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);   %Expresión del campo escalar térmico &lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
surf(x,y,T)          &lt;br /&gt;
axis([-3,3,-3,3])  &lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
contour(x,y,T,25);&lt;br /&gt;
axis([-3,3,-3,3])       &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Gradiente de la temperatura==&lt;br /&gt;
&lt;br /&gt;
El gradiente de la temperatura &amp;lt;math&amp;gt;∇T=(T_1,T_2)= \frac{\partial T}{\partial x} \vec i  + \frac{\partial T}{\partial y} \vec j =  (-2x+2).e^{-x^2+2x-1} \vec i +  (-2*y+2).e^{-x^2+2*x-1} \vec j &amp;lt;/math&amp;gt;  es ortogonal a las lineas de nivel. El gradiente indica, en cada punto del sólido, la dirección en la cual la temperatura aumenta más rápido, es decir hacia el foco, y su módulo nos dirá la rápidez con la que aumenta la temperatura en esa dirección. &lt;br /&gt;
[[Archivo:c15.3.jpg|400x400px|miniaturadeimagen|derecha|Gradiente de la temperatura en el anillo]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[r,t]=meshgrid(r,t);&lt;br /&gt;
x=r.*cos(tt);&lt;br /&gt;
y=r.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2); %Relación polares-cartesianas&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
f=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);&lt;br /&gt;
fx=(-2.*x+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en x&lt;br /&gt;
fy=(-2.*y+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en y&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,fx,fy)&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
contour(x,y,f,25)    %Curvas de nivel&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Desplazamiento provocado por &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
A continuación aplicamos el campo de desplazamientos provocado por el vector :&amp;lt;math&amp;gt; \vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho} &amp;lt;/math&amp;gt; en el mallado y lo representamos gráficamente.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.4.jpg|400x400px|miniaturadeimagen|derecha|Desplazamiento en el anillo provocado por el vector u]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
x=rr.*cos(tt);&lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
ux=((1-u).^2).*x./u;  &lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
quiver(x,y,ux,uy)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Sólido antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Representamos la posición final de los puntos del anillo cuando actúa en él el desplazamiento anterior. Observamos que las partículas del sólido se mueven en la dirección de los vectores del campo &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;. El desplazamiento hace que el anillo se agrande llegando a un radio exterior de 3 unidades, siendo anteriormente 2 unidades, manteniendo el radio interior en 1 unidades.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.5.jpg|420x561px|miniaturadeimagen|derecha|expansión de la malla al aplicar &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;    %Paso de muestreo &lt;br /&gt;
r=1:h:2;   %Coordenadas polares             &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado&lt;br /&gt;
x=rr.*cos(tt);       &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x);&lt;br /&gt;
ux=((1-u).^2).*x./u;  %Desplazamientos originados por la vibración&lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
dx=x+ux; %Posición final de los puntos de la placa&lt;br /&gt;
dy=y+uy;&lt;br /&gt;
subplot(1,2,1) %Antes&lt;br /&gt;
mesh(x,y,0.*x)       &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
subplot(1,2,2)  %Despues&lt;br /&gt;
mesh(dx,dy,0.*dx)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Divergencia del campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
Calculamos la divergencia de u en todos los puntos del sólido, utilizando el operador \( \nabla \cdot \vec u \): &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
∇·\vec u=\frac{ 1}{ √g}·\frac{\partial }{\partial x^i}·(√g·u^i) &lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Los puntos de mayor divergencia están en la frontera exterior del anillo. En los puntos de la frontera interior no hay desplazamiento y observamos que aumenta progresivamente conforme se acercan a la frontera exterior.&lt;br /&gt;
No se aprecia cambio de volumen, ya que se trata de una representación de una superficie plana.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.6.jpg|300px|thumb|derecha|]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)&lt;br /&gt;
axis([-3,3,-3,3])    &lt;br /&gt;
div=1./rr-4+3.*rr;   %Expresión de la divergencia&lt;br /&gt;
surf(x,y,div)          &lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==. Rotacional &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Para aplicar la formula del rotacional necesitamos las covariantes del campo &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g^ρ = u_i . g^i&amp;lt;/math&amp;gt; que al aplicar la matriz de Gram de las coordenadas polares queda &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g_ρ = u^i . g_i&amp;lt;/math&amp;gt;&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
|\nabla\times \vec u⃗ |=\frac{ 1}{ ρ}\left|&lt;br /&gt;
\begin{matrix}&lt;br /&gt;
\ g_ρ &amp;amp; \ g_θ &amp;amp; \ g_z  \\&lt;br /&gt;
&amp;amp; &amp;amp; \\&lt;br /&gt;
\frac{\partial}{\partial ρ} &amp;amp; \frac{\partial}{\partial θ} &amp;amp; \frac{\partial}{\partial z}&lt;br /&gt;
\\ &amp;amp; &amp;amp; \\&lt;br /&gt;
(1-ρ)^2 &amp;amp; 0 &amp;amp; 0 &lt;br /&gt;
\end{matrix}\right|&lt;br /&gt;
=0&lt;br /&gt;
&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Obtención del campo de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Calculamos el tensor gradiente del campo &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; mediante la derivada covariante (forma para obtener el gradiente de un campo vectorial)y a continuación obtenemos su parte simétrica que llamaremos &amp;lt;math&amp;gt;ε&amp;lt;/math&amp;gt;. &lt;br /&gt;
Definimos el tensor de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; como &amp;lt;math&amp;gt;σ = λ∇·u1+2µε&amp;lt;/math&amp;gt; siendo los coeficientes de Lamé &amp;lt;math&amp;gt; λ &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; µ&amp;lt;/math&amp;gt; iguales a &amp;lt;math&amp;gt;1&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
El valor de la matriz del tensor es &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\begin{bmatrix}&lt;br /&gt;
\frac{ 1}{ ρ}-8+7ρ &amp;amp; 0\\&lt;br /&gt;
0 &amp;amp; \frac{ 3}{ ρ}-8+5ρ&lt;br /&gt;
\end{bmatrix}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sabiendo que el tensor se puede expresar como: &amp;lt;math&amp;gt;σ= (\frac{ 1}{ ρ}-8+7ρ).g_ρ\otimes g_ρ + (\frac{ 3}{ ρ}-8+5ρ).g_θ\otimes g_θ &amp;lt;/math&amp;gt; Ambas componentes representan &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;g_θ&amp;lt;/math&amp;gt;, respectivamente.&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
[[Archivo:c15.7.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gρ.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma1= 1./rr-8+7.*rr; %Campo de tensiones en dirección gρ&lt;br /&gt;
surf(x,y,sigma1)              &lt;br /&gt;
axis([-3,3,-3,3])          &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección  &amp;lt;math&amp;gt;g_θ/ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.8.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gθ/ρ.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma2=3./rr-8+5.*rr; %Campo de tensiones en dirección gθ/ρ&lt;br /&gt;
surf(x,y,sigma2)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Conclusión: la tensión es más elevada en la direccion g_ρ que en la g_θ por tanto es mayor en la dirección radial que en las perpendiculares a los radios.&lt;br /&gt;
&lt;br /&gt;
==. Tensiones tangenciales ==&lt;br /&gt;
Las tensiones tangenciales son cero ya que la matriz de tensiones,&amp;lt;math&amp;gt; σ &amp;lt;/math&amp;gt;, es diagonal debido a que el campo de desplazamiento produce una expansión en la dirección estrictamente radial sin producir ninguna torsión alrededor del eje vertical del origen de coordenadas. Los elementos asociados a la dirección tangencial de la tensión, es decir, los que no pertenecen a la diagonal principal, son cero, no existen tensiones en las direcciones de los planos ortogonales a g_θ y g_ρ. &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==. Tensión de Von Mises ==&lt;br /&gt;
La tensión de Von Mises es determinada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2+ (\sigma_2-\sigma_3)^2+ (\sigma_3-\sigma_1)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo &amp;lt;math&amp;gt;\sigma_{1} =\frac{ 1}{ ρ}-8+7ρ, \sigma_2=\frac{ 3}{ ρ}-8+5ρ, \sigma_3=0,&amp;lt;/math&amp;gt;  los autovalores de la matriz de tensiones. Adaptando la fórmula a nuestro caso, anillo circular plano, la desarrollamos como: &lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo los autovalores:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \frac{(-2+2.ρ^2)}{\sqrt{2}.ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.9.3d.jpg|400x400px|miniaturadeimagen|derecha|Representación de las tensiones de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
fvm=(-2+2.*rr.^2)./(rr.*sqrt(2));&lt;br /&gt;
surf(x,y,fvm)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Masa del anillo ==&lt;br /&gt;
Obtenemos la masa del anillo utilizamos la función de densidad &amp;lt;math&amp;gt; d(x,y,z) = xye^{-1/x^2} &amp;lt;/math&amp;gt; que integramos en todo dominio para hallar una aproximación de esta magnitud.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cosa.png|miniaturadeimagen|400x400px|derecha|Representación de la función de masa en cada punto.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
N1=200; N2=100;                  %Numero de puntos&lt;br /&gt;
a=1; b=2; c=1; d=2;             %Extremos del intervalo&lt;br /&gt;
h1=(b-a)/N1; h2=(d-c)/N2;&lt;br /&gt;
u=a:h1:b; v=c:h2:d;              %Coordenadas iniciales&lt;br /&gt;
[uu,vv]=meshgrid(u,v);           %Coordenadas del rectángulo&lt;br /&gt;
f=vv.*uu.*exp(-1./uu.^2);                %Función&lt;br /&gt;
w1=ones(N1+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N1+1)=1/2;&lt;br /&gt;
w2=ones(N2+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N2+1)=1/2;&lt;br /&gt;
result=h1*h2*w2'*f*w1  &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La masa del anillo en el primer cuadrante es 1.4635. Debido a su simetría impar, si integraramos en todo el dominio la masa total sería 0. Como dos de los cuadrantes son de masa idéntica pero negativa, al multiplicar por 4 la masa del primer cuadrante, obtenemos lo que sería una suma de la masa en valor absoluto de todo el dominio.  &amp;lt;math&amp;gt;  1.4635 \times 4 = 5.854 = Masa  Total &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=20350</id>
		<title>Visualización de Campos en un Anillo Plano (Grupo15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=20350"/>
				<updated>2014-12-04T12:49:45Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: /* . Divergencia del campo vectorial \vec u */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==. Introducción ==&lt;br /&gt;
[[Archivo:c15.1.jpg|250px|thumb|derecha|''Mallada anillo plano'']]&lt;br /&gt;
Dada una placa plana con forma de anillo circular centrado en el origen, y comprendido entre los radios 1 y 2 (''Figura 1''), se estudiarán las variaciones de temperatura en este objeto y las deformaciones causadas por el campo:&lt;br /&gt;
   &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En esta placa circular consideramos dos magnitudes físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las variables espaciales &amp;lt;math&amp;gt;ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;θ&amp;lt;/math&amp;gt; y del tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;&lt;br /&gt;
\vec u (ρ,θ,t)&amp;lt;/math&amp;gt;, que dependen de los mismos parámetros que la temperatura.&lt;br /&gt;
De esta forma, si definimos &amp;lt;math&amp;gt; \vec r_0(\rho,\theta)&amp;lt;/math&amp;gt; como 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 para 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;
&lt;br /&gt;
==. Mallado del anillo plano==&lt;br /&gt;
&lt;br /&gt;
Tomamos una superficie circular plana centrada en el origen, comprendido por las circunferencias de radios 1 y 2 unidades. Utilizaremos un mallado que expresaremos en coordenadas polares, sean ρ є [1,2] y θ є [0,2Π). &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;     %Paso de muestreo&lt;br /&gt;
r=1:h:2;   %Coordenadas polares                         &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);   %Mallado      &lt;br /&gt;
x=rr.*cos(tt);   %Parametrización              &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)           &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==. Distribución de temperaturas en el anillo==&lt;br /&gt;
&lt;br /&gt;
La temperatura del sólido viene dada por la función: &amp;lt;math&amp;gt;T=(8-y^2+2y)e^{-x^2+2x-1}&amp;lt;/math&amp;gt; La representación de las curvas de nivel de la temperatura está representada en la gráfica inferior. El foco de calor viene representado en rojo y se observa que no esta en el origén. De esta forma se observa que la temperatura se propaga con curvas concéntricas isotermas.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Utilizando Matlab obtenemos que el máximo de la temperatura es &amp;lt;math&amp;gt; 8.9945 &amp;lt;/math&amp;gt;, aproximadamente &amp;lt;math&amp;gt;9&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.2.jpg|420x561px|miniaturadeimagen|derecha|Distribución de temperaturas y curvas de nivel del anillo.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado    &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x);&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
T=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);   %Expresión del campo escalar térmico &lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
surf(x,y,T)          &lt;br /&gt;
axis([-3,3,-3,3])  &lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
contour(x,y,T,25);&lt;br /&gt;
axis([-3,3,-3,3])       &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Gradiente de la temperatura==&lt;br /&gt;
&lt;br /&gt;
El gradiente de la temperatura &amp;lt;math&amp;gt;∇T=(T_1,T_2)= \frac{\partial T}{\partial x} \vec i  + \frac{\partial T}{\partial y} \vec j =  (-2x+2).e^{-x^2+2x-1} \vec i +  (-2*y+2).e^{-x^2+2*x-1} \vec j &amp;lt;/math&amp;gt;  es ortogonal a las lineas de nivel. El gradiente indica, en cada punto del sólido, la dirección en la cual la temperatura aumenta más rápido, es decir hacia el foco, y su módulo nos dirá la rápidez con la que aumenta la temperatura en esa dirección. &lt;br /&gt;
[[Archivo:c15.3.jpg|400x400px|miniaturadeimagen|derecha|Gradiente de la temperatura en el anillo]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[r,t]=meshgrid(r,t);&lt;br /&gt;
x=r.*cos(tt);&lt;br /&gt;
y=r.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2); %Relación polares-cartesianas&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
f=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);&lt;br /&gt;
fx=(-2.*x+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en x&lt;br /&gt;
fy=(-2.*y+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en y&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,fx,fy)&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
contour(x,y,f,25)    %Curvas de nivel&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Desplazamiento provocado por &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
A continuación aplicamos el campo de desplazamientos provocado por el vector :&amp;lt;math&amp;gt; \vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho} &amp;lt;/math&amp;gt; en el mallado y lo representamos gráficamente.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.4.jpg|400x400px|miniaturadeimagen|derecha|Desplazamiento en el anillo provocado por el vector u]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
x=rr.*cos(tt);&lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
ux=((1-u).^2).*x./u;  &lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
quiver(x,y,ux,uy)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Sólido antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Representamos la posición final de los puntos del anillo cuando actúa en él el desplazamiento anterior. Observamos que las partículas del sólido se mueven en la dirección de los vectores del campo &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;. El desplazamiento hace que el anillo se agrande llegando a un radio exterior de 3 unidades, siendo anteriormente 2 unidades, manteniendo el radio interior en 1 unidades.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.5.jpg|420x561px|miniaturadeimagen|derecha|expansión de la malla al aplicar &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;    %Paso de muestreo &lt;br /&gt;
r=1:h:2;   %Coordenadas polares             &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado&lt;br /&gt;
x=rr.*cos(tt);       &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x);&lt;br /&gt;
ux=((1-u).^2).*x./u;  %Desplazamientos originados por la vibración&lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
dx=x+ux; %Posición final de los puntos de la placa&lt;br /&gt;
dy=y+uy;&lt;br /&gt;
subplot(1,2,1) %Antes&lt;br /&gt;
mesh(x,y,0.*x)       &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
subplot(1,2,2)  %Despues&lt;br /&gt;
mesh(dx,dy,0.*dx)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Divergencia del campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
Calculamos la divergencia de u en todos los puntos del sólido, utilizando el operador \( \nabla \cdot \vec u \): &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
∇·\vec u=\frac{ 1}{ √g}·\frac{\partial }{\partial x^i}·(√g·u^i) &lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Los puntos de mayor divergencia están en la frontera exterior del anillo. En los puntos de la frontera interior no hay desplazamiento y observamos que aumenta progresivamente conforme se acercan a la frontera exterior.&lt;br /&gt;
No se aprecia cambio de volumen, ya que se trata de una representación de una superficie plana.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.6.jpg|300px|thumb|derecha|]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)&lt;br /&gt;
axis([-3,3,-3,3])    &lt;br /&gt;
div=1./rr-4+3.*rr;   %Expresión de la divergencia&lt;br /&gt;
surf(x,y,div)          &lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==. Rotacional &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Para aplicar la formula del rotacional necesitamos las covariantes del campo &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g^ρ = u_i . g^i&amp;lt;/math&amp;gt; que al aplicar la matriz de Gram de las coordenadas polares queda &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g_ρ = u^i . g_i&amp;lt;/math&amp;gt;&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
|\nabla\times \vec u⃗ |=\frac{ 1}{ ρ}\left|&lt;br /&gt;
\begin{matrix}&lt;br /&gt;
\ g_ρ &amp;amp; \ g_θ &amp;amp; \ g_z  \\&lt;br /&gt;
&amp;amp; &amp;amp; \\&lt;br /&gt;
\frac{\partial}{\partial ρ} &amp;amp; \frac{\partial}{\partial θ} &amp;amp; \frac{\partial}{\partial z}&lt;br /&gt;
\\ &amp;amp; &amp;amp; \\&lt;br /&gt;
(1-ρ)^2 &amp;amp; 0 &amp;amp; 0 &lt;br /&gt;
\end{matrix}\right|&lt;br /&gt;
=0&lt;br /&gt;
&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Obtención del campo de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Calculamos el tensor gradiente del campo &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; mediante la derivada covariante (forma para obtener el gradiente de un campo vectorial)y a continuación obtenemos su parte simétrica que llamaremos &amp;lt;math&amp;gt;ε&amp;lt;/math&amp;gt;. &lt;br /&gt;
Definimos el tensor de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; como &amp;lt;math&amp;gt;σ = λ∇·u1+2µε&amp;lt;/math&amp;gt; siendo los coeficientes de Lamé &amp;lt;math&amp;gt; λ &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; µ&amp;lt;/math&amp;gt; iguales a &amp;lt;math&amp;gt;1&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
El valor de la matriz del tensor es &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\begin{bmatrix}&lt;br /&gt;
\frac{ 1}{ ρ}-8+7ρ &amp;amp; 0\\&lt;br /&gt;
0 &amp;amp; \frac{ 3}{ ρ}-8+5ρ&lt;br /&gt;
\end{bmatrix}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sabiendo que el tensor se puede expresar como: &amp;lt;math&amp;gt;σ= (\frac{ 1}{ ρ}-8+7ρ).g_ρ\otimes g_ρ + (\frac{ 3}{ ρ}-8+5ρ).g_θ\otimes g_θ &amp;lt;/math&amp;gt; Ambas componentes representan &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;g_θ&amp;lt;/math&amp;gt;, respectivamente.&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
[[Archivo:c15.7.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gρ.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma1= 1./rr-8+7.*rr; %Campo de tensiones en dirección gρ&lt;br /&gt;
surf(x,y,sigma1)              &lt;br /&gt;
axis([-3,3,-3,3])          &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección  &amp;lt;math&amp;gt;g_θ/ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.8.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gθ/ρ.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma2=3./rr-8+5.*rr; %Campo de tensiones en dirección gθ/ρ&lt;br /&gt;
surf(x,y,sigma2)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Conclusión: la tensión es más elevada en la direccion g_ρ que en la g_θ por tanto es mayor en la dirección radial que en las perpendiculares a los radios.&lt;br /&gt;
&lt;br /&gt;
==. Tensiones tangenciales ==&lt;br /&gt;
Las tensiones tangenciales son cero ya que la matriz de tensiones,&amp;lt;math&amp;gt; σ &amp;lt;/math&amp;gt;, es diagonal debido a que el campo de desplazamiento produce una expansión en la dirección estrictamente radial sin producir ninguna torsión alrededor del eje vertical del origen de coordenadas. Los elementos asociados a la dirección tangencial de la tensión, es decir, los que no pertenecen a la diagonal principal, son cero, no existen tensiones en las direcciones de los planos ortogonales a g_θ y g_ρ. &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==. Tensión de Von Mises ==&lt;br /&gt;
La tensión de Von Mises es determinada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2+ (\sigma_2-\sigma_3)^2+ (\sigma_3-\sigma_1)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo &amp;lt;math&amp;gt;\sigma_{1} =\frac{ 1}{ ρ}-8+7ρ, \sigma_2=\frac{ 3}{ ρ}-8+5ρ, \sigma_3=0,&amp;lt;/math&amp;gt;  los autovalores de la matriz de tensiones. Adaptando la fórmula a nuestro caso, anillo circular plano, la desarrollamos como: &lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo los autovalores:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \frac{(-2+2.ρ^2)}{\sqrt{2}.ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.9.3d.jpg|400x400px|miniaturadeimagen|derecha|Representación de las tensiones de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
fvm=(-2+2.*rr.^2)./(rr.*sqrt(2));&lt;br /&gt;
surf(x,y,fvm)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Masa del anillo ==&lt;br /&gt;
Obtenemos la masa del anillo utilizamos la función de densidad &amp;lt;math&amp;gt; d(x,y,z) = xye^{-1/x^2} &amp;lt;/math&amp;gt; que integramos en todo dominio para hallar una aproximación de esta magnitud.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cosa.png|miniaturadeimagen|400x400px|derecha|Representación de la función de masa en cada punto.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
N1=200; N2=100;                  %Numero de puntos&lt;br /&gt;
a=1; b=2; c=1; d=2;             %Extremos del intervalo&lt;br /&gt;
h1=(b-a)/N1; h2=(d-c)/N2;&lt;br /&gt;
u=a:h1:b; v=c:h2:d;              %Coordenadas iniciales&lt;br /&gt;
[uu,vv]=meshgrid(u,v);           %Coordenadas del rectángulo&lt;br /&gt;
f=vv.*uu.*exp(-1./uu.^2);                %Función&lt;br /&gt;
w1=ones(N1+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N1+1)=1/2;&lt;br /&gt;
w2=ones(N2+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N2+1)=1/2;&lt;br /&gt;
result=h1*h2*w2'*f*w1  &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La masa del anillo en el primer cuadrante es 1.4635. Debido a su simetría impar, si integraramos en todo el dominio la masa total sería 0. Como dos de los cuadrantes son de masa idéntica pero negativa, al multiplicar por 4 la masa del primer cuadrante, obtenemos lo que sería una suma de la masa en valor absoluto de todo el dominio.  &amp;lt;math&amp;gt;  1.4635 \times 4 = 5.854 = Masa  Total &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=20344</id>
		<title>Visualización de Campos en un Anillo Plano (Grupo15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=20344"/>
				<updated>2014-12-04T12:46:26Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==. Introducción ==&lt;br /&gt;
[[Archivo:c15.1.jpg|250px|thumb|derecha|''Mallada anillo plano'']]&lt;br /&gt;
Dada una placa plana con forma de anillo circular centrado en el origen, y comprendido entre los radios 1 y 2 (''Figura 1''), se estudiarán las variaciones de temperatura en este objeto y las deformaciones causadas por el campo:&lt;br /&gt;
   &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En esta placa circular consideramos dos magnitudes físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las variables espaciales &amp;lt;math&amp;gt;ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;θ&amp;lt;/math&amp;gt; y del tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;&lt;br /&gt;
\vec u (ρ,θ,t)&amp;lt;/math&amp;gt;, que dependen de los mismos parámetros que la temperatura.&lt;br /&gt;
De esta forma, si definimos &amp;lt;math&amp;gt; \vec r_0(\rho,\theta)&amp;lt;/math&amp;gt; como 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 para 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;
&lt;br /&gt;
==. Mallado del anillo plano==&lt;br /&gt;
&lt;br /&gt;
Tomamos una superficie circular plana centrada en el origen, comprendido por las circunferencias de radios 1 y 2 unidades. Utilizaremos un mallado que expresaremos en coordenadas polares, sean ρ є [1,2] y θ є [0,2Π). &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;     %Paso de muestreo&lt;br /&gt;
r=1:h:2;   %Coordenadas polares                         &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);   %Mallado      &lt;br /&gt;
x=rr.*cos(tt);   %Parametrización              &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)           &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==. Distribución de temperaturas en el anillo==&lt;br /&gt;
&lt;br /&gt;
La temperatura del sólido viene dada por la función: &amp;lt;math&amp;gt;T=(8-y^2+2y)e^{-x^2+2x-1}&amp;lt;/math&amp;gt; La representación de las curvas de nivel de la temperatura está representada en la gráfica inferior. El foco de calor viene representado en rojo y se observa que no esta en el origén. De esta forma se observa que la temperatura se propaga con curvas concéntricas isotermas.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Utilizando Matlab obtenemos que el máximo de la temperatura es &amp;lt;math&amp;gt; 8.9945 &amp;lt;/math&amp;gt;, aproximadamente &amp;lt;math&amp;gt;9&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.2.jpg|420x561px|miniaturadeimagen|derecha|Distribución de temperaturas y curvas de nivel del anillo.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado    &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x);&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
T=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);   %Expresión del campo escalar térmico &lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
surf(x,y,T)          &lt;br /&gt;
axis([-3,3,-3,3])  &lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
contour(x,y,T,25);&lt;br /&gt;
axis([-3,3,-3,3])       &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Gradiente de la temperatura==&lt;br /&gt;
&lt;br /&gt;
El gradiente de la temperatura &amp;lt;math&amp;gt;∇T=(T_1,T_2)= \frac{\partial T}{\partial x} \vec i  + \frac{\partial T}{\partial y} \vec j =  (-2x+2).e^{-x^2+2x-1} \vec i +  (-2*y+2).e^{-x^2+2*x-1} \vec j &amp;lt;/math&amp;gt;  es ortogonal a las lineas de nivel. El gradiente indica, en cada punto del sólido, la dirección en la cual la temperatura aumenta más rápido, es decir hacia el foco, y su módulo nos dirá la rápidez con la que aumenta la temperatura en esa dirección. &lt;br /&gt;
[[Archivo:c15.3.jpg|400x400px|miniaturadeimagen|derecha|Gradiente de la temperatura en el anillo]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[r,t]=meshgrid(r,t);&lt;br /&gt;
x=r.*cos(tt);&lt;br /&gt;
y=r.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2); %Relación polares-cartesianas&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
f=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);&lt;br /&gt;
fx=(-2.*x+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en x&lt;br /&gt;
fy=(-2.*y+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en y&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,fx,fy)&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
contour(x,y,f,25)    %Curvas de nivel&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Desplazamiento provocado por &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
A continuación aplicamos el campo de desplazamientos provocado por el vector :&amp;lt;math&amp;gt; \vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho} &amp;lt;/math&amp;gt; en el mallado y lo representamos gráficamente.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.4.jpg|400x400px|miniaturadeimagen|derecha|Desplazamiento en el anillo provocado por el vector u]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
x=rr.*cos(tt);&lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
ux=((1-u).^2).*x./u;  &lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
quiver(x,y,ux,uy)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Sólido antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Representamos la posición final de los puntos del anillo cuando actúa en él el desplazamiento anterior. Observamos que las partículas del sólido se mueven en la dirección de los vectores del campo &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;. El desplazamiento hace que el anillo se agrande llegando a un radio exterior de 3 unidades, siendo anteriormente 2 unidades, manteniendo el radio interior en 1 unidades.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.5.jpg|420x561px|miniaturadeimagen|derecha|expansión de la malla al aplicar &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;    %Paso de muestreo &lt;br /&gt;
r=1:h:2;   %Coordenadas polares             &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado&lt;br /&gt;
x=rr.*cos(tt);       &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x);&lt;br /&gt;
ux=((1-u).^2).*x./u;  %Desplazamientos originados por la vibración&lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
dx=x+ux; %Posición final de los puntos de la placa&lt;br /&gt;
dy=y+uy;&lt;br /&gt;
subplot(1,2,1) %Antes&lt;br /&gt;
mesh(x,y,0.*x)       &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
subplot(1,2,2)  %Despues&lt;br /&gt;
mesh(dx,dy,0.*dx)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Divergencia del campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
Calculamos la divergencia de u en todos los puntos del sólido, utilizando el operador \( \nabla \cdot \vec u \): &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
∇·\vec u=\frac{ 1}{ √g}·\frac{\partial }{\partial x^i}·(√g·u^i) &lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Los puntos de mayor divergencia están en la frontera exterior del anillo. En los puntos de la frontera interior no hay desplazamiento y observamos que aumenta progresivamente conforme se acercan a la frontera exterior.&lt;br /&gt;
No se aprecia cambio de volumen, ya que se trata de una representación de una superficie plana.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)&lt;br /&gt;
axis([-3,3,-3,3])    &lt;br /&gt;
div=1./rr-4+3.*rr;   %Expresión de la divergencia&lt;br /&gt;
surf(x,y,div)          &lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:c15.6.jpg]]&lt;br /&gt;
&lt;br /&gt;
==. Rotacional &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Para aplicar la formula del rotacional necesitamos las covariantes del campo &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g^ρ = u_i . g^i&amp;lt;/math&amp;gt; que al aplicar la matriz de Gram de las coordenadas polares queda &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g_ρ = u^i . g_i&amp;lt;/math&amp;gt;&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
|\nabla\times \vec u⃗ |=\frac{ 1}{ ρ}\left|&lt;br /&gt;
\begin{matrix}&lt;br /&gt;
\ g_ρ &amp;amp; \ g_θ &amp;amp; \ g_z  \\&lt;br /&gt;
&amp;amp; &amp;amp; \\&lt;br /&gt;
\frac{\partial}{\partial ρ} &amp;amp; \frac{\partial}{\partial θ} &amp;amp; \frac{\partial}{\partial z}&lt;br /&gt;
\\ &amp;amp; &amp;amp; \\&lt;br /&gt;
(1-ρ)^2 &amp;amp; 0 &amp;amp; 0 &lt;br /&gt;
\end{matrix}\right|&lt;br /&gt;
=0&lt;br /&gt;
&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Obtención del campo de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Calculamos el tensor gradiente del campo &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; mediante la derivada covariante (forma para obtener el gradiente de un campo vectorial)y a continuación obtenemos su parte simétrica que llamaremos &amp;lt;math&amp;gt;ε&amp;lt;/math&amp;gt;. &lt;br /&gt;
Definimos el tensor de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; como &amp;lt;math&amp;gt;σ = λ∇·u1+2µε&amp;lt;/math&amp;gt; siendo los coeficientes de Lamé &amp;lt;math&amp;gt; λ &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; µ&amp;lt;/math&amp;gt; iguales a &amp;lt;math&amp;gt;1&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
El valor de la matriz del tensor es &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\begin{bmatrix}&lt;br /&gt;
\frac{ 1}{ ρ}-8+7ρ &amp;amp; 0\\&lt;br /&gt;
0 &amp;amp; \frac{ 3}{ ρ}-8+5ρ&lt;br /&gt;
\end{bmatrix}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sabiendo que el tensor se puede expresar como: &amp;lt;math&amp;gt;σ= (\frac{ 1}{ ρ}-8+7ρ).g_ρ\otimes g_ρ + (\frac{ 3}{ ρ}-8+5ρ).g_θ\otimes g_θ &amp;lt;/math&amp;gt; Ambas componentes representan &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;g_θ&amp;lt;/math&amp;gt;, respectivamente.&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
[[Archivo:c15.7.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gρ.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma1= 1./rr-8+7.*rr; %Campo de tensiones en dirección gρ&lt;br /&gt;
surf(x,y,sigma1)              &lt;br /&gt;
axis([-3,3,-3,3])          &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección  &amp;lt;math&amp;gt;g_θ/ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.8.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gθ/ρ.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma2=3./rr-8+5.*rr; %Campo de tensiones en dirección gθ/ρ&lt;br /&gt;
surf(x,y,sigma2)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Conclusión: la tensión es más elevada en la direccion g_ρ que en la g_θ por tanto es mayor en la dirección radial que en las perpendiculares a los radios.&lt;br /&gt;
&lt;br /&gt;
==. Tensiones tangenciales ==&lt;br /&gt;
Las tensiones tangenciales son cero ya que la matriz de tensiones,&amp;lt;math&amp;gt; σ &amp;lt;/math&amp;gt;, es diagonal debido a que el campo de desplazamiento produce una expansión en la dirección estrictamente radial sin producir ninguna torsión alrededor del eje vertical del origen de coordenadas. Los elementos asociados a la dirección tangencial de la tensión, es decir, los que no pertenecen a la diagonal principal, son cero, no existen tensiones en las direcciones de los planos ortogonales a g_θ y g_ρ. &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==. Tensión de Von Mises ==&lt;br /&gt;
La tensión de Von Mises es determinada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2+ (\sigma_2-\sigma_3)^2+ (\sigma_3-\sigma_1)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo &amp;lt;math&amp;gt;\sigma_{1} =\frac{ 1}{ ρ}-8+7ρ, \sigma_2=\frac{ 3}{ ρ}-8+5ρ, \sigma_3=0,&amp;lt;/math&amp;gt;  los autovalores de la matriz de tensiones. Adaptando la fórmula a nuestro caso, anillo circular plano, la desarrollamos como: &lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo los autovalores:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \frac{(-2+2.ρ^2)}{\sqrt{2}.ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.9.3d.jpg|400x400px|miniaturadeimagen|derecha|Representación de las tensiones de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
fvm=(-2+2.*rr.^2)./(rr.*sqrt(2));&lt;br /&gt;
surf(x,y,fvm)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Masa del anillo ==&lt;br /&gt;
Obtenemos la masa del anillo utilizamos la función de densidad &amp;lt;math&amp;gt; d(x,y,z) = xye^{-1/x^2} &amp;lt;/math&amp;gt; que integramos en todo dominio para hallar una aproximación de esta magnitud.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cosa.png|miniaturadeimagen|400x400px|derecha|Representación de la función de masa en cada punto.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
N1=200; N2=100;                  %Numero de puntos&lt;br /&gt;
a=1; b=2; c=1; d=2;             %Extremos del intervalo&lt;br /&gt;
h1=(b-a)/N1; h2=(d-c)/N2;&lt;br /&gt;
u=a:h1:b; v=c:h2:d;              %Coordenadas iniciales&lt;br /&gt;
[uu,vv]=meshgrid(u,v);           %Coordenadas del rectángulo&lt;br /&gt;
f=vv.*uu.*exp(-1./uu.^2);                %Función&lt;br /&gt;
w1=ones(N1+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N1+1)=1/2;&lt;br /&gt;
w2=ones(N2+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N2+1)=1/2;&lt;br /&gt;
result=h1*h2*w2'*f*w1  &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La masa del anillo en el primer cuadrante es 1.4635. Debido a su simetría impar, si integraramos en todo el dominio la masa total sería 0. Como dos de los cuadrantes son de masa idéntica pero negativa, al multiplicar por 4 la masa del primer cuadrante, obtenemos lo que sería una suma de la masa en valor absoluto de todo el dominio.  &amp;lt;math&amp;gt;  1.4635 \times 4 = 5.854 = Masa  Total &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.2.2.jpg&amp;diff=20326</id>
		<title>Archivo:C15.2.2.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.2.2.jpg&amp;diff=20326"/>
				<updated>2014-12-04T12:27:54Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.2.1.jpg&amp;diff=20322</id>
		<title>Archivo:C15.2.1.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.2.1.jpg&amp;diff=20322"/>
				<updated>2014-12-04T12:26:13Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.9.jpg&amp;diff=20294</id>
		<title>Archivo:C15.9.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.9.jpg&amp;diff=20294"/>
				<updated>2014-12-04T12:02:24Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.9.3d.jpg&amp;diff=20289</id>
		<title>Archivo:C15.9.3d.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.9.3d.jpg&amp;diff=20289"/>
				<updated>2014-12-04T11:59:27Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=18919</id>
		<title>Visualización de Campos en un Anillo Plano (Grupo15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=18919"/>
				<updated>2014-12-03T17:03:09Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==. Introducción ==&lt;br /&gt;
[[Archivo:c15.1.jpg|250px|thumb|derecha|''Mallada anillo plano'']]&lt;br /&gt;
Dada una placa plana con forma de anillo circular centrado en el origen, y comprendido entre los radios 1 y 2 (''Figura 1''), se estudiarán las variaciones de temperatura en este objeto y las deformaciones causadas por el campo:&lt;br /&gt;
   &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En esta placa circular consideramos dos magnitudes físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las variables espaciales &amp;lt;math&amp;gt;ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;θ&amp;lt;/math&amp;gt; y del tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;&lt;br /&gt;
\vec u (ρ,θ,t)&amp;lt;/math&amp;gt;, que dependen de los mismos parámetros que la temperatura.&lt;br /&gt;
De esta forma, si definimos &amp;lt;math&amp;gt; \vec r_0(\rho,\theta)&amp;lt;/math&amp;gt; como 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 para 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;
&lt;br /&gt;
==. Mallado del anillo plano==&lt;br /&gt;
&lt;br /&gt;
Tomamos una superficie circular plana centrada en el origen, comprendido por las circunferencias de radios 1 y 2 unidades. Utilizaremos un mallado que expresaremos en coordenadas polares, sean ρ є [1,2] y θ є [0,2Π). &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;     %Paso de muestreo&lt;br /&gt;
r=1:h:2;   %Coordenadas polares                         &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);   %Mallado      &lt;br /&gt;
x=rr.*cos(tt);   %Parametrización              &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)           &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==. Distribución de temperaturas en el anillo==&lt;br /&gt;
&lt;br /&gt;
La temperatura del sólido viene dada por la función: &amp;lt;math&amp;gt;T=(8-y^2+2y)e^{-x^2+2x-1}&amp;lt;/math&amp;gt; La representación de las curvas de nivel de la temperatura está representada en la gráfica inferior. El foco de calor viene representado en rojo y se observa que no esta en el origén. De esta forma se observa que la temperatura se propaga con curvas concéntricas isotermas.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Utilizando Matlab obtenemos que el máximo de la temperatura es &amp;lt;math&amp;gt; 8.9945 &amp;lt;/math&amp;gt;, aproximadamente &amp;lt;math&amp;gt;9&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.2.jpg|420x561px|miniaturadeimagen|derecha|Distribución de temperaturas y curvas de nivel del anillo.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado    &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x);&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
T=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);   %Expresión del campo escalar térmico &lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
surf(x,y,T)          &lt;br /&gt;
axis([-3,3,-3,3])  &lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
contour(x,y,T,25);&lt;br /&gt;
axis([-3,3,-3,3])       &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Gradiente de la temperatura==&lt;br /&gt;
&lt;br /&gt;
El gradiente de la temperatura &amp;lt;math&amp;gt;∇T=(T_1,T_2)= \frac{\partial T}{\partial x} \vec i  + \frac{\partial T}{\partial y} \vec j =  (-2x+2).e^{-x^2+2x-1} \vec i +  (-2*y+2).e^{-x^2+2*x-1} \vec j &amp;lt;/math&amp;gt;  es ortogonal a las lineas de nivel. El gradiente indica, en cada punto del sólido, la dirección en la cual la temperatura aumenta más rápido, es decir hacia el foco, y su módulo nos dirá la rápidez con la que aumenta la temperatura en esa dirección. &lt;br /&gt;
[[Archivo:c15.3.jpg|400x400px|miniaturadeimagen|derecha|Gradiente de la temperatura en el anillo]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[r,t]=meshgrid(r,t);&lt;br /&gt;
x=r.*cos(tt);&lt;br /&gt;
y=r.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2); %Relación polares-cartesianas&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
f=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);&lt;br /&gt;
fx=(-2.*x+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en x&lt;br /&gt;
fy=(-2.*y+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en y&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,fx,fy)&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
contour(x,y,f,25)    %Curvas de nivel&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Desplazamiento provocado por &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
A continuación aplicamos el campo de desplazamientos provocado por el vector :&amp;lt;math&amp;gt; \vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho} &amp;lt;/math&amp;gt; en el mallado y lo representamos gráficamente.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.4.jpg|400x400px|miniaturadeimagen|derecha|Desplazamiento en el anillo provocado por el vector u]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
x=rr.*cos(tt);&lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
ux=((1-u).^2).*x./u;  &lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
quiver(x,y,ux,uy)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Sólido antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Representamos la posición final de los puntos del anillo cuando actúa en él el desplazamiento anterior. Observamos que las partículas del sólido se mueven en la dirección de los vectores del campo &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;. El desplazamiento hace que el anillo se agrande llegando a un radio exterior de 3 unidades, siendo anteriormente 2 unidades, manteniendo el radio interior en 1 unidades.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.5.jpg|420x561px|miniaturadeimagen|derecha|expansión de la malla al aplicar &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;    %Paso de muestreo &lt;br /&gt;
r=1:h:2;   %Coordenadas polares             &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado&lt;br /&gt;
x=rr.*cos(tt);       &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x);&lt;br /&gt;
ux=((1-u).^2).*x./u;  %Desplazamientos originados por la vibración&lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
dx=x+ux; %Posición final de los puntos de la placa&lt;br /&gt;
dy=y+uy;&lt;br /&gt;
subplot(1,2,1) %Antes&lt;br /&gt;
mesh(x,y,0.*x)       &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
subplot(1,2,2)  %Despues&lt;br /&gt;
mesh(dx,dy,0.*dx)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Divergencia del campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
Calculamos la divergencia de u en todos los puntos del sólido, utilizando el operador \( \nabla \cdot \vec u \): &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
∇·\vec u=\frac{ 1}{ √g}·\frac{\partial }{\partial x^i}·(√g·u^i) &lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Los puntos de mayor divergencia están en la frontera exterior del anillo. En los puntos de la frontera interior no hay desplazamiento y observamos que aumenta progresivamente conforme se acercan a la frontera exterior.&lt;br /&gt;
No se aprecia cambio de volumen, ya que se trata de una representación de una superficie plana.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)&lt;br /&gt;
axis([-3,3,-3,3])    &lt;br /&gt;
div=1./rr-4+3.*rr;   %Expresión de la divergencia&lt;br /&gt;
surf(x,y,div)          &lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:c15.6.jpg]]&lt;br /&gt;
&lt;br /&gt;
==. Rotacional &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Para aplicar la formula del rotacional necesitamos las covariantes del campo &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g^ρ = u_i . g^i&amp;lt;/math&amp;gt; que al aplicar la matriz de Gram de las coordenadas polares queda &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g_ρ = u^i . g_i&amp;lt;/math&amp;gt;&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
|\nabla\times \vec u⃗ |=\frac{ 1}{ ρ}\left|&lt;br /&gt;
\begin{matrix}&lt;br /&gt;
\ g_ρ &amp;amp; \ g_θ &amp;amp; \ g_z  \\&lt;br /&gt;
&amp;amp; &amp;amp; \\&lt;br /&gt;
\frac{\partial}{\partial ρ} &amp;amp; \frac{\partial}{\partial θ} &amp;amp; \frac{\partial}{\partial z}&lt;br /&gt;
\\ &amp;amp; &amp;amp; \\&lt;br /&gt;
(1-ρ)^2 &amp;amp; 0 &amp;amp; 0 &lt;br /&gt;
\end{matrix}\right|&lt;br /&gt;
=0&lt;br /&gt;
&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Obtención del campo de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Calculamos el tensor gradiente del campo &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; mediante la derivada covariante (forma para obtener el gradiente de un campo vectorial)y a continuación obtenemos su parte simétrica que llamaremos &amp;lt;math&amp;gt;ε&amp;lt;/math&amp;gt;. &lt;br /&gt;
Definimos el tensor de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; como &amp;lt;math&amp;gt;σ = λ∇·u1+2µε&amp;lt;/math&amp;gt; siendo los coeficientes de Lamé &amp;lt;math&amp;gt; λ &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; µ&amp;lt;/math&amp;gt; iguales a &amp;lt;math&amp;gt;1&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
El valor de la matriz del tensor es &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\begin{bmatrix}&lt;br /&gt;
\frac{ 1}{ ρ}-8+7ρ &amp;amp; 0\\&lt;br /&gt;
0 &amp;amp; \frac{ 3}{ ρ}-8+5ρ&lt;br /&gt;
\end{bmatrix}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sabiendo que el tensor se puede expresar como: &amp;lt;math&amp;gt;σ= (\frac{ 1}{ ρ}-8+7ρ).g_ρ\otimes g_ρ + (\frac{ 3}{ ρ}-8+5ρ).g_θ\otimes g_θ &amp;lt;/math&amp;gt; Ambas componentes representan &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;g_θ&amp;lt;/math&amp;gt;, respectivamente.&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
[[Archivo:c15.7.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gρ.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma1= 1./rr-8+7.*rr; %Campo de tensiones en dirección gρ&lt;br /&gt;
surf(x,y,sigma1)              &lt;br /&gt;
axis([-3,3,-3,3])          &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección  &amp;lt;math&amp;gt;g_θ/ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.8.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gθ/ρ.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma2=3./rr-8+5.*rr; %Campo de tensiones en dirección gθ/ρ&lt;br /&gt;
surf(x,y,sigma2)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Conclusión: la tensión es más elevada en la direccion g_ρ que en la g_θ por tanto es mayor en la dirección radial que en las perpendiculares a los radios.&lt;br /&gt;
&lt;br /&gt;
==. Tensiones tangenciales ==&lt;br /&gt;
Las tensiones tangenciales son cero ya que la matriz de tensiones,&amp;lt;math&amp;gt; σ &amp;lt;/math&amp;gt;, es diagonal debido a que el campo de desplazamiento produce una expansión en la dirección estrictamente radial sin producir ninguna torsión alrededor del eje vertical del origen de coordenadas. Los elementos asociados a la dirección tangencial de la tensión, es decir, los que no pertenecen a la diagonal principal, son cero, no existen tensiones en las direcciones de los planos ortogonales a g_θ y g_ρ. &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==. Tensión de Von Mises ==&lt;br /&gt;
La tensión de Von Mises es determinada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2+ (\sigma_2-\sigma_3)^2+ (\sigma_3-\sigma_1)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo &amp;lt;math&amp;gt;\sigma_{1} =\frac{ 1}{ ρ}-8+7ρ, \sigma_2=\frac{ 3}{ ρ}-8+5ρ, \sigma_3=0,&amp;lt;/math&amp;gt;  los autovalores de la matriz de tensiones. Adaptando la fórmula a nuestro caso, anillo circular plano, la desarrollamos como: &lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo los autovalores:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \frac{(-2+2.ρ^2)}{\sqrt{2}.ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Vm14A.png|400x400px|miniaturadeimagen|derecha|Representación de las tensiones de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
fvm=(-2+2.*rr.^2)./(rr.*sqrt(2));&lt;br /&gt;
surf(x,y,fvm)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Masa del anillo ==&lt;br /&gt;
Obtenemos la masa del anillo utilizamos la función de densidad &amp;lt;math&amp;gt; d(x,y,z) = xye^{-1/x^2} &amp;lt;/math&amp;gt; que integramos en todo dominio para hallar una aproximación de esta magnitud.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cosa.png|miniaturadeimagen|400x400px|derecha|Representación de la función de masa en cada punto.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
N1=200; N2=100;                  %Numero de puntos&lt;br /&gt;
a=1; b=2; c=1; d=2;             %Extremos del intervalo&lt;br /&gt;
h1=(b-a)/N1; h2=(d-c)/N2;&lt;br /&gt;
u=a:h1:b; v=c:h2:d;              %Coordenadas iniciales&lt;br /&gt;
[uu,vv]=meshgrid(u,v);           %Coordenadas del rectángulo&lt;br /&gt;
f=vv.*uu.*exp(-1./uu.^2);                %Función&lt;br /&gt;
w1=ones(N1+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N1+1)=1/2;&lt;br /&gt;
w2=ones(N2+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N2+1)=1/2;&lt;br /&gt;
result=h1*h2*w2'*f*w1  &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La masa del anillo en el primer cuadrante es 1.4635. Debido a su simetría impar, si integraramos en todo el dominio la masa total sería 0. Como dos de los cuadrantes son de masa idéntica pero negativa, al multiplicar por 4 la masa del primer cuadrante, obtenemos lo que sería una suma de la masa en valor absoluto de todo el dominio.  &amp;lt;math&amp;gt;  1.4635 \times 4 = 5.854 = Masa  Total &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=18904</id>
		<title>Visualización de Campos en un Anillo Plano (Grupo15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=18904"/>
				<updated>2014-12-03T16:45:49Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==. Introducción ==&lt;br /&gt;
[[Archivo:c15.1.jpg|250px|thumb|derecha|''Mallada anillo plano'']]&lt;br /&gt;
Dada una placa plana con forma de anillo circular centrado en el origen, y comprendido entre los radios 1 y 2 (''Figura 1''), se estudiarán las variaciones de temperatura en este objeto y las deformaciones causadas por el campo:&lt;br /&gt;
   &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En esta placa circular consideramos dos magnitudes físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las variables espaciales &amp;lt;math&amp;gt;ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;θ&amp;lt;/math&amp;gt; y del tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;&lt;br /&gt;
\vec u (ρ,θ,t)&amp;lt;/math&amp;gt;, que dependen de los mismos parámetros que la temperatura.&lt;br /&gt;
De esta forma, si definimos &amp;lt;math&amp;gt; \vec r_0(\rho,\theta)&amp;lt;/math&amp;gt; como 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 para 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;
&lt;br /&gt;
==. Mallado del anillo plano==&lt;br /&gt;
&lt;br /&gt;
Tomamos una superficie circular plana centrada en el origen, comprendido por las circunferencias de radios 1 y 2 unidades. Utilizaremos un mallado que expresaremos en coordenadas polares, sean ρ є [1,2] y θ є [0,2Π). &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;     %Paso de muestreo&lt;br /&gt;
r=1:h:2;   %Coordenadas polares                         &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);   %Mallado      &lt;br /&gt;
x=rr.*cos(tt);   %Parametrización              &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)           &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==. Distribución de temperaturas en el anillo==&lt;br /&gt;
&lt;br /&gt;
La temperatura del sólido viene dada por la función: &amp;lt;math&amp;gt;T=(8-y^2+2y)e^{-x^2+2x-1}&amp;lt;/math&amp;gt; La representación de las curvas de nivel de la temperatura está representada en la gráfica inferior. El foco de calor viene representado en rojo y se observa que no esta en el origén. De esta forma se observa que la temperatura se propaga con curvas concéntricas isotermas.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Utilizando Matlab obtenemos que el máximo de la temperatura es &amp;lt;math&amp;gt; 8.9945 &amp;lt;/math&amp;gt;, aproximadamente &amp;lt;math&amp;gt;9&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.2.jpg|420x561px|miniaturadeimagen|derecha|Distribución de temperaturas y curvas de nivel del anillo.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado    &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x);&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
T=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);   %Expresión del campo escalar térmico &lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
surf(x,y,T)          &lt;br /&gt;
axis([-3,3,-3,3])  &lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
contour(x,y,T,25);&lt;br /&gt;
axis([-3,3,-3,3])       &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Gradiente de la temperatura==&lt;br /&gt;
&lt;br /&gt;
El gradiente de la temperatura &amp;lt;math&amp;gt;∇T=(T_1,T_2)= \frac{\partial T}{\partial x} \vec i  + \frac{\partial T}{\partial y} \vec j =  (-2x+2).e^{-x^2+2x-1} \vec i +  (-2*y+2).e^{-x^2+2*x-1} \vec j &amp;lt;/math&amp;gt;  es ortogonal a las lineas de nivel. El gradiente indica, en cada punto del sólido, la dirección en la cual la temperatura aumenta más rápido, es decir hacia el foco, y su módulo nos dirá la rápidez con la que aumenta la temperatura en esa dirección. &lt;br /&gt;
[[Archivo:c15.3.jpg|400x400px|miniaturadeimagen|derecha|Gradiente de la temperatura en el anillo]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[r,t]=meshgrid(r,t);&lt;br /&gt;
x=r.*cos(tt);&lt;br /&gt;
y=r.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2); %Relación polares-cartesianas&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
f=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);&lt;br /&gt;
fx=(-2.*x+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en x&lt;br /&gt;
fy=(-2.*y+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en y&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,fx,fy)&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
contour(x,y,f,25)    %Curvas de nivel&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Desplazamiento provocado por &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
A continuación aplicamos el campo de desplazamientos provocado por el vector :&amp;lt;math&amp;gt; \vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho} &amp;lt;/math&amp;gt; en el mallado y lo representamos gráficamente.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.4.jpg|400x400px|miniaturadeimagen|derecha|Desplazamiento en el anillo provocado por el vector u]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
x=rr.*cos(tt);&lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
ux=((1-u).^2).*x./u;  &lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
quiver(x,y,ux,uy)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Sólido antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Representamos la posición final de los puntos del anillo cuando actúa en él el desplazamiento anterior. Observamos que las partículas del sólido se mueven en la dirección de los vectores del campo &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;. El desplazamiento hace que el anillo se agrande llegando a un radio exterior de 3 unidades, siendo anteriormente 2 unidades, manteniendo el radio interior en 1 unidades.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.5.jpg|420x561px|miniaturadeimagen|derecha|expansión de la malla al aplicar &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;    %Paso de muestreo &lt;br /&gt;
r=1:h:2;   %Coordenadas polares             &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado&lt;br /&gt;
x=rr.*cos(tt);       &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x);&lt;br /&gt;
ux=((1-u).^2).*x./u;  %Desplazamientos originados por la vibración&lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
dx=x+ux; %Posición final de los puntos de la placa&lt;br /&gt;
dy=y+uy;&lt;br /&gt;
subplot(1,2,1) %Antes&lt;br /&gt;
mesh(x,y,0.*x)       &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
subplot(1,2,2)  %Despues&lt;br /&gt;
mesh(dx,dy,0.*dx)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Divergencia del campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
Calculamos la divergencia de u en todos los puntos del sólido, utilizando el operador \( \nabla \cdot \vec u \): &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
∇·\vec u=\frac{ 1}{ √g}·\frac{\partial }{\partial x^i}·(√g·u^i) &lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Los puntos de mayor divergencia están en la frontera exterior del anillo. En los puntos de la frontera interior no hay desplazamiento y observamos que aumenta progresivamente conforme se acercan a la frontera exterior.&lt;br /&gt;
No se aprecia cambio de volumen, ya que se trata de una representación de una superficie plana.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)&lt;br /&gt;
axis([-3,3,-3,3])    &lt;br /&gt;
div=1./rr-4+3.*rr;   %Expresión de la divergencia&lt;br /&gt;
surf(x,y,div)          &lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:c15.6.jpg]]&lt;br /&gt;
&lt;br /&gt;
==. Rotacional &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Para aplicar la formula del rotacional necesitamos las covariantes del campo &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g^ρ = u_i . g^i&amp;lt;/math&amp;gt; que al aplicar la matriz de Gram de las coordenadas polares queda &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g_ρ = u^i . g_i&amp;lt;/math&amp;gt;&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
|\nabla\times \vec u⃗ |=\frac{ 1}{ ρ}\left|&lt;br /&gt;
\begin{matrix}&lt;br /&gt;
\ g_ρ &amp;amp; \ g_θ &amp;amp; \ g_z  \\&lt;br /&gt;
&amp;amp; &amp;amp; \\&lt;br /&gt;
\frac{\partial}{\partial ρ} &amp;amp; \frac{\partial}{\partial θ} &amp;amp; \frac{\partial}{\partial z}&lt;br /&gt;
\\ &amp;amp; &amp;amp; \\&lt;br /&gt;
(1-ρ)^2 &amp;amp; 0 &amp;amp; 0 &lt;br /&gt;
\end{matrix}\right|&lt;br /&gt;
=0&lt;br /&gt;
&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Obtención del campo de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Calculamos el tensor gradiente del campo &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; mediante la derivada covariante (forma para obtener el gradiente de un campo vectorial)y a continuación obtenemos su parte simétrica que llamaremos &amp;lt;math&amp;gt;ε&amp;lt;/math&amp;gt;. &lt;br /&gt;
Definimos el tensor de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; como &amp;lt;math&amp;gt;σ = λ∇·u1+2µε&amp;lt;/math&amp;gt; siendo los coeficientes de Lamé &amp;lt;math&amp;gt; λ &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; µ&amp;lt;/math&amp;gt; iguales a &amp;lt;math&amp;gt;1&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
El valor de la matriz del tensor es &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\begin{bmatrix}&lt;br /&gt;
\frac{ 1}{ ρ}}-8+7ρ &amp;amp; 0\\&lt;br /&gt;
0 &amp;amp; \frac{ 3}{ ρ}}-8+5ρ&lt;br /&gt;
\end{bmatrix}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sabiendo que el tensor se puede expresar como: &amp;lt;math&amp;gt;σ= (frac{ 1}{ ρ}}-8+7ρ).g_ρ\otimes g_ρ + (\frac{ 3}{ ρ}}-8+5ρ).g_θ\otimes g_θ &amp;lt;/math&amp;gt; Ambas componentes representan &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;g_θ&amp;lt;/math&amp;gt;, respectivamente.&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
[[Archivo:c15.7.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gρ.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma1= 1./rr-8+7.*rr; %Campo de tensiones en dirección gρ&lt;br /&gt;
surf(x,y,sigma1)              &lt;br /&gt;
axis([-3,3,-3,3])          &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección  &amp;lt;math&amp;gt;g_θ/ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.8.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gθ/ρ.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma2=3./rr-8+5.*rr; %Campo de tensiones en dirección gθ/ρ&lt;br /&gt;
surf(x,y,sigma2)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Conclusión: la tensión es más elevada en la direccion g_ρ que en la g_θ por tanto es mayor en la dirección radial que en las perpendiculares a los radios.&lt;br /&gt;
&lt;br /&gt;
==. Tensiones tangenciales ==&lt;br /&gt;
Las tensiones tangenciales son cero porque la matriz del tensor de tensiones,&amp;lt;math&amp;gt; σ &amp;lt;/math&amp;gt;, es diagonal debido a que el campo de desplazamiento produce una expansión en la dirección estrictamente radial sin producir ninguna torsión alrededor del eje vertical del origen de coordenadas. Los elementos asociados a la dirección tangencial de la tensión, es decir, los que no pertenecen a la diagonal principal, son cero, no existen tensiones en las direcciones de los planos ortogonales a g_θ y g_ρ. &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==. Tensión de Von Mises ==&lt;br /&gt;
La tensión de Von Mises es determinada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2+ (\sigma_2-\sigma_3)^2+ (\sigma_3-\sigma_1)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo &amp;lt;math&amp;gt;\sigma_1=\frac{ 1}{ ρ}}-8+7ρ, \sigma_2=\frac{ 3}{ ρ}}-8+5ρ, y \sigma_3=0,&amp;lt;/math&amp;gt;  los autovalores de la matriz de tensiones. Adaptando la fórmula a nuestro caso, anillo circular plano, la desarrollamos como: &lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo los autovalores:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \frac{(-2+2.ρ^2)}{\sqrt{2}.ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Vm14A.png|400x400px|miniaturadeimagen|derecha|Representación de las tensiones de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
fvm=(-2+2.*rr.^2)./(rr.*sqrt(2));&lt;br /&gt;
surf(x,y,fvm)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Masa del anillo ==&lt;br /&gt;
Obtenemos la masa del anillo utilizamos la función de densidad &amp;lt;math&amp;gt; d(x,y,z) = xye^{-1/x^2} &amp;lt;/math&amp;gt; que integramos en todo dominio para hallar una aproximación de esta magnitud.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cosa.png|miniaturadeimagen|400x400px|derecha|Representación de la función de masa en cada punto.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
N1=200; N2=100;                  %Numero de puntos&lt;br /&gt;
a=1; b=2; c=1; d=2;             %Extremos del intervalo&lt;br /&gt;
h1=(b-a)/N1; h2=(d-c)/N2;&lt;br /&gt;
u=a:h1:b; v=c:h2:d;              %Coordenadas iniciales&lt;br /&gt;
[uu,vv]=meshgrid(u,v);           %Coordenadas del rectángulo&lt;br /&gt;
f=vv.*uu.*exp(-1./uu.^2);                %Función&lt;br /&gt;
w1=ones(N1+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N1+1)=1/2;&lt;br /&gt;
w2=ones(N2+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N2+1)=1/2;&lt;br /&gt;
result=h1*h2*w2'*f*w1  &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La masa del anillo en el primer cuadrante es 1.4635. Debido a su simetría impar, si integraramos en todo el dominio la masa total sería 0. Como dos de los cuadrantes son de masa idéntica pero negativa, al multiplicar por 4 la masa del primer cuadrante, obtenemos lo que sería una suma de la masa en valor absoluto de todo el dominio.  &amp;lt;math&amp;gt;  1.4635 \times 4 = 5.854 = Masa  Total &amp;lt;/math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=18888</id>
		<title>Visualización de Campos en un Anillo Plano (Grupo15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=18888"/>
				<updated>2014-12-03T16:37:15Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==. Introducción ==&lt;br /&gt;
[[Archivo:c15.1.jpg|250px|thumb|derecha|''Mallada anillo plano'']]&lt;br /&gt;
Dada una placa plana con forma de anillo circular centrado en el origen, y comprendido entre los radios 1 y 2 (''Figura 1''), se estudiarán las variaciones de temperatura en este objeto y las deformaciones causadas por el campo:&lt;br /&gt;
   &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En esta placa circular consideramos dos magnitudes físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las variables espaciales &amp;lt;math&amp;gt;ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;θ&amp;lt;/math&amp;gt; y del tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;&lt;br /&gt;
\vec u (ρ,θ,t)&amp;lt;/math&amp;gt;, que dependen de los mismos parámetros que la temperatura.&lt;br /&gt;
De esta forma, si definimos &amp;lt;math&amp;gt; \vec r_0(\rho,\theta)&amp;lt;/math&amp;gt; como 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 para 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;
&lt;br /&gt;
==. Mallado del anillo plano==&lt;br /&gt;
&lt;br /&gt;
Tomamos una superficie circular plana centrada en el origen, comprendido por las circunferencias de radios 1 y 2 unidades. Utilizaremos un mallado que expresaremos en coordenadas polares, sean ρ є [1,2] y θ є [0,2Π). &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;     %Paso de muestreo&lt;br /&gt;
r=1:h:2;   %Coordenadas polares                         &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);   %Mallado      &lt;br /&gt;
x=rr.*cos(tt);   %Parametrización              &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)           &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==. Distribución de temperaturas en el anillo==&lt;br /&gt;
&lt;br /&gt;
La temperatura del sólido viene dada por la función: &amp;lt;math&amp;gt;T=(8-y^2+2y)e^{-x^2+2x-1}&amp;lt;/math&amp;gt; La representación de las curvas de nivel de la temperatura está representada en la gráfica inferior. El foco de calor viene representado en rojo y se observa que no esta en el origén. De esta forma se observa que la temperatura se propaga con curvas concéntricas isotermas.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Utilizando Matlab obtenemos que el máximo de la temperatura es &amp;lt;math&amp;gt; 8.9945 &amp;lt;/math&amp;gt;, aproximadamente &amp;lt;math&amp;gt;9&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.2.jpg|420x561px|miniaturadeimagen|derecha|Distribución de temperaturas y curvas de nivel del anillo.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado    &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x);&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
T=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);   %Expresión del campo escalar térmico &lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
surf(x,y,T)          &lt;br /&gt;
axis([-3,3,-3,3])  &lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
contour(x,y,T,25);&lt;br /&gt;
axis([-3,3,-3,3])       &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Gradiente de la temperatura==&lt;br /&gt;
&lt;br /&gt;
El gradiente de la temperatura &amp;lt;math&amp;gt;∇T=(T_1,T_2)= \frac{\partial T}{\partial x} \vec i  + \frac{\partial T}{\partial y} \vec j =  (-2x+2).e^{-x^2+2x-1} \vec i +  (-2*y+2).e^{-x^2+2*x-1} \vec j &amp;lt;/math&amp;gt;  es ortogonal a las lineas de nivel. El gradiente indica, en cada punto del sólido, la dirección en la cual la temperatura aumenta más rápido, es decir hacia el foco, y su módulo nos dirá la rápidez con la que aumenta la temperatura en esa dirección. &lt;br /&gt;
[[Archivo:c15.3.jpg|400x400px|miniaturadeimagen|derecha|Gradiente de la temperatura en el anillo]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[r,t]=meshgrid(r,t);&lt;br /&gt;
x=r.*cos(tt);&lt;br /&gt;
y=r.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2); %Relación polares-cartesianas&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
f=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);&lt;br /&gt;
fx=(-2.*x+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en x&lt;br /&gt;
fy=(-2.*y+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en y&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,fx,fy)&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
contour(x,y,f,25)    %Curvas de nivel&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Desplazamiento provocado por &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
A continuación aplicamos el campo de desplazamientos provocado por el vector :&amp;lt;math&amp;gt; \vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho} &amp;lt;/math&amp;gt; en el mallado y lo representamos gráficamente.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.4.jpg|400x400px|miniaturadeimagen|derecha|Desplazamiento en el anillo provocado por el vector u]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
x=rr.*cos(tt);&lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
ux=((1-u).^2).*x./u;  &lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
quiver(x,y,ux,uy)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Sólido antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Representamos la posición final de los puntos del anillo cuando actúa en él el desplazamiento anterior. Observamos que las partículas del sólido se mueven en la dirección de los vectores del campo &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;. El desplazamiento hace que el anillo se agrande llegando a un radio exterior de 3 unidades, siendo anteriormente 2 unidades, manteniendo el radio interior en 1 unidades.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.5.jpg|420x561px|miniaturadeimagen|derecha|expansión de la malla al aplicar &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;    %Paso de muestreo &lt;br /&gt;
r=1:h:2;   %Coordenadas polares             &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado&lt;br /&gt;
x=rr.*cos(tt);       &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x);&lt;br /&gt;
ux=((1-u).^2).*x./u;  %Desplazamientos originados por la vibración&lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
dx=x+ux; %Posición final de los puntos de la placa&lt;br /&gt;
dy=y+uy;&lt;br /&gt;
subplot(1,2,1) %Antes&lt;br /&gt;
mesh(x,y,0.*x)       &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
subplot(1,2,2)  %Despues&lt;br /&gt;
mesh(dx,dy,0.*dx)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Divergencia del campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
Calculamos la divergencia de u en todos los puntos del sólido, utilizando el operador \( \nabla \cdot \vec u \): &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
∇·\vec u=\frac{ 1}{ √g}·\frac{\partial }{\partial x^i}·(√g·u^i) &lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Los puntos de mayor divergencia están en la frontera exterior del anillo. En los puntos de la frontera interior no hay desplazamiento y observamos que aumenta progresivamente conforme se acercan a la frontera exterior.&lt;br /&gt;
No se aprecia cambio de volumen, ya que se trata de una representación de una superficie plana.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)&lt;br /&gt;
axis([-3,3,-3,3])    &lt;br /&gt;
div=1./rr-4+3.*rr;   %Expresión de la divergencia&lt;br /&gt;
surf(x,y,div)          &lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:c15.6.jpg]]&lt;br /&gt;
&lt;br /&gt;
==. Rotacional &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Para aplicar la formula del rotacional necesitamos las covariantes del campo &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g^ρ = u_i . g^i&amp;lt;/math&amp;gt; que al aplicar la matriz de Gram de las coordenadas polares queda &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g_ρ = u^i . g_i&amp;lt;/math&amp;gt;&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
|\nabla\times \vec u⃗ |=\frac{ 1}{ ρ}\left|&lt;br /&gt;
\begin{matrix}&lt;br /&gt;
\ g_ρ &amp;amp; \ g_θ &amp;amp; \ g_z  \\&lt;br /&gt;
&amp;amp; &amp;amp; \\&lt;br /&gt;
\frac{\partial}{\partial ρ} &amp;amp; \frac{\partial}{\partial θ} &amp;amp; \frac{\partial}{\partial z}&lt;br /&gt;
\\ &amp;amp; &amp;amp; \\&lt;br /&gt;
(1-ρ)^2 &amp;amp; 0 &amp;amp; 0 &lt;br /&gt;
\end{matrix}\right|&lt;br /&gt;
=0&lt;br /&gt;
&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Obtención del campo de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Calculamos el tensor gradiente del campo &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; mediante la derivada covariante (forma para obtener el gradiente de un campo vectorial)y a continuación obtenemos su parte simétrica que llamaremos &amp;lt;math&amp;gt;ε&amp;lt;/math&amp;gt;. &lt;br /&gt;
Definimos el tensor de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; como &amp;lt;math&amp;gt;σ = λ∇·u1+2µε&amp;lt;/math&amp;gt; siendo los coeficientes de Lamé &amp;lt;math&amp;gt; λ &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; µ&amp;lt;/math&amp;gt; iguales a &amp;lt;math&amp;gt;1&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
El valor de la matriz del tensor es &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\begin{bmatrix}&lt;br /&gt;
\frac{ 1}{ ρ}}-8+7ρ &amp;amp; 0\\&lt;br /&gt;
0 &amp;amp; \frac{ 3}{ ρ}}-8+5ρ&lt;br /&gt;
\end{bmatrix}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sabiendo que el tensor se puede expresar como: &amp;lt;math&amp;gt;σ= (frac{ 1}{ ρ}}-8+7ρ).g_ρ\otimes g_ρ + (\frac{ 3}{ ρ}}-8+5ρ).g_θ\otimes g_θ &amp;lt;/math&amp;gt; Ambas componentes representan &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;g_θ&amp;lt;/math&amp;gt;, respectivamente.&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
[[Archivo:c15.7.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gρ.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma1= 1./rr-8+7.*rr; %Campo de tensiones en dirección gρ&lt;br /&gt;
surf(x,y,sigma1)              &lt;br /&gt;
axis([-3,3,-3,3])          &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección  &amp;lt;math&amp;gt;g_θ/ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.8.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gθ/ρ.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma2=3./rr-8+5.*rr; %Campo de tensiones en dirección gθ/ρ&lt;br /&gt;
surf(x,y,sigma2)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Conclusión: la tensión es más elevada en la direccion g_ρ que en la g_θ por tanto es mayor en la dirección radial que en las perpendiculares a los radios.&lt;br /&gt;
&lt;br /&gt;
==. Tensiones tangenciales ==&lt;br /&gt;
Las tensiones tangenciales son cero porque la matriz del tensor de tensiones,&amp;lt;math&amp;gt; σ &amp;lt;/math&amp;gt;, es diagonal debido a que el campo de desplazamiento produce una expansión en la dirección estrictamente radial sin producir ninguna torsión alrededor del eje vertical del origen de coordenadas. Los elementos asociados a la dirección tangencial de la tensión, es decir, los que no pertenecen a la diagonal principal, son cero, no existen tensiones en las direcciones de los planos ortogonales a g_θ y g_ρ. &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==. Tensión de Von Mises ==&lt;br /&gt;
La tensión de Von Mises es determinada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2+ (\sigma_2-\sigma_3)^2+ (\sigma_3-\sigma_1)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo &amp;lt;math&amp;gt;\sigma_1=\frac{ 1}{ ρ}}-8+7ρ, \sigma_2=\frac{ 3}{ ρ}}-8+5ρ, y \sigma_3=0,&amp;lt;/math&amp;gt;  los autovalores de la matriz de tensiones. Adaptando la fórmula a nuestro caso, anillo circular plano, la desarrollamos como: &lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo los autovalores:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \frac{(-2+2.ρ^2)}{\sqrt{2}.ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Vm14A.png|400x400px|miniaturadeimagen|derecha|Representación de las tensiones de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
fvm=(-2+2.*rr.^2)./(rr.*sqrt(2));&lt;br /&gt;
surf(x,y,fvm)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Masa del anillo ==&lt;br /&gt;
Obtenemos la masa del anillo utilizamos la función de densidad &amp;lt;math&amp;gt; d(x,y,z) = xye^(-1/x^2) &amp;lt;/math&amp;gt; que integramos en todo dominio para hallar una aproximación de esta magnitud.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cosa.png|miniaturadeimagen|400x400px|derecha|Representación de la función de masa en cada punto.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
N1=200; N2=100;                  %Numero de puntos&lt;br /&gt;
a=1; b=2; c=1; d=2;             %Extremos del intervalo&lt;br /&gt;
h1=(b-a)/N1; h2=(d-c)/N2;&lt;br /&gt;
u=a:h1:b; v=c:h2:d;              %Coordenadas iniciales&lt;br /&gt;
[uu,vv]=meshgrid(u,v);           %Coordenadas del rectángulo&lt;br /&gt;
f=vv.*uu.*exp(-1./uu.^2);                %Función&lt;br /&gt;
w1=ones(N1+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N1+1)=1/2;&lt;br /&gt;
w2=ones(N2+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N2+1)=1/2;&lt;br /&gt;
result=h1*h2*w2'*f*w1  &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La masa del anillo en el primer cuadrante es 1.4635. Debido a su simetría impar, si integraramos en todo el dominio la masa total sería 0. Como dos de los cuadrantes son de masa idéntica pero negativa, al multiplicar por 4 la masa del primer cuadrante, obtenemos lo que sería una suma de la masa en valor absoluto de todo el dominio.  &amp;lt;math&amp;gt;  1.4635 \times 4 = 5.854 = masa total &amp;lt;\math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=18800</id>
		<title>Visualización de Campos en un Anillo Plano (Grupo15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=18800"/>
				<updated>2014-12-03T16:03:27Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: /* . Obtención del campo de tensiones σ */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==. Introducción ==&lt;br /&gt;
[[Archivo:c15.1.jpg|250px|thumb|derecha|''Mallada anillo plano'']]&lt;br /&gt;
Dada una placa plana con forma de anillo circular centrado en el origen, y comprendido entre los radios 1 y 2 (''Figura 1''), se estudiarán las variaciones de temperatura en este objeto y las deformaciones causadas por el campo:&lt;br /&gt;
   &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En esta placa circular consideramos dos magnitudes físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las variables espaciales &amp;lt;math&amp;gt;ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;θ&amp;lt;/math&amp;gt; y del tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;&lt;br /&gt;
\vec u (ρ,θ,t)&amp;lt;/math&amp;gt;, que dependen de los mismos parámetros que la temperatura.&lt;br /&gt;
De esta forma, si definimos &amp;lt;math&amp;gt; \vec r_0(\rho,\theta)&amp;lt;/math&amp;gt; como 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 para 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;
&lt;br /&gt;
==. Mallado del anillo plano==&lt;br /&gt;
&lt;br /&gt;
Tomamos una superficie circular plana centrada en el origen, comprendido por las circunferencias de radios 1 y 2 unidades. Utilizaremos un mallado que expresaremos en coordenadas polares, sean ρ є [1,2] y θ є [0,2Π). &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;     %Paso de muestreo&lt;br /&gt;
r=1:h:2;   %Coordenadas polares                         &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);   %Mallado      &lt;br /&gt;
x=rr.*cos(tt);   %Parametrización              &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)           &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==. Distribución de temperaturas en el anillo==&lt;br /&gt;
&lt;br /&gt;
La temperatura del sólido viene dada por la función: &amp;lt;math&amp;gt;T=(8-y^2+2y)e^{-x^2+2x-1}&amp;lt;/math&amp;gt; La representación de las curvas de nivel de la temperatura está representada en la gráfica inferior. El foco de calor viene representado en rojo y se observa que no esta en el origén. De esta forma se observa que la temperatura se propaga con curvas concéntricas isotermas.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Utilizando Matlab obtenemos que el máximo de la temperatura es &amp;lt;math&amp;gt; 8.9945 &amp;lt;/math&amp;gt;, aproximadamente &amp;lt;math&amp;gt;9&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.2.jpg|420x561px|miniaturadeimagen|derecha|Distribución de temperaturas y curvas de nivel del anillo.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado    &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x);&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
T=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);   %Expresión del campo escalar térmico &lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
surf(x,y,T)          &lt;br /&gt;
axis([-3,3,-3,3])  &lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
contour(x,y,T,25);&lt;br /&gt;
axis([-3,3,-3,3])       &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Gradiente de la temperatura==&lt;br /&gt;
&lt;br /&gt;
El gradiente de la temperatura &amp;lt;math&amp;gt;∇T=(T_1,T_2)= \frac{\partial T}{\partial x} \vec i  + \frac{\partial T}{\partial y} \vec j =  (-2x+2).e^{-x^2+2x-1} \vec i +  (-2*y+2).e^{-x^2+2*x-1} \vec j &amp;lt;/math&amp;gt;  es ortogonal a las lineas de nivel. El gradiente indica, en cada punto del sólido, la dirección en la cual la temperatura aumenta más rápido, es decir hacia el foco, y su módulo nos dirá la rápidez con la que aumenta la temperatura en esa dirección. &lt;br /&gt;
[[Archivo:c15.3.jpg|400x400px|miniaturadeimagen|derecha|Gradiente de la temperatura en el anillo]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[r,t]=meshgrid(r,t);&lt;br /&gt;
x=r.*cos(tt);&lt;br /&gt;
y=r.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2); %Relación polares-cartesianas&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
f=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);&lt;br /&gt;
fx=(-2.*x+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en x&lt;br /&gt;
fy=(-2.*y+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en y&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,fx,fy)&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
contour(x,y,f,25)    %Curvas de nivel&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Desplazamiento provocado por &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
A continuación aplicamos el campo de desplazamientos provocado por el vector :&amp;lt;math&amp;gt; \vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho} &amp;lt;/math&amp;gt; en el mallado y lo representamos gráficamente.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.4.jpg|400x400px|miniaturadeimagen|derecha|Desplazamiento en el anillo provocado por el vector u]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
x=rr.*cos(tt);&lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
ux=((1-u).^2).*x./u;  &lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
quiver(x,y,ux,uy)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Sólido antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Representamos la posición final de los puntos del anillo cuando actúa en él el desplazamiento anterior. Observamos que las partículas del sólido se mueven en la dirección de los vectores del campo &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;. El desplazamiento hace que el anillo se agrande llegando a un radio exterior de 3 unidades, siendo anteriormente 2 unidades, manteniendo el radio interior en 1 unidades.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.5.jpg|420x561px|miniaturadeimagen|derecha|expansión de la malla al aplicar &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;    %Paso de muestreo &lt;br /&gt;
r=1:h:2;   %Coordenadas polares             &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado&lt;br /&gt;
x=rr.*cos(tt);       &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x);&lt;br /&gt;
ux=((1-u).^2).*x./u;  %Desplazamientos originados por la vibración&lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
dx=x+ux; %Posición final de los puntos de la placa&lt;br /&gt;
dy=y+uy;&lt;br /&gt;
subplot(1,2,1) %Antes&lt;br /&gt;
mesh(x,y,0.*x)       &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
subplot(1,2,2)  %Despues&lt;br /&gt;
mesh(dx,dy,0.*dx)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Divergencia del campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
Calculamos la divergencia de u en todos los puntos del sólido, utilizando el operador \( \nabla \cdot \vec u \): &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
∇·\vec u=\frac{ 1}{ √g}·\frac{\partial }{\partial x^i}·(√g·u^i) &lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Los puntos de mayor divergencia están en la frontera exterior del anillo. En los puntos de la frontera interior no hay desplazamiento y observamos que aumenta progresivamente conforme se acercan a la frontera exterior.&lt;br /&gt;
No se aprecia cambio de volumen, ya que se trata de una representación de una superficie plana.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)&lt;br /&gt;
axis([-3,3,-3,3])    &lt;br /&gt;
div=1./rr-4+3.*rr;   %Expresión de la divergencia&lt;br /&gt;
surf(x,y,div)          &lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:c15.6.jpg]]&lt;br /&gt;
&lt;br /&gt;
==. Rotacional &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Para aplicar la formula del rotacional necesitamos las covariantes del campo &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g^ρ = u_i . g^i&amp;lt;/math&amp;gt; que al aplicar la matriz de Gram de las coordenadas polares queda &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g_ρ = u^i . g_i&amp;lt;/math&amp;gt;&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
|\nabla\times \vec u⃗ |=\frac{ 1}{ ρ}\left|&lt;br /&gt;
\begin{matrix}&lt;br /&gt;
\ g_ρ &amp;amp; \ g_θ &amp;amp; \ g_z  \\&lt;br /&gt;
&amp;amp; &amp;amp; \\&lt;br /&gt;
\frac{\partial}{\partial ρ} &amp;amp; \frac{\partial}{\partial θ} &amp;amp; \frac{\partial}{\partial z}&lt;br /&gt;
\\ &amp;amp; &amp;amp; \\&lt;br /&gt;
(1-ρ)^2 &amp;amp; 0 &amp;amp; 0 &lt;br /&gt;
\end{matrix}\right|&lt;br /&gt;
=0&lt;br /&gt;
&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Obtención del campo de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Calculamos el tensor gradiente del campo &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; mediante la derivada covariante (forma para obtener el gradiente de un campo vectorial)y a continuación obtenemos su parte simétrica que llamaremos &amp;lt;math&amp;gt;ε&amp;lt;/math&amp;gt;. &lt;br /&gt;
Definimos el tensor de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; como &amp;lt;math&amp;gt;σ = λ∇·u1+2µε&amp;lt;/math&amp;gt; siendo los coeficientes de Lamé &amp;lt;math&amp;gt; λ &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; µ&amp;lt;/math&amp;gt; iguales a &amp;lt;math&amp;gt;1&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
El valor de la matriz del tensor es &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\begin{bmatrix}&lt;br /&gt;
\frac{ 1}{ ρ}}-8+7ρ &amp;amp; 0\\&lt;br /&gt;
0 &amp;amp; \frac{ 3}{ ρ}}-8+5ρ&lt;br /&gt;
\end{bmatrix}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sabiendo que el tensor se puede expresar como: &amp;lt;math&amp;gt;σ= (frac{ 1}{ ρ}}-8+7ρ).g_ρ\otimes g_ρ + (\frac{ 3}{ ρ}}-8+5ρ).g_θ\otimes g_θ &amp;lt;/math&amp;gt; Ambas componentes representan &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;g_θ&amp;lt;/math&amp;gt;, respectivamente.&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
[[Archivo:c15.7.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gρ.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma1= 1./rr-8+7.*rr; %Campo de tensiones en dirección gρ&lt;br /&gt;
surf(x,y,sigma1)              &lt;br /&gt;
axis([-3,3,-3,3])          &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección  &amp;lt;math&amp;gt;g_θ/ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.8.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gθ/ρ.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma2=3./rr-8+5.*rr; %Campo de tensiones en dirección gθ/ρ&lt;br /&gt;
surf(x,y,sigma2)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Conclusión: la tensión es más elevada en la direccion g_ρ que en la g_θ por tanto es mayor en la dirección radial que en las perpendiculares a los radios.&lt;br /&gt;
&lt;br /&gt;
==. Tensiones tangenciales ==&lt;br /&gt;
Las tensiones tangenciales son cero porque la matriz del tensor de tensiones,&amp;lt;math&amp;gt; σ &amp;lt;/math&amp;gt;, es diagonal debido a que el campo de desplazamiento produce una expansión en la dirección estrictamente radial sin producir ninguna torsión alrededor del eje vertical del origen de coordenadas. Los elementos asociados a la dirección tangencial de la tensión, es decir, los que no pertenecen a la diagonal principal, son cero, no existen tensiones en las direcciones de los planos ortogonales a g_θ y g_ρ. &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==. Tensión de Von Mises ==&lt;br /&gt;
La tensión de Von Mises viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2+ (\sigma_2-\sigma_3)^2+ (\sigma_3-\sigma_1)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo &amp;lt;math&amp;gt;\sigma_1=\frac{ 1}{ ρ}}-8+7ρ, \sigma_2=\frac{ 3}{ ρ}}-8+5ρ, y \sigma_3=0,&amp;lt;/math&amp;gt;  los autovalores de la matriz de tensiones. Adaptando la fórmula a nuestro caso, anillo circular plano, la escribiremos como: &lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo los autovalores:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \frac{(-2+2.ρ^2)}{\sqrt{2}.ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Vm14A.png|400x400px|miniaturadeimagen|derecha|Representación de las tensiones de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
fvm=(-2+2.*rr.^2)./(rr.*sqrt(2));&lt;br /&gt;
surf(x,y,fvm)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Masa del anillo ==&lt;br /&gt;
Para calcular la masa del anillo utilizamos la función de densidad &amp;lt;math&amp;gt; d(x,y,z) = xye−1/x2 &amp;lt;\math&amp;gt; que integramos a lo largo del dominio para obtener una aproximación de esta magnitud.&lt;br /&gt;
&lt;br /&gt;
Utilizamos el siguiente código de Matlab para aproximar la integral numericamente:&lt;br /&gt;
[[Archivo:Cosa.png|miniaturadeimagen|400x400px|derecha|Representación de la función de masa en cada punto.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
N1=200; N2=100;                  %Numero de puntos&lt;br /&gt;
a=1; b=2; c=1; d=2;             %Extremos del intervalo&lt;br /&gt;
h1=(b-a)/N1; h2=(d-c)/N2;&lt;br /&gt;
u=a:h1:b; v=c:h2:d;              %Coordenadas iniciales&lt;br /&gt;
[uu,vv]=meshgrid(u,v);           %Coordenadas del rectángulo&lt;br /&gt;
f=vv.*uu.*exp(-1./uu.^2);                %Función&lt;br /&gt;
w1=ones(N1+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N1+1)=1/2;&lt;br /&gt;
w2=ones(N2+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N2+1)=1/2;&lt;br /&gt;
result=h1*h2*w2'*f*w1  &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La masa del anillo en el primer cuadrante es 1.4635. Debido a su simetría impar, si integraramos en todo el dominio la masa total sería 0. Como dos de los cuadrantes son de masa idéntica pero negativa, al multiplicar por 4 la masa del primer cuadrante, obtenemos lo que sería una suma de la masa en valor absoluto de todo el dominio.  &amp;lt;math&amp;gt;  1.4635 \times 4 = 5.854 = masa total &amp;lt;\math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=18794</id>
		<title>Visualización de Campos en un Anillo Plano (Grupo15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=18794"/>
				<updated>2014-12-03T16:02:49Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: /* . Obtención del campo de tensiones σ */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==. Introducción ==&lt;br /&gt;
[[Archivo:c15.1.jpg|250px|thumb|derecha|''Mallada anillo plano'']]&lt;br /&gt;
Dada una placa plana con forma de anillo circular centrado en el origen, y comprendido entre los radios 1 y 2 (''Figura 1''), se estudiarán las variaciones de temperatura en este objeto y las deformaciones causadas por el campo:&lt;br /&gt;
   &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En esta placa circular consideramos dos magnitudes físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las variables espaciales &amp;lt;math&amp;gt;ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;θ&amp;lt;/math&amp;gt; y del tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;&lt;br /&gt;
\vec u (ρ,θ,t)&amp;lt;/math&amp;gt;, que dependen de los mismos parámetros que la temperatura.&lt;br /&gt;
De esta forma, si definimos &amp;lt;math&amp;gt; \vec r_0(\rho,\theta)&amp;lt;/math&amp;gt; como 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 para 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;
&lt;br /&gt;
==. Mallado del anillo plano==&lt;br /&gt;
&lt;br /&gt;
Tomamos una superficie circular plana centrada en el origen, comprendido por las circunferencias de radios 1 y 2 unidades. Utilizaremos un mallado que expresaremos en coordenadas polares, sean ρ є [1,2] y θ є [0,2Π). &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;     %Paso de muestreo&lt;br /&gt;
r=1:h:2;   %Coordenadas polares                         &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);   %Mallado      &lt;br /&gt;
x=rr.*cos(tt);   %Parametrización              &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)           &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==. Distribución de temperaturas en el anillo==&lt;br /&gt;
&lt;br /&gt;
La temperatura del sólido viene dada por la función: &amp;lt;math&amp;gt;T=(8-y^2+2y)e^{-x^2+2x-1}&amp;lt;/math&amp;gt; La representación de las curvas de nivel de la temperatura está representada en la gráfica inferior. El foco de calor viene representado en rojo y se observa que no esta en el origén. De esta forma se observa que la temperatura se propaga con curvas concéntricas isotermas.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Utilizando Matlab obtenemos que el máximo de la temperatura es &amp;lt;math&amp;gt; 8.9945 &amp;lt;/math&amp;gt;, aproximadamente &amp;lt;math&amp;gt;9&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.2.jpg|420x561px|miniaturadeimagen|derecha|Distribución de temperaturas y curvas de nivel del anillo.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado    &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x);&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
T=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);   %Expresión del campo escalar térmico &lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
surf(x,y,T)          &lt;br /&gt;
axis([-3,3,-3,3])  &lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
contour(x,y,T,25);&lt;br /&gt;
axis([-3,3,-3,3])       &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Gradiente de la temperatura==&lt;br /&gt;
&lt;br /&gt;
El gradiente de la temperatura &amp;lt;math&amp;gt;∇T=(T_1,T_2)= \frac{\partial T}{\partial x} \vec i  + \frac{\partial T}{\partial y} \vec j =  (-2x+2).e^{-x^2+2x-1} \vec i +  (-2*y+2).e^{-x^2+2*x-1} \vec j &amp;lt;/math&amp;gt;  es ortogonal a las lineas de nivel. El gradiente indica, en cada punto del sólido, la dirección en la cual la temperatura aumenta más rápido, es decir hacia el foco, y su módulo nos dirá la rápidez con la que aumenta la temperatura en esa dirección. &lt;br /&gt;
[[Archivo:c15.3.jpg|400x400px|miniaturadeimagen|derecha|Gradiente de la temperatura en el anillo]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[r,t]=meshgrid(r,t);&lt;br /&gt;
x=r.*cos(tt);&lt;br /&gt;
y=r.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2); %Relación polares-cartesianas&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
f=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);&lt;br /&gt;
fx=(-2.*x+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en x&lt;br /&gt;
fy=(-2.*y+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en y&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,fx,fy)&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
contour(x,y,f,25)    %Curvas de nivel&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Desplazamiento provocado por &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
A continuación aplicamos el campo de desplazamientos provocado por el vector :&amp;lt;math&amp;gt; \vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho} &amp;lt;/math&amp;gt; en el mallado y lo representamos gráficamente.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.4.jpg|400x400px|miniaturadeimagen|derecha|Desplazamiento en el anillo provocado por el vector u]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
x=rr.*cos(tt);&lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
ux=((1-u).^2).*x./u;  &lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
quiver(x,y,ux,uy)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Sólido antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Representamos la posición final de los puntos del anillo cuando actúa en él el desplazamiento anterior. Observamos que las partículas del sólido se mueven en la dirección de los vectores del campo &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;. El desplazamiento hace que el anillo se agrande llegando a un radio exterior de 3 unidades, siendo anteriormente 2 unidades, manteniendo el radio interior en 1 unidades.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.5.jpg|420x561px|miniaturadeimagen|derecha|expansión de la malla al aplicar &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;    %Paso de muestreo &lt;br /&gt;
r=1:h:2;   %Coordenadas polares             &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado&lt;br /&gt;
x=rr.*cos(tt);       &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x);&lt;br /&gt;
ux=((1-u).^2).*x./u;  %Desplazamientos originados por la vibración&lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
dx=x+ux; %Posición final de los puntos de la placa&lt;br /&gt;
dy=y+uy;&lt;br /&gt;
subplot(1,2,1) %Antes&lt;br /&gt;
mesh(x,y,0.*x)       &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
subplot(1,2,2)  %Despues&lt;br /&gt;
mesh(dx,dy,0.*dx)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Divergencia del campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
Calculamos la divergencia de u en todos los puntos del sólido, utilizando el operador \( \nabla \cdot \vec u \): &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
∇·\vec u=\frac{ 1}{ √g}·\frac{\partial }{\partial x^i}·(√g·u^i) &lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Los puntos de mayor divergencia están en la frontera exterior del anillo. En los puntos de la frontera interior no hay desplazamiento y observamos que aumenta progresivamente conforme se acercan a la frontera exterior.&lt;br /&gt;
No se aprecia cambio de volumen, ya que se trata de una representación de una superficie plana.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)&lt;br /&gt;
axis([-3,3,-3,3])    &lt;br /&gt;
div=1./rr-4+3.*rr;   %Expresión de la divergencia&lt;br /&gt;
surf(x,y,div)          &lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:c15.6.jpg]]&lt;br /&gt;
&lt;br /&gt;
==. Rotacional &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Para aplicar la formula del rotacional necesitamos las covariantes del campo &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g^ρ = u_i . g^i&amp;lt;/math&amp;gt; que al aplicar la matriz de Gram de las coordenadas polares queda &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g_ρ = u^i . g_i&amp;lt;/math&amp;gt;&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
|\nabla\times \vec u⃗ |=\frac{ 1}{ ρ}\left|&lt;br /&gt;
\begin{matrix}&lt;br /&gt;
\ g_ρ &amp;amp; \ g_θ &amp;amp; \ g_z  \\&lt;br /&gt;
&amp;amp; &amp;amp; \\&lt;br /&gt;
\frac{\partial}{\partial ρ} &amp;amp; \frac{\partial}{\partial θ} &amp;amp; \frac{\partial}{\partial z}&lt;br /&gt;
\\ &amp;amp; &amp;amp; \\&lt;br /&gt;
(1-ρ)^2 &amp;amp; 0 &amp;amp; 0 &lt;br /&gt;
\end{matrix}\right|&lt;br /&gt;
=0&lt;br /&gt;
&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Obtención del campo de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Calculamos el tensor gradiente del campo &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; mediante la derivada covariante (forma para obtener el gradiente de un campo vectorial)y a continuación obtenemos su parte simétrica que llamaremos &amp;lt;math&amp;gt;ε&amp;lt;/math&amp;gt;. &lt;br /&gt;
Definimos el tensor de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; como &amp;lt;math&amp;gt;σ = λ∇·u1+2µε&amp;lt;/math&amp;gt; siendo los coeficientes de Lamé &amp;lt;math&amp;gt; λ &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; µ&amp;lt;/math&amp;gt; iguales a &amp;lt;math&amp;gt;1&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
El valor de la matriz del tensor es &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\begin{bmatrix}&lt;br /&gt;
\frac{ 1}{ ρ}}-8+7ρ &amp;amp; 0\\&lt;br /&gt;
0 &amp;amp; \frac{ 3}{ ρ}}-8+5ρ&lt;br /&gt;
\end{bmatrix}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sabiendo que el tensor se puede expresar como: &amp;lt;math&amp;gt;σ= (frac{ 1}{ ρ}}-8+7ρ).g_ρ\otimes g_ρ + (\frac{ 3}{ ρ}}-8+5ρ).g_θ\otimes g_θ &amp;lt;/math&amp;gt;. Ambas componentes representan &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;g_θ&amp;lt;/math&amp;gt;, respectivamente.&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
[[Archivo:c15.7.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gρ.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma1= 1./rr-8+7.*rr; %Campo de tensiones en dirección gρ&lt;br /&gt;
surf(x,y,sigma1)              &lt;br /&gt;
axis([-3,3,-3,3])          &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección  &amp;lt;math&amp;gt;g_θ/ρ&amp;lt;/math&amp;gt; ===&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.8.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gθ/ρ.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma2=3./rr-8+5.*rr; %Campo de tensiones en dirección gθ/ρ&lt;br /&gt;
surf(x,y,sigma2)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Conclusión: la tensión es más elevada en la direccion g_ρ que en la g_θ por tanto es mayor en la dirección radial que en las perpendiculares a los radios.&lt;br /&gt;
&lt;br /&gt;
==. Tensiones tangenciales ==&lt;br /&gt;
Las tensiones tangenciales son cero porque la matriz del tensor de tensiones,&amp;lt;math&amp;gt; σ &amp;lt;/math&amp;gt;, es diagonal debido a que el campo de desplazamiento produce una expansión en la dirección estrictamente radial sin producir ninguna torsión alrededor del eje vertical del origen de coordenadas. Los elementos asociados a la dirección tangencial de la tensión, es decir, los que no pertenecen a la diagonal principal, son cero, no existen tensiones en las direcciones de los planos ortogonales a g_θ y g_ρ. &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==. Tensión de Von Mises ==&lt;br /&gt;
La tensión de Von Mises viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2+ (\sigma_2-\sigma_3)^2+ (\sigma_3-\sigma_1)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo &amp;lt;math&amp;gt;\sigma_1=\frac{ 1}{ ρ}}-8+7ρ, \sigma_2=\frac{ 3}{ ρ}}-8+5ρ, y \sigma_3=0,&amp;lt;/math&amp;gt;  los autovalores de la matriz de tensiones. Adaptando la fórmula a nuestro caso, anillo circular plano, la escribiremos como: &lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo los autovalores:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \frac{(-2+2.ρ^2)}{\sqrt{2}.ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Vm14A.png|400x400px|miniaturadeimagen|derecha|Representación de las tensiones de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
fvm=(-2+2.*rr.^2)./(rr.*sqrt(2));&lt;br /&gt;
surf(x,y,fvm)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Masa del anillo ==&lt;br /&gt;
Para calcular la masa del anillo utilizamos la función de densidad &amp;lt;math&amp;gt; d(x,y,z) = xye−1/x2 &amp;lt;\math&amp;gt; que integramos a lo largo del dominio para obtener una aproximación de esta magnitud.&lt;br /&gt;
&lt;br /&gt;
Utilizamos el siguiente código de Matlab para aproximar la integral numericamente:&lt;br /&gt;
[[Archivo:Cosa.png|miniaturadeimagen|400x400px|derecha|Representación de la función de masa en cada punto.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
N1=200; N2=100;                  %Numero de puntos&lt;br /&gt;
a=1; b=2; c=1; d=2;             %Extremos del intervalo&lt;br /&gt;
h1=(b-a)/N1; h2=(d-c)/N2;&lt;br /&gt;
u=a:h1:b; v=c:h2:d;              %Coordenadas iniciales&lt;br /&gt;
[uu,vv]=meshgrid(u,v);           %Coordenadas del rectángulo&lt;br /&gt;
f=vv.*uu.*exp(-1./uu.^2);                %Función&lt;br /&gt;
w1=ones(N1+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N1+1)=1/2;&lt;br /&gt;
w2=ones(N2+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N2+1)=1/2;&lt;br /&gt;
result=h1*h2*w2'*f*w1  &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La masa del anillo en el primer cuadrante es 1.4635. Debido a su simetría impar, si integraramos en todo el dominio la masa total sería 0. Como dos de los cuadrantes son de masa idéntica pero negativa, al multiplicar por 4 la masa del primer cuadrante, obtenemos lo que sería una suma de la masa en valor absoluto de todo el dominio.  &amp;lt;math&amp;gt;  1.4635 \times 4 = 5.854 = masa total &amp;lt;\math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=18787</id>
		<title>Visualización de Campos en un Anillo Plano (Grupo15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=18787"/>
				<updated>2014-12-03T16:01:12Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==. Introducción ==&lt;br /&gt;
[[Archivo:c15.1.jpg|250px|thumb|derecha|''Mallada anillo plano'']]&lt;br /&gt;
Dada una placa plana con forma de anillo circular centrado en el origen, y comprendido entre los radios 1 y 2 (''Figura 1''), se estudiarán las variaciones de temperatura en este objeto y las deformaciones causadas por el campo:&lt;br /&gt;
   &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En esta placa circular consideramos dos magnitudes físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las variables espaciales &amp;lt;math&amp;gt;ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;θ&amp;lt;/math&amp;gt; y del tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;&lt;br /&gt;
\vec u (ρ,θ,t)&amp;lt;/math&amp;gt;, que dependen de los mismos parámetros que la temperatura.&lt;br /&gt;
De esta forma, si definimos &amp;lt;math&amp;gt; \vec r_0(\rho,\theta)&amp;lt;/math&amp;gt; como 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 para 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;
&lt;br /&gt;
==. Mallado del anillo plano==&lt;br /&gt;
&lt;br /&gt;
Tomamos una superficie circular plana centrada en el origen, comprendido por las circunferencias de radios 1 y 2 unidades. Utilizaremos un mallado que expresaremos en coordenadas polares, sean ρ є [1,2] y θ є [0,2Π). &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;     %Paso de muestreo&lt;br /&gt;
r=1:h:2;   %Coordenadas polares                         &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);   %Mallado      &lt;br /&gt;
x=rr.*cos(tt);   %Parametrización              &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)           &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==. Distribución de temperaturas en el anillo==&lt;br /&gt;
&lt;br /&gt;
La temperatura del sólido viene dada por la función: &amp;lt;math&amp;gt;T=(8-y^2+2y)e^{-x^2+2x-1}&amp;lt;/math&amp;gt; La representación de las curvas de nivel de la temperatura está representada en la gráfica inferior. El foco de calor viene representado en rojo y se observa que no esta en el origén. De esta forma se observa que la temperatura se propaga con curvas concéntricas isotermas.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Utilizando Matlab obtenemos que el máximo de la temperatura es &amp;lt;math&amp;gt; 8.9945 &amp;lt;/math&amp;gt;, aproximadamente &amp;lt;math&amp;gt;9&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.2.jpg|420x561px|miniaturadeimagen|derecha|Distribución de temperaturas y curvas de nivel del anillo.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado    &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x);&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
T=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);   %Expresión del campo escalar térmico &lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
surf(x,y,T)          &lt;br /&gt;
axis([-3,3,-3,3])  &lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
contour(x,y,T,25);&lt;br /&gt;
axis([-3,3,-3,3])       &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Gradiente de la temperatura==&lt;br /&gt;
&lt;br /&gt;
El gradiente de la temperatura &amp;lt;math&amp;gt;∇T=(T_1,T_2)= \frac{\partial T}{\partial x} \vec i  + \frac{\partial T}{\partial y} \vec j =  (-2x+2).e^{-x^2+2x-1} \vec i +  (-2*y+2).e^{-x^2+2*x-1} \vec j &amp;lt;/math&amp;gt;  es ortogonal a las lineas de nivel. El gradiente indica, en cada punto del sólido, la dirección en la cual la temperatura aumenta más rápido, es decir hacia el foco, y su módulo nos dirá la rápidez con la que aumenta la temperatura en esa dirección. &lt;br /&gt;
[[Archivo:c15.3.jpg|400x400px|miniaturadeimagen|derecha|Gradiente de la temperatura en el anillo]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[r,t]=meshgrid(r,t);&lt;br /&gt;
x=r.*cos(tt);&lt;br /&gt;
y=r.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2); %Relación polares-cartesianas&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
f=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);&lt;br /&gt;
fx=(-2.*x+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en x&lt;br /&gt;
fy=(-2.*y+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en y&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,fx,fy)&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
contour(x,y,f,25)    %Curvas de nivel&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Desplazamiento provocado por &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
A continuación aplicamos el campo de desplazamientos provocado por el vector :&amp;lt;math&amp;gt; \vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho} &amp;lt;/math&amp;gt; en el mallado y lo representamos gráficamente.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.4.jpg|400x400px|miniaturadeimagen|derecha|Desplazamiento en el anillo provocado por el vector u]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
x=rr.*cos(tt);&lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
ux=((1-u).^2).*x./u;  &lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
quiver(x,y,ux,uy)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Sólido antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Representamos la posición final de los puntos del anillo cuando actúa en él el desplazamiento anterior. Observamos que las partículas del sólido se mueven en la dirección de los vectores del campo &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;. El desplazamiento hace que el anillo se agrande llegando a un radio exterior de 3 unidades, siendo anteriormente 2 unidades, manteniendo el radio interior en 1 unidades.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.5.jpg|420x561px|miniaturadeimagen|derecha|expansión de la malla al aplicar &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;    %Paso de muestreo &lt;br /&gt;
r=1:h:2;   %Coordenadas polares             &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado&lt;br /&gt;
x=rr.*cos(tt);       &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x);&lt;br /&gt;
ux=((1-u).^2).*x./u;  %Desplazamientos originados por la vibración&lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
dx=x+ux; %Posición final de los puntos de la placa&lt;br /&gt;
dy=y+uy;&lt;br /&gt;
subplot(1,2,1) %Antes&lt;br /&gt;
mesh(x,y,0.*x)       &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
subplot(1,2,2)  %Despues&lt;br /&gt;
mesh(dx,dy,0.*dx)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Divergencia del campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
Calculamos la divergencia de u en todos los puntos del sólido, utilizando el operador \( \nabla \cdot \vec u \): &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
∇·\vec u=\frac{ 1}{ √g}·\frac{\partial }{\partial x^i}·(√g·u^i) &lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Los puntos de mayor divergencia están en la frontera exterior del anillo. En los puntos de la frontera interior no hay desplazamiento y observamos que aumenta progresivamente conforme se acercan a la frontera exterior.&lt;br /&gt;
No se aprecia cambio de volumen, ya que se trata de una representación de una superficie plana.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)&lt;br /&gt;
axis([-3,3,-3,3])    &lt;br /&gt;
div=1./rr-4+3.*rr;   %Expresión de la divergencia&lt;br /&gt;
surf(x,y,div)          &lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:c15.6.jpg]]&lt;br /&gt;
&lt;br /&gt;
==. Rotacional &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Para aplicar la formula del rotacional necesitamos las covariantes del campo &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g^ρ = u_i . g^i&amp;lt;/math&amp;gt; que al aplicar la matriz de Gram de las coordenadas polares queda &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g_ρ = u^i . g_i&amp;lt;/math&amp;gt;&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
|\nabla\times \vec u⃗ |=\frac{ 1}{ ρ}\left|&lt;br /&gt;
\begin{matrix}&lt;br /&gt;
\ g_ρ &amp;amp; \ g_θ &amp;amp; \ g_z  \\&lt;br /&gt;
&amp;amp; &amp;amp; \\&lt;br /&gt;
\frac{\partial}{\partial ρ} &amp;amp; \frac{\partial}{\partial θ} &amp;amp; \frac{\partial}{\partial z}&lt;br /&gt;
\\ &amp;amp; &amp;amp; \\&lt;br /&gt;
(1-ρ)^2 &amp;amp; 0 &amp;amp; 0 &lt;br /&gt;
\end{matrix}\right|&lt;br /&gt;
=0&lt;br /&gt;
&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Obtención del campo de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Calculamos el tensor gradiente del campo &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; mediante la derivada covariante (forma para obtener el gradiente de un campo vectorial)y a continuación obtenemos su parte simétrica que llamaremos &amp;lt;math&amp;gt;ε&amp;lt;/math&amp;gt;. &lt;br /&gt;
Definimos el tensor de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; como &amp;lt;math&amp;gt;σ = λ∇·u1+2µε&amp;lt;/math&amp;gt; siendo los coeficientes de Lamé &amp;lt;math&amp;gt; λ &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; µ&amp;lt;/math&amp;gt; iguales a &amp;lt;math&amp;gt;1&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
El valor de la matriz del tensor es &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\begin{bmatrix}&lt;br /&gt;
\frac{ 1}{ ρ}}-8+7ρ &amp;amp; 0\\&lt;br /&gt;
0 &amp;amp; \frac{ 3}{ ρ}}-8+5ρ&lt;br /&gt;
\end{bmatrix}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sabiendo que el tensor se puede expresar como: &amp;lt;math&amp;gt;σ= (frac{ 1}{ ρ}}-8+7ρ).g_ρ\otimes g_ρ + (\frac{ 3}{ ρ}}-8+5ρ).g_θ\otimes g_θ &amp;lt;/math&amp;gt;. Ambas componentes representan &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;g_θ&amp;lt;/math&amp;gt;, respectivamente.&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección g_ρ ===&lt;br /&gt;
[[Archivo:c15.7.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gρ.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma1= 1./rr-8+7.*rr; %Campo de tensiones en dirección gρ&lt;br /&gt;
surf(x,y,sigma1)              &lt;br /&gt;
axis([-3,3,-3,3])          &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección g_θ/ρ ===&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.8.jpg|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gθ/ρ.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma2=3./rr-8+5.*rr; %Campo de tensiones en dirección gθ/ρ&lt;br /&gt;
surf(x,y,sigma2)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Conclusión: la tensión es más elevada en la direccion g_ρ que en la g_θ por tanto es mayor en la dirección radial que en las perpendiculares a los radios.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Tensiones tangenciales ==&lt;br /&gt;
Las tensiones tangenciales son cero porque la matriz del tensor de tensiones,&amp;lt;math&amp;gt; σ &amp;lt;/math&amp;gt;, es diagonal debido a que el campo de desplazamiento produce una expansión en la dirección estrictamente radial sin producir ninguna torsión alrededor del eje vertical del origen de coordenadas. Los elementos asociados a la dirección tangencial de la tensión, es decir, los que no pertenecen a la diagonal principal, son cero, no existen tensiones en las direcciones de los planos ortogonales a g_θ y g_ρ. &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==. Tensión de Von Mises ==&lt;br /&gt;
La tensión de Von Mises viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2+ (\sigma_2-\sigma_3)^2+ (\sigma_3-\sigma_1)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo &amp;lt;math&amp;gt;\sigma_1=\frac{ 1}{ ρ}}-8+7ρ, \sigma_2=\frac{ 3}{ ρ}}-8+5ρ, y \sigma_3=0,&amp;lt;/math&amp;gt;  los autovalores de la matriz de tensiones. Adaptando la fórmula a nuestro caso, anillo circular plano, la escribiremos como: &lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo los autovalores:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \frac{(-2+2.ρ^2)}{\sqrt{2}.ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Vm14A.png|400x400px|miniaturadeimagen|derecha|Representación de las tensiones de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
fvm=(-2+2.*rr.^2)./(rr.*sqrt(2));&lt;br /&gt;
surf(x,y,fvm)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Masa del anillo ==&lt;br /&gt;
Para calcular la masa del anillo utilizamos la función de densidad &amp;lt;math&amp;gt; d(x,y,z) = xye−1/x2 &amp;lt;\math&amp;gt; que integramos a lo largo del dominio para obtener una aproximación de esta magnitud.&lt;br /&gt;
&lt;br /&gt;
Utilizamos el siguiente código de Matlab para aproximar la integral numericamente:&lt;br /&gt;
[[Archivo:Cosa.png|miniaturadeimagen|400x400px|derecha|Representación de la función de masa en cada punto.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
N1=200; N2=100;                  %Numero de puntos&lt;br /&gt;
a=1; b=2; c=1; d=2;             %Extremos del intervalo&lt;br /&gt;
h1=(b-a)/N1; h2=(d-c)/N2;&lt;br /&gt;
u=a:h1:b; v=c:h2:d;              %Coordenadas iniciales&lt;br /&gt;
[uu,vv]=meshgrid(u,v);           %Coordenadas del rectángulo&lt;br /&gt;
f=vv.*uu.*exp(-1./uu.^2);                %Función&lt;br /&gt;
w1=ones(N1+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N1+1)=1/2;&lt;br /&gt;
w2=ones(N2+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N2+1)=1/2;&lt;br /&gt;
result=h1*h2*w2'*f*w1  &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La masa del anillo en el primer cuadrante es 1.4635. Debido a su simetría impar, si integraramos en todo el dominio la masa total sería 0. Como dos de los cuadrantes son de masa idéntica pero negativa, al multiplicar por 4 la masa del primer cuadrante, obtenemos lo que sería una suma de la masa en valor absoluto de todo el dominio.  &amp;lt;math&amp;gt;  1.4635 \times 4 = 5.854 = masa total &amp;lt;\math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.8.jpg&amp;diff=18785</id>
		<title>Archivo:C15.8.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.8.jpg&amp;diff=18785"/>
				<updated>2014-12-03T16:00:47Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.7.jpg&amp;diff=18782</id>
		<title>Archivo:C15.7.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.7.jpg&amp;diff=18782"/>
				<updated>2014-12-03T15:58:31Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=18738</id>
		<title>Visualización de Campos en un Anillo Plano (Grupo15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=18738"/>
				<updated>2014-12-03T15:47:00Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
==. Introducción ==&lt;br /&gt;
[[Archivo:c15.1.jpg|250px|thumb|derecha|''Mallada anillo plano'']]&lt;br /&gt;
Dada una placa plana con forma de anillo circular centrado en el origen, y comprendido entre los radios 1 y 2 (''Figura 1''), se estudiarán las variaciones de temperatura en este objeto y las deformaciones causadas por el campo:&lt;br /&gt;
   &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En esta placa circular consideramos dos magnitudes físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las variables espaciales &amp;lt;math&amp;gt;ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;θ&amp;lt;/math&amp;gt; y del tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;&lt;br /&gt;
\vec u (ρ,θ,t)&amp;lt;/math&amp;gt;, que dependen de los mismos parámetros que la temperatura.&lt;br /&gt;
De esta forma, si definimos &amp;lt;math&amp;gt; \vec r_0(\rho,\theta)&amp;lt;/math&amp;gt; como 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 para 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;
&lt;br /&gt;
==. Mallado del anillo plano==&lt;br /&gt;
&lt;br /&gt;
Tomamos una superficie circular plana centrada en el origen, comprendido por las circunferencias de radios 1 y 2 unidades. Utilizaremos un mallado que expresaremos en coordenadas polares, sean ρ є [1,2] y θ є [0,2Π). &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
h=0.1;     %Paso de muestreo&lt;br /&gt;
r=1:h:2;   %Coordenadas polares                         &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);   %Mallado      &lt;br /&gt;
x=rr.*cos(tt);   %Parametrización              &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)           &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==. Distribución de temperaturas en el anillo==&lt;br /&gt;
&lt;br /&gt;
La temperatura del sólido viene dada por la función: &amp;lt;math&amp;gt;T=(8-y^2+2y)e^{-x^2+2x-1}&amp;lt;/math&amp;gt; La representación de las curvas de nivel de la temperatura está representada en la gráfica inferior. El foco de calor viene representado en rojo y se observa que no esta en el origén. De esta forma se observa que la temperatura se propaga con curvas concéntricas isotermas.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Utilizando Matlab obtenemos que el máximo de la temperatura es &amp;lt;math&amp;gt; 8.9945 &amp;lt;/math&amp;gt;, aproximadamente &amp;lt;math&amp;gt;9&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.2.jpg|420x561px|miniaturadeimagen|derecha|Distribución de temperaturas y curvas de nivel del anillo.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado    &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x);&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
T=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);   %Expresión del campo escalar térmico &lt;br /&gt;
subplot(2,1,1)&lt;br /&gt;
surf(x,y,T)          &lt;br /&gt;
axis([-3,3,-3,3])  &lt;br /&gt;
subplot(2,1,2)&lt;br /&gt;
contour(x,y,T,25);&lt;br /&gt;
axis([-3,3,-3,3])       &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Gradiente de la temperatura==&lt;br /&gt;
&lt;br /&gt;
El gradiente de la temperatura &amp;lt;math&amp;gt;∇T=(T_1,T_2)= \frac{\partial T}{\partial x} \vec i  + \frac{\partial T}{\partial y} \vec j =  (-2x+2).e^{-x^2+2x-1} \vec i +  (-2*y+2).e^{-x^2+2*x-1} \vec j &amp;lt;/math&amp;gt;  es ortogonal a las lineas de nivel. El gradiente indica, en cada punto del sólido, la dirección en la cual la temperatura aumenta más rápido, es decir hacia el foco, y su módulo nos dirá la rápidez con la que aumenta la temperatura en esa dirección. &lt;br /&gt;
[[Archivo:c15.3.jpg|400x400px|miniaturadeimagen|derecha|Gradiente de la temperatura en el anillo]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[r,t]=meshgrid(r,t);&lt;br /&gt;
x=r.*cos(tt);&lt;br /&gt;
y=r.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2); %Relación polares-cartesianas&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
f=(8-y.^2+2.*y).*exp(-x.^2+2.*x-1);&lt;br /&gt;
fx=(-2.*x+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en x&lt;br /&gt;
fy=(-2.*y+2).*exp(-x.^2+2.*x-1);     %Derivada parcial en y&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,fx,fy)&lt;br /&gt;
axis([-3,3,-3,3]) &lt;br /&gt;
contour(x,y,f,25)    %Curvas de nivel&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
hold off&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Desplazamiento provocado por &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
A continuación aplicamos el campo de desplazamientos provocado por el vector :&amp;lt;math&amp;gt; \vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho} &amp;lt;/math&amp;gt; en el mallado y lo representamos gráficamente.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.4.jpg|400x400px|miniaturadeimagen|derecha|Desplazamiento en el anillo provocado por el vector u]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:2*pi+h;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
x=rr.*cos(tt);&lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x); &lt;br /&gt;
ux=((1-u).^2).*x./u;  &lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
quiver(x,y,ux,uy)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Sólido antes y después del desplazamiento==&lt;br /&gt;
&lt;br /&gt;
Representamos la posición final de los puntos del anillo cuando actúa en él el desplazamiento anterior. Observamos que las partículas del sólido se mueven en la dirección de los vectores del campo &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;. El desplazamiento hace que el anillo se agrande llegando a un radio exterior de 3 unidades, siendo anteriormente 2 unidades, manteniendo el radio interior en 1 unidades.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:c15.5.jpg|420x561px|miniaturadeimagen|derecha|expansión de la malla al aplicar &amp;lt;math&amp;gt; \vec u &amp;lt;/math&amp;gt;]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;    %Paso de muestreo &lt;br /&gt;
r=1:h:2;   %Coordenadas polares             &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t); %Mallado&lt;br /&gt;
x=rr.*cos(tt);       &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
u=sqrt(x.^2+y.^2);&lt;br /&gt;
v=atan(y./x);&lt;br /&gt;
ux=((1-u).^2).*x./u;  %Desplazamientos originados por la vibración&lt;br /&gt;
uy=((1-u).^2).*y./u; &lt;br /&gt;
dx=x+ux; %Posición final de los puntos de la placa&lt;br /&gt;
dy=y+uy;&lt;br /&gt;
subplot(1,2,1) %Antes&lt;br /&gt;
mesh(x,y,0.*x)       &lt;br /&gt;
axis([-3,3,-3,3])      &lt;br /&gt;
subplot(1,2,2)  %Despues&lt;br /&gt;
mesh(dx,dy,0.*dx)&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Divergencia del campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
Calculamos la divergencia de u en todos los puntos del sólido, utilizando el operador \( \nabla \cdot \vec u \): &lt;br /&gt;
&amp;lt;math&amp;gt;&lt;br /&gt;
∇·\vec u=\frac{ 1}{ √g}·\frac{\partial }{\partial x^i}·(√g·u^i) &lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
Los puntos de mayor divergencia están en la frontera exterior del anillo. En los puntos de la frontera interior no hay desplazamiento y observamos que aumenta progresivamente conforme se acercan a la frontera exterior.&lt;br /&gt;
No se aprecia cambio de volumen, ya que se trata de una representación de una superficie plana.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                               &lt;br /&gt;
r=1:h:2;                            &lt;br /&gt;
t=0:h:2*pi+h;          &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);                 &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
mesh(x,y,0*x)&lt;br /&gt;
axis([-3,3,-3,3])    &lt;br /&gt;
div=1./rr-4+3.*rr;   %Expresión de la divergencia&lt;br /&gt;
surf(x,y,div)          &lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
}}&lt;br /&gt;
[[Archivo:c15.6.jpg]]&lt;br /&gt;
&lt;br /&gt;
==. Rotacional &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Para aplicar la formula del rotacional necesitamos las covariantes del campo &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g^ρ = u_i . g^i&amp;lt;/math&amp;gt; que al aplicar la matriz de Gram de las coordenadas polares queda &amp;lt;math&amp;gt; \vec u⃗  = (1-ρ)^2 . g_ρ = u^i . g_i&amp;lt;/math&amp;gt;&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
|\nabla\times \vec u⃗ |=\frac{ 1}{ ρ}\left|&lt;br /&gt;
\begin{matrix}&lt;br /&gt;
\ g_ρ &amp;amp; \ g_θ &amp;amp; \ g_z  \\&lt;br /&gt;
&amp;amp; &amp;amp; \\&lt;br /&gt;
\frac{\partial}{\partial ρ} &amp;amp; \frac{\partial}{\partial θ} &amp;amp; \frac{\partial}{\partial z}&lt;br /&gt;
\\ &amp;amp; &amp;amp; \\&lt;br /&gt;
(1-ρ)^2 &amp;amp; 0 &amp;amp; 0 &lt;br /&gt;
\end{matrix}\right|&lt;br /&gt;
=0&lt;br /&gt;
&amp;lt;/math&amp;gt; &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Obtención del campo de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; ==&lt;br /&gt;
&lt;br /&gt;
Calculamos el tensor gradiente del campo &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt; mediante la derivada covariante (forma para obtener el gradiente de un campo vectorial)y a continuación obtenemos su parte simétrica que llamaremos &amp;lt;math&amp;gt;ε&amp;lt;/math&amp;gt;. &lt;br /&gt;
Definimos el tensor de tensiones &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; como &amp;lt;math&amp;gt;σ = λ∇·u1+2µε&amp;lt;/math&amp;gt; siendo los coeficientes de Lamé &amp;lt;math&amp;gt; λ &amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt; µ&amp;lt;/math&amp;gt; iguales a &amp;lt;math&amp;gt;1&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
El valor de la matriz del tensor es :&amp;lt;math&amp;gt;\begin{bmatrix}&lt;br /&gt;
\frac{ 1}{ ρ}}-8+7ρ &amp;amp; 0\\&lt;br /&gt;
0 &amp;amp; \frac{ 3}{ ρ}}-8+5ρ\\&lt;br /&gt;
\end{bmatrix}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sabiendo que el tensor se puede expresar como: &amp;lt;math&amp;gt;σ= (frac{ 1}{ ρ}}-8+7ρ).g_ρ\otimes g_ρ + (\frac{ 3}{ ρ}}-8+5ρ).g_θ\otimes g_θ &amp;lt;/math&amp;gt;. Ambas componentes representan &amp;lt;math&amp;gt;σ&amp;lt;/math&amp;gt; en dirección &amp;lt;math&amp;gt;g_ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;g_θ&amp;lt;/math&amp;gt;, respectivamente.&lt;br /&gt;
===. Tensiones normales en dirección g_ρ ===&lt;br /&gt;
[[Archivo:Normales1.png|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gρ.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma1= 1./rr-8+7.*rr; %Campo de tensiones en dirección gρ&lt;br /&gt;
surf(x,y,sigma1)              &lt;br /&gt;
axis([-3,3,-3,3])          &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===. Tensiones normales en dirección g_θ/ρ ===&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Normales2.png|300x300px|miniaturadeimagen|derecha|Representación de las tensiones normales en dirección gθ/ρ.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     %Relación polares-cartesianas  &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
sigma2=3./rr-8+5.*rr; %Campo de tensiones en dirección gθ/ρ&lt;br /&gt;
surf(x,y,sigma2)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Conclusión: la tensión es más elevada en la direccion g_ρ que en la g_θ por tanto es mayor en la dirección radial que en las perpendiculares a los radios.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Tensiones tangenciales ==&lt;br /&gt;
Las tensiones tangenciales son cero porque la matriz del tensor de tensiones,&amp;lt;math&amp;gt; σ &amp;lt;/math&amp;gt;, es diagonal debido a que el campo de desplazamiento produce una expansión en la dirección estrictamente radial sin producir ninguna torsión alrededor del eje vertical del origen de coordenadas. Los elementos asociados a la dirección tangencial de la tensión, es decir, los que no pertenecen a la diagonal principal, son cero, no existen tensiones en las direcciones de los planos ortogonales a g_θ y g_ρ. &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma \cdot \vec g_\rho-(\vec g_\rho \cdot \sigma \cdot \vec g_\rho) \vec g_\rho = 0 &amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==. Tensión de Von Mises ==&lt;br /&gt;
La tensión de Von Mises viene dada por:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2+ (\sigma_2-\sigma_3)^2+ (\sigma_3-\sigma_1)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Siendo &amp;lt;math&amp;gt;\sigma_1=\frac{ 1}{ ρ}}-8+7ρ, \sigma_2=\frac{ 3}{ ρ}}-8+5ρ, y \sigma_3=0,&amp;lt;/math&amp;gt;  los autovalores de la matriz de tensiones. Adaptando la fórmula a nuestro caso, anillo circular plano, la escribiremos como: &lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \sqrt{\frac{(\sigma_1-\sigma_2)^2}{2}}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Sustituyendo los autovalores:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\sigma_{VM} = \frac{(-2+2.ρ^2)}{\sqrt{2}.ρ}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Vm14A.png|400x400px|miniaturadeimagen|derecha|Representación de las tensiones de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                         &lt;br /&gt;
r=1:h:2;               &lt;br /&gt;
t=0:h:2*pi+h;            &lt;br /&gt;
[rr,tt]=meshgrid(r,t);     &lt;br /&gt;
figure(1)&lt;br /&gt;
x=rr.*cos(tt);     &lt;br /&gt;
y=rr.*sin(tt);&lt;br /&gt;
fvm=(-2+2.*rr.^2)./(rr.*sqrt(2));&lt;br /&gt;
surf(x,y,fvm)              &lt;br /&gt;
axis([-3,3,-3,3])         &lt;br /&gt;
axis equal&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
==. Masa del anillo ==&lt;br /&gt;
Para calcular la masa del anillo utilizamos la función de densidad &amp;lt;math&amp;gt; d(x,y,z) = xye−1/x2 &amp;lt;\math&amp;gt; que integramos a lo largo del dominio para obtener una aproximación de esta magnitud.&lt;br /&gt;
&lt;br /&gt;
Utilizamos el siguiente código de Matlab para aproximar la integral numericamente:&lt;br /&gt;
[[Archivo:Cosa.png|miniaturadeimagen|400x400px|derecha|Representación de la función de masa en cada punto.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
N1=200; N2=100;                  %Numero de puntos&lt;br /&gt;
a=1; b=2; c=1; d=2;             %Extremos del intervalo&lt;br /&gt;
h1=(b-a)/N1; h2=(d-c)/N2;&lt;br /&gt;
u=a:h1:b; v=c:h2:d;              %Coordenadas iniciales&lt;br /&gt;
[uu,vv]=meshgrid(u,v);           %Coordenadas del rectángulo&lt;br /&gt;
f=vv.*uu.*exp(-1./uu.^2);                %Función&lt;br /&gt;
w1=ones(N1+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N1+1)=1/2;&lt;br /&gt;
w2=ones(N2+1,1);                 %Vector de masas&lt;br /&gt;
w(1)=1/2; w(N2+1)=1/2;&lt;br /&gt;
result=h1*h2*w2'*f*w1  &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
La masa del anillo en el primer cuadrante es 1.4635. Debido a su simetría impar, si integraramos en todo el dominio la masa total sería 0. Como dos de los cuadrantes son de masa idéntica pero negativa, al multiplicar por 4 la masa del primer cuadrante, obtenemos lo que sería una suma de la masa en valor absoluto de todo el dominio.  &amp;lt;math&amp;gt;  1.4635 \times 4 = 5.854 = masa total &amp;lt;\math&amp;gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.6.jpg&amp;diff=18664</id>
		<title>Archivo:C15.6.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.6.jpg&amp;diff=18664"/>
				<updated>2014-12-03T15:25:39Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.5.jpg&amp;diff=18639</id>
		<title>Archivo:C15.5.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.5.jpg&amp;diff=18639"/>
				<updated>2014-12-03T15:15:43Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.4.jpg&amp;diff=18610</id>
		<title>Archivo:C15.4.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.4.jpg&amp;diff=18610"/>
				<updated>2014-12-03T15:05:42Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.3.jpg&amp;diff=18598</id>
		<title>Archivo:C15.3.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.3.jpg&amp;diff=18598"/>
				<updated>2014-12-03T15:01:05Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.2.jpg&amp;diff=18581</id>
		<title>Archivo:C15.2.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.2.jpg&amp;diff=18581"/>
				<updated>2014-12-03T14:49:25Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.1.jpg&amp;diff=18545</id>
		<title>Archivo:C15.1.jpg</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:C15.1.jpg&amp;diff=18545"/>
				<updated>2014-12-03T14:29:52Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=15216</id>
		<title>Visualización de Campos en un Anillo Plano (Grupo15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=15216"/>
				<updated>2014-11-27T11:58:11Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;br /&gt;
&lt;br /&gt;
== Introducción ==&lt;br /&gt;
[[Archivo:Mallado_G9.jpeg|250px|thumb|derecha|''Figura 1'']]&lt;br /&gt;
Dada una placa plana con forma de anillo circular centrado en el origen, y comprendido entre los radios 1 y 2 (''Figura 1''), se estudiarán las variaciones de temperatura en este objeto y las deformaciones causadas por el campo:&lt;br /&gt;
   &lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\vec u(\rho,\theta)={(1-\rho)^2}\vec g_{\rho}&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
En esta placa circular consideramos dos magnitudes físicas: la temperatura &amp;lt;math&amp;gt;T(\rho,\theta,t)&amp;lt;/math&amp;gt;, que depende de las variables espaciales &amp;lt;math&amp;gt;ρ&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;θ&amp;lt;/math&amp;gt; y del tiempo &amp;lt;math&amp;gt;t&amp;lt;/math&amp;gt;, y los desplazamientos &amp;lt;math&amp;gt;&lt;br /&gt;
\vec u (ρ,θ,t)&amp;lt;/math&amp;gt;, que dependen de los mismos parámetros que la temperatura.&lt;br /&gt;
De esta forma, si definimos &amp;lt;math&amp;gt; \vec r_0(\rho,\theta)&amp;lt;/math&amp;gt; como 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 para 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;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=15193</id>
		<title>Visualización de Campos en un Anillo Plano (Grupo15-C)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_Campos_en_un_Anillo_Plano_(Grupo15-C)&amp;diff=15193"/>
				<updated>2014-11-27T11:36:01Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: Página creada con «{{ Beta }}  {{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | Teoría de Campos|:Categoría:T...»&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_anillo_plano&amp;diff=15190</id>
		<title>Visualización de campos en un anillo plano</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_anillo_plano&amp;diff=15190"/>
				<updated>2014-11-27T11:34:16Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: Página blanqueada&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_anillo_plano&amp;diff=15188</id>
		<title>Visualización de campos en un anillo plano</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_anillo_plano&amp;diff=15188"/>
				<updated>2014-11-27T11:33:07Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_anillo_plano&amp;diff=15186</id>
		<title>Visualización de campos en un anillo plano</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_anillo_plano&amp;diff=15186"/>
				<updated>2014-11-27T11:30:36Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2014-15]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_anillo_plano&amp;diff=15179</id>
		<title>Visualización de campos en un anillo plano</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_en_un_anillo_plano&amp;diff=15179"/>
				<updated>2014-11-27T11:21:46Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: Página creada con «{{ TrabajoED | Deformaciones de una placa plana. Grupo 15-C | Teoría de Campos|2014-15 | Jaime Peña, Iñigo Urag...»&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | Deformaciones de una placa plana. Grupo 15-C | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]] | Jaime Peña, Iñigo Uraga, Pablo Molinero, Iñigo Diez, Daniel Pacheco y Pablo Vazquez }}&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:Trabajos 2014-15]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6526</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6526"/>
				<updated>2013-12-09T19:31:47Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: /* Representación del mallado del sólido */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r_{0}(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r_{0}(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando ''“linspace”'', que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando ''“meshgrid”'' , y la representamos mediante el comando ''“surf”'' tomando como Z una matriz de ceros.  Para la visualización, utilizamos ''“view”'' y le añadimos unos ejes con ''“axis”'', con el intervalo que queremos que se represente.&lt;br /&gt;
&amp;lt;big&amp;gt;{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Bild1.jpg|Descripción1&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante ''“inline”''. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando ''“surf”'' y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando ''“contour”'', en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con ''“inline”'' y después les damos valores dentro del mallado. Finalmente representamos con el comando ''“quiver”''.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;. Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; del campo, y Fy es la componente &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con ''“quiver”'' en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\cdot\vec u=  \frac{ \partial \vec u_1 }{ \partial x} + \frac{ \partial \vec u_2 }{ \partial y}+ \frac{ \partial \vec u_3 }{ \partial z}=0&lt;br /&gt;
&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt; &amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\times\vec{u}= \begin{pmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{pmatrix}= \begin{pmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \frac{sen(πy)}{10}&amp;amp; 0 &amp;amp; 0 \end{pmatrix}=- \frac{π}{10} cos(πy) \vec k &amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Ahora hallamos su valor absoluto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;|\nabla\times\vec{u}|=| \frac{π}{10} cos(πy) |&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando ''“inline”'' la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt; \vec i &amp;lt;/math&amp;gt; son nulas en todos los puntos de la placa.&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, el método es igual al de las tensiones tangenciales respeto al plano ortognal &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; son nulas en todos los puntos de la placa. &lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6525</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6525"/>
				<updated>2013-12-09T19:31:17Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: /* Representación del mallado del sólido */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r_{0}(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r_{0}(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando ''“linspace”'', que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando ''“meshgrid”'' , y la representamos mediante el comando ''“surf”'' tomando como Z una matriz de ceros.  Para la visualización, utilizamos ''“view”'' y le añadimos unos ejes con ''“axis”'', con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Archivo:Bild1.jpg|Descripción1&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante ''“inline”''. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando ''“surf”'' y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando ''“contour”'', en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con ''“inline”'' y después les damos valores dentro del mallado. Finalmente representamos con el comando ''“quiver”''.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;. Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; del campo, y Fy es la componente &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con ''“quiver”'' en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\cdot\vec u=  \frac{ \partial \vec u_1 }{ \partial x} + \frac{ \partial \vec u_2 }{ \partial y}+ \frac{ \partial \vec u_3 }{ \partial z}=0&lt;br /&gt;
&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt; &amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\times\vec{u}= \begin{pmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{pmatrix}= \begin{pmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \frac{sen(πy)}{10}&amp;amp; 0 &amp;amp; 0 \end{pmatrix}=- \frac{π}{10} cos(πy) \vec k &amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Ahora hallamos su valor absoluto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;|\nabla\times\vec{u}|=| \frac{π}{10} cos(πy) |&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando ''“inline”'' la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt; \vec i &amp;lt;/math&amp;gt; son nulas en todos los puntos de la placa.&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, el método es igual al de las tensiones tangenciales respeto al plano ortognal &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; son nulas en todos los puntos de la placa. &lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6522</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6522"/>
				<updated>2013-12-09T19:29:05Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: /* Tensiones tangenciales respecto al plano ortogonal a \vec j. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r_{0}(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r_{0}(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando ''“linspace”'', que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando ''“meshgrid”'' , y la representamos mediante el comando ''“surf”'' tomando como Z una matriz de ceros.  Para la visualización, utilizamos ''“view”'' y le añadimos unos ejes con ''“axis”'', con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante ''“inline”''. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando ''“surf”'' y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando ''“contour”'', en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con ''“inline”'' y después les damos valores dentro del mallado. Finalmente representamos con el comando ''“quiver”''.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;. Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; del campo, y Fy es la componente &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con ''“quiver”'' en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\cdot\vec u=  \frac{ \partial \vec u_1 }{ \partial x} + \frac{ \partial \vec u_2 }{ \partial y}+ \frac{ \partial \vec u_3 }{ \partial z}=0&lt;br /&gt;
&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt; &amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\times\vec{u}= \begin{pmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{pmatrix}= \begin{pmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \frac{sen(πy)}{10}&amp;amp; 0 &amp;amp; 0 \end{pmatrix}=- \frac{π}{10} cos(πy) \vec k &amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Ahora hallamos su valor absoluto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;|\nabla\times\vec{u}|=| \frac{π}{10} cos(πy) |&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando ''“inline”'' la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt; \vec i &amp;lt;/math&amp;gt; son nulas en todos los puntos de la placa.&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, el método es igual al de las tensiones tangenciales respeto al plano ortognal &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; son nulas en todos los puntos de la placa. &lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6515</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6515"/>
				<updated>2013-12-09T19:28:02Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: /* Tensiones tangenciales respecto al plano ortogonal a \vec j. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r_{0}(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r_{0}(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando ''“linspace”'', que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando ''“meshgrid”'' , y la representamos mediante el comando ''“surf”'' tomando como Z una matriz de ceros.  Para la visualización, utilizamos ''“view”'' y le añadimos unos ejes con ''“axis”'', con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante ''“inline”''. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando ''“surf”'' y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando ''“contour”'', en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con ''“inline”'' y después les damos valores dentro del mallado. Finalmente representamos con el comando ''“quiver”''.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;. Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; del campo, y Fy es la componente &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con ''“quiver”'' en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\cdot\vec u=  \frac{ \partial \vec u_1 }{ \partial x} + \frac{ \partial \vec u_2 }{ \partial y}+ \frac{ \partial \vec u_3 }{ \partial z}=0&lt;br /&gt;
&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt; &amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\times\vec{u}= \begin{pmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{pmatrix}= \begin{pmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \frac{sen(πy)}{10}&amp;amp; 0 &amp;amp; 0 \end{pmatrix}=- \frac{π}{10} cos(πy) \vec k &amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Ahora hallamos su valor absoluto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;|\nabla\times\vec{u}|=| \frac{π}{10} cos(πy) |&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando ''“inline”'' la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt; \vec i &amp;lt;/math&amp;gt; son nulas en todos los puntos de la placa.&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, el método es igual al de las tensiones tangenciales respeto al plano ortognal &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6508</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6508"/>
				<updated>2013-12-09T19:26:13Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: /* Tensiones tangenciales respecto al plano ortogonal a \vec i. */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r_{0}(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r_{0}(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando ''“linspace”'', que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando ''“meshgrid”'' , y la representamos mediante el comando ''“surf”'' tomando como Z una matriz de ceros.  Para la visualización, utilizamos ''“view”'' y le añadimos unos ejes con ''“axis”'', con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante ''“inline”''. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando ''“surf”'' y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando ''“contour”'', en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con ''“inline”'' y después les damos valores dentro del mallado. Finalmente representamos con el comando ''“quiver”''.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;. Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; del campo, y Fy es la componente &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con ''“quiver”'' en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\cdot\vec u=  \frac{ \partial \vec u_1 }{ \partial x} + \frac{ \partial \vec u_2 }{ \partial y}+ \frac{ \partial \vec u_3 }{ \partial z}=0&lt;br /&gt;
&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt; &amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\times\vec{u}= \begin{pmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{pmatrix}= \begin{pmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \frac{sen(πy)}{10}&amp;amp; 0 &amp;amp; 0 \end{pmatrix}=- \frac{π}{10} cos(πy) \vec k &amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Ahora hallamos su valor absoluto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;|\nabla\times\vec{u}|=| \frac{π}{10} cos(πy) |&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando ''“inline”'' la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Las tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt; \vec i &amp;lt;/math&amp;gt; son nulas en todos los puntos de la placa.&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6486</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6486"/>
				<updated>2013-12-09T19:20:41Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: /* Cálculo del rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[: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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r_{0}(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r_{0}(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando ''“linspace”'', que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando ''“meshgrid”'' , y la representamos mediante el comando ''“surf”'' tomando como Z una matriz de ceros.  Para la visualización, utilizamos ''“view”'' y le añadimos unos ejes con ''“axis”'', con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante ''“inline”''. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando ''“surf”'' y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando ''“contour”'', en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con ''“inline”'' y después les damos valores dentro del mallado. Finalmente representamos con el comando ''“quiver”''.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;. Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; del campo, y Fy es la componente &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con ''“quiver”'' en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\cdot\vec u=  \frac{ \partial \vec u_1 }{ \partial x} + \frac{ \partial \vec u_2 }{ \partial y}+ \frac{ \partial \vec u_3 }{ \partial z}=0&lt;br /&gt;
&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt; &amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\times\vec{u}= \begin{pmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{pmatrix}= \begin{pmatrix} \vec{i} &amp;amp; \vec{j} &amp;amp; \vec{k} \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \frac{sen(πy)}{10}&amp;amp; 0 &amp;amp; 0 \end{pmatrix}=- \frac{π}{10} cos(πy) \vec k &amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Ahora hallamos su valor absoluto:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;|\nabla\times\vec{u}|=| \frac{π}{10} cos(πy) |&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando ''“inline”'' la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;.  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones.&lt;br /&gt;
Como se puede observar en el dibujo, son mayores en…FALTA ESTO .&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&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 j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6464</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6464"/>
				<updated>2013-12-09T19:11:54Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r_{0}(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r_{0}(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando ''“linspace”'', que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando ''“meshgrid”'' , y la representamos mediante el comando ''“surf”'' tomando como Z una matriz de ceros.  Para la visualización, utilizamos ''“view”'' y le añadimos unos ejes con ''“axis”'', con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante ''“inline”''. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando ''“surf”'' y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando ''“contour”'', en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con ''“inline”'' y después les damos valores dentro del mallado. Finalmente representamos con el comando ''“quiver”''.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;. Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; del campo, y Fy es la componente &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con ''“quiver”'' en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\cdot\vec u=  \frac{ \partial \vec u_1 }{ \partial x} + \frac{ \partial \vec u_2 }{ \partial y}+ \frac{ \partial \vec u_3 }{ \partial z}=0&lt;br /&gt;
&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt; &amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&amp;lt;big&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt; \nabla\times\vec{u}=\begin{pmatrix} \vec i &amp;amp; \vec j &amp;amp; \vec k \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{pmatrix}=  \begin{pmatrix} \vec i &amp;amp; \vec j &amp;amp; \vec k \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \frac{sen(πy)}{10} &amp;amp; 0 &amp;amp; 0 \end{pmatrix}= \&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando ''“inline”'' la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;.  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones.&lt;br /&gt;
Como se puede observar en el dibujo, son mayores en…FALTA ESTO .&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&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 j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6445</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6445"/>
				<updated>2013-12-09T19:05:19Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: /* Cálculo del rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[: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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r_{0}(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r_{0}(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando ''“linspace”'', que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando ''“meshgrid”'' , y la representamos mediante el comando ''“surf”'' tomando como Z una matriz de ceros.  Para la visualización, utilizamos ''“view”'' y le añadimos unos ejes con ''“axis”'', con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante ''“inline”''. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando ''“surf”'' y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando ''“contour”'', en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con ''“inline”'' y después les damos valores dentro del mallado. Finalmente representamos con el comando ''“quiver”''.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;. Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; del campo, y Fy es la componente &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con ''“quiver”'' en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\cdot\vec u=  \frac{ \partial \vec u_1 }{ \partial x} + \frac{ \partial \vec u_2 }{ \partial y}+ \frac{ \partial \vec u_3 }{ \partial z}=0&lt;br /&gt;
&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt; &amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&amp;lt;big&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{u}=\begin{pmatrix} \vec i &amp;amp; \vec j &amp;amp; \vec k \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{pmatrix}=  \begin{pmatrix} \vec i &amp;amp; \vec j &amp;amp; \vec k \\ \frac{ \partial}{\partial x} &amp;amp; \frac{\partial }{\partial y} &amp;amp; \frac{\partial }{\partial z}\\ \frac{sen(πy}{10} &amp;amp; 0 &amp;amp; 0 \end{pmatrix}=&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando ''“inline”'' la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;.  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones.&lt;br /&gt;
Como se puede observar en el dibujo, son mayores en…FALTA ESTO .&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&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 j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6426</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6426"/>
				<updated>2013-12-09T19:01:07Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: /* Cálculo del rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad|[[: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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r_{0}(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r_{0}(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando ''“linspace”'', que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando ''“meshgrid”'' , y la representamos mediante el comando ''“surf”'' tomando como Z una matriz de ceros.  Para la visualización, utilizamos ''“view”'' y le añadimos unos ejes con ''“axis”'', con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante ''“inline”''. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando ''“surf”'' y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando ''“contour”'', en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con ''“inline”'' y después les damos valores dentro del mallado. Finalmente representamos con el comando ''“quiver”''.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;. Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; del campo, y Fy es la componente &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con ''“quiver”'' en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\cdot\vec u=  \frac{ \partial \vec u_1 }{ \partial x} + \frac{ \partial \vec u_2 }{ \partial y}+ \frac{ \partial \vec u_3 }{ \partial z}=0&lt;br /&gt;
&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt; &amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\times\vec{u}= \frac {1}{g^\frac{1}{2}}\begin{pmatrix} \vec{g_ρ} &amp;amp; \vec{g_θ} &amp;amp; \vec{g_z} \\ \frac{ \partial}{\partial ρ} &amp;amp; \frac{\partial }{\partial θ} &amp;amp; \frac{\partial }{\partial z}\\ u_1 &amp;amp; u_2 &amp;amp; u_3 \end{pmatrix}= \frac {1}{ρ} \begin{pmatrix} \vec{g_ρ} &amp;amp; \vec{g_θ} &amp;amp; \vec{g_z} \\ \frac{ \partial}{\partial ρ} &amp;amp; \frac{\partial }{\partial θ} &amp;amp; \frac{\partial }{\partial z}\\ cos(θ)(1 - \frac {1}{ρ^2})&amp;amp; - sen (θ) (ρ + \frac {1}{ρ}) &amp;amp; 0 \end{pmatrix}=&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando ''“inline”'' la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;.  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones.&lt;br /&gt;
Como se puede observar en el dibujo, son mayores en…FALTA ESTO .&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&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 j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6421</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6421"/>
				<updated>2013-12-09T18:59:24Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: /* Calculo y representación  de la divergencia en todos los puntos del sólido */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r_{0}(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r_{0}(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando ''“linspace”'', que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando ''“meshgrid”'' , y la representamos mediante el comando ''“surf”'' tomando como Z una matriz de ceros.  Para la visualización, utilizamos ''“view”'' y le añadimos unos ejes con ''“axis”'', con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante ''“inline”''. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando ''“surf”'' y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando ''“contour”'', en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con ''“inline”'' y después les damos valores dentro del mallado. Finalmente representamos con el comando ''“quiver”''.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;. Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; del campo, y Fy es la componente &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con ''“quiver”'' en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\cdot\vec u=  \frac{ \partial \vec u_1 }{ \partial x} + \frac{ \partial \vec u_2 }{ \partial y}+ \frac{ \partial \vec u_3 }{ \partial z}=0&lt;br /&gt;
&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt; &amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando ''“inline”'' la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;.  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones.&lt;br /&gt;
Como se puede observar en el dibujo, son mayores en…FALTA ESTO .&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&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 j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6419</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6419"/>
				<updated>2013-12-09T18:58:15Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: /* Calculo y representación  de la divergencia en todos los puntos del sólido */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r_{0}(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r_{0}(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando ''“linspace”'', que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando ''“meshgrid”'' , y la representamos mediante el comando ''“surf”'' tomando como Z una matriz de ceros.  Para la visualización, utilizamos ''“view”'' y le añadimos unos ejes con ''“axis”'', con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante ''“inline”''. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando ''“surf”'' y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando ''“contour”'', en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con ''“inline”'' y después les damos valores dentro del mallado. Finalmente representamos con el comando ''“quiver”''.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;. Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; del campo, y Fy es la componente &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con ''“quiver”'' en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;big&amp;gt;&amp;lt;math&amp;gt;\nabla\cdot\vec u=  \frac{ \partial \vec u_1 }{ \partial x} + \frac{ \partial \vec u_2 }{ \partial y}+ \frac{ \partial \vec u_3 }{ \partial z}=0&lt;br /&gt;
&amp;lt;/math&amp;gt;&amp;lt;/big&amp;gt; &amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando ''“inline”'' la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;.  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones.&lt;br /&gt;
Como se puede observar en el dibujo, son mayores en…FALTA ESTO .&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&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 j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6407</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6407"/>
				<updated>2013-12-09T18:51:47Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r_{0}(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r_{0}(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando ''“linspace”'', que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando ''“meshgrid”'' , y la representamos mediante el comando ''“surf”'' tomando como Z una matriz de ceros.  Para la visualización, utilizamos ''“view”'' y le añadimos unos ejes con ''“axis”'', con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante ''“inline”''. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando ''“surf”'' y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando ''“contour”'', en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con ''“inline”'' y después les damos valores dentro del mallado. Finalmente representamos con el comando ''“quiver”''.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;. Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; del campo, y Fy es la componente &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con ''“quiver”'' en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
(Introducimos las operaciones aritméticas)&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;\nabla\cdot\vec u= &amp;lt;/math&amp;gt; &lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando ''“inline”'' la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;.  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones.&lt;br /&gt;
Como se puede observar en el dibujo, son mayores en…FALTA ESTO .&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&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 j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6395</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6395"/>
				<updated>2013-12-09T18:47:11Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r_{0}(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r_{0}(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando ''“linspace”'', que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando ''“meshgrid”'' , y la representamos mediante el comando ''“surf”'' tomando como Z una matriz de ceros.  Para la visualización, utilizamos ''“view”'' y le añadimos unos ejes con ''“axis”'', con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante ''“inline”''. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando ''“surf”'' y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando ''“contour”'', en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con ''“inline”'' y después les damos valores dentro del mallado. Finalmente representamos con el comando ''“quiver”''.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;. Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; del campo, y Fy es la componente &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con ''“quiver”'' en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
(Introducimos las operaciones aritméticas)&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando ''“inline”'' la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;.  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones.&lt;br /&gt;
Como se puede observar en el dibujo, son mayores en…FALTA ESTO .&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&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 j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6368</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6368"/>
				<updated>2013-12-09T18:39:07Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r0(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r0(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando ''“linspace”'', que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando ''“meshgrid”'' , y la representamos mediante el comando ''“surf”'' tomando como Z una matriz de ceros.  Para la visualización, utilizamos ''“view”'' y le añadimos unos ejes con ''“axis”'', con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante ''“inline”''. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando ''“surf”'' y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando ''“contour”'', en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con ''“inline”'' y después les damos valores dentro del mallado. Finalmente representamos con el comando ''“quiver”''.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;. Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; del campo, y Fy es la componente &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con ''“quiver”'' en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
(Introducimos las operaciones aritméticas)&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando ''“inline”'' la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;.  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones.&lt;br /&gt;
Como se puede observar en el dibujo, son mayores en…FALTA ESTO .&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&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 j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6355</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6355"/>
				<updated>2013-12-09T18:36:02Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r0(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r0(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando “linspace”, que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando “meshgrid” , y la representamos mediante el comando “surf” tomando como Z una matriz de ceros.  Para la visualización, utilizamos “view” y le añadimos unos ejes con “axis”, con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante “inline”. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando “surf” y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando “contour”, en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con “inline” y después les damos valores dentro del mallado. Finalmente representamos con el comando “quiver”.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;. Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt; del campo, y Fy es la componente &amp;lt;math&amp;gt;\vec j&amp;lt;/math&amp;gt;, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con “quiver” en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
(Introducimos las operaciones aritméticas)&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando “inline” la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de &amp;lt;math&amp;gt;\vec u&amp;lt;/math&amp;gt;. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;.  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones.&lt;br /&gt;
Como se puede observar en el dibujo, son mayores en…FALTA ESTO .&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&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 j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6349</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6349"/>
				<updated>2013-12-09T18:33:42Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r0(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r0(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando “linspace”, que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando “meshgrid” , y la representamos mediante el comando “surf” tomando como Z una matriz de ceros.  Para la visualización, utilizamos “view” y le añadimos unos ejes con “axis”, con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante “inline”. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando “surf” y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando “contour”, en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con “inline” y después les damos valores dentro del mallado. Finalmente representamos con el comando “quiver”.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente i (vector). Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente i del campo, y Fy es la componente j, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con “quiver” en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial u. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
(Introducimos las operaciones aritméticas)&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando “inline” la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de u. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a &amp;lt;math&amp;gt;\vec i&amp;lt;/math&amp;gt;, usamos  la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec i-(\vec i \cdot \sigma \cdot \vec i) \vec i|&amp;lt;/math&amp;gt;.  para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones.&lt;br /&gt;
Como se puede observar en el dibujo, son mayores en…FALTA ESTO .&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&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 j&amp;lt;/math&amp;gt;.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula &amp;lt;math&amp;gt;|\sigma \cdot \vec j-(\vec j \cdot \sigma \cdot \vec j) \vec j|&amp;lt;/math&amp;gt;. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6317</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6317"/>
				<updated>2013-12-09T18:22:02Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&gt;
{{Trabajo|Visualización de campos escalares y vectoriales en elasticidad(Grupo 12A)|[[: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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r0(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r0(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando “linspace”, que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando “meshgrid” , y la representamos mediante el comando “surf” tomando como Z una matriz de ceros.  Para la visualización, utilizamos “view” y le añadimos unos ejes con “axis”, con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante “inline”. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando “surf” y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando “contour”, en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con “inline” y después les damos valores dentro del mallado. Finalmente representamos con el comando “quiver”.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente i (vector). Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente i del campo, y Fy es la componente j, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con “quiver” en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial u. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
(Introducimos las operaciones aritméticas)&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando “inline” la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de u. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a i.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a î, usamos  la fórmula [oi-(ioi)] para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones.&lt;br /&gt;
Como se puede observar en el dibujo, son mayores en…FALTA ESTO .&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a j.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula [oj-(joj)]. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6311</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6311"/>
				<updated>2013-12-09T18:21:04Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r0(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r0(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando “linspace”, que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando “meshgrid” , y la representamos mediante el comando “surf” tomando como Z una matriz de ceros.  Para la visualización, utilizamos “view” y le añadimos unos ejes con “axis”, con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante “inline”. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando “surf” y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando “contour”, en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con “inline” y después les damos valores dentro del mallado. Finalmente representamos con el comando “quiver”.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente i (vector). Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente i del campo, y Fy es la componente j, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con “quiver” en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial u. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
(Introducimos las operaciones aritméticas)&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando “inline” la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de u. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a i.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a î, usamos  la fórmula [oi-(ioi)] para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones.&lt;br /&gt;
Como se puede observar en el dibujo, son mayores en…FALTA ESTO .&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a j.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula [oj-(joj)]. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6308</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6308"/>
				<updated>2013-12-09T18:19:51Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r0(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r0(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando “linspace”, que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando “meshgrid” , y la representamos mediante el comando “surf” tomando como Z una matriz de ceros.  Para la visualización, utilizamos “view” y le añadimos unos ejes con “axis”, con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura  &amp;lt;math&amp;gt; T(ρ; θ) = -log(ρ + 0.1)&amp;lt;/math&amp;gt;, que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante “inline”. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando “surf” y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando “contour”, en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con “inline” y después les damos valores dentro del mallado. Finalmente representamos con el comando “quiver”.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial &amp;lt;math&amp;gt; \vec u = sen (πY)/10 \vec i &amp;lt;/math&amp;gt;.==&lt;br /&gt;
El campo vectorial está solo definido en la componente i (vector). Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente i del campo, y Fy es la componente j, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con “quiver” en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial u. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
(Introducimos las operaciones aritméticas)&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando “inline” la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de u. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a i.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a î, usamos  la fórmula [oi-(ioi)] para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones.&lt;br /&gt;
Como se puede observar en el dibujo, son mayores en…FALTA ESTO .&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a j.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula [oj-(joj)]. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6279</id>
		<title>Visualizacion de campos escalares y vectoriales en elasticidad (Grupo A - 12)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizacion_de_campos_escalares_y_vectoriales_en_elasticidad_(Grupo_A_-_12)&amp;diff=6279"/>
				<updated>2013-12-09T18:10:47Z</updated>
		
		<summary type="html">&lt;p&gt;Jaime.psoria: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Beta }}&lt;br /&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;
Considerando una placa rectangular plana que ocupa la región [-1/2, 1/2]x[0,2] definimos sobre ella dos magnitudes físicas, la temperatura,T(x,y,t) un campo escalar; y los desplazamientos,&amp;lt;math&amp;gt;\vec u(x,y,t)&amp;lt;/math&amp;gt;,un campo vectorial.&lt;br /&gt;
Definimos &amp;lt;math&amp;gt;\vec r0(x,y)&amp;lt;/math&amp;gt; el vector de posición de los puntos de la placa en reposo. La posición de cada punto de la placa en un instante t viene dado por: &lt;br /&gt;
&amp;lt;math&amp;gt;\vec r(x,y,t) = \vec r0(x,y) + \vec u(x,y,t)&amp;lt;/math&amp;gt;&lt;br /&gt;
Vamos a suponer que sobre la placa se ha aplicado una fuerza que ha provocado una vibracion de&lt;br /&gt;
manera que los desplazamientos vienen dados por la onda:&lt;br /&gt;
&amp;lt;math&amp;gt;\vec u(x,y)=1/10 sin(πy)\vec i &amp;lt;/math&amp;gt;&lt;br /&gt;
==  Representación del mallado del sólido ==&lt;br /&gt;
Para representar el mallado, creamos dos vectores con el comando “linspace”, que representan los intervalos de las variables x e y, es decir la región de la placa, tomando como  paso de muestreo 1/10. Creamos la malla con el comando “meshgrid” , y la representamos mediante el comando “surf” tomando como Z una matriz de ceros.  Para la visualización, utilizamos “view” y le añadimos unos ejes con “axis”, con el intervalo que queremos que se represente.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
x=linspace(-1/2,1/2,10);&lt;br /&gt;
y=linspace(0,2,20);&lt;br /&gt;
[X,Y]=meshgrid(x,y);&lt;br /&gt;
Z=zeros(20,10);&lt;br /&gt;
subplot(3,3,1)&lt;br /&gt;
surf(X,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de la función temperatura T(_; _) = 􀀀log(_ + 0:1), que  proviene de un foco en el origen, mediante una superficie. ==&lt;br /&gt;
&lt;br /&gt;
Introducimos en Matlab la función mediante “inline”. Como la función depende de variables cilíndricas, la escribimos directamente en coordenadas cartesianas. Denominamos Z1 a la matriz imagen de la función T, y representamos la superficie con el comando “surf” y la visualizamos.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
f=inline('-log(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
Z1=f(X,Y);&lt;br /&gt;
subplot(3,3,2)&lt;br /&gt;
surf(X,Y,Z1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Cálculo del gradiente de la función T y representación del gradiente y curvas de nivel de T. ==&lt;br /&gt;
&lt;br /&gt;
Primero representamos las curvas de nivel con el comando “contour”, en el cuál tendremos las variables X, Y, Z1 definidas anteriormente, y por último le añadimos un número (20), que se corresponde con el número de curvas de nivel que obtenemos por pantalla. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Subplot (3,3,3)&lt;br /&gt;
Contour (X,Y,Z,20)&lt;br /&gt;
Axis ([-1,1,-1,3])&lt;br /&gt;
View (2)&lt;br /&gt;
}}&lt;br /&gt;
Después procedemos al cálculo y representación del gradiente, cuyas componentes gx y gy son las derivadas parciales con respecto a X e Y de la función T. Introducimos las funciones gx y gy (aqui añadimos la función matemática) con “inline” y después les damos valores dentro del mallado. Finalmente representamos con el comando “quiver”.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
gx=inline('-(x./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
gy=inline('-(y./sqrt(x.^2+y.^2))./(sqrt(x.^2+y.^2)+0.1)','x','y');&lt;br /&gt;
U=gx(X,Y);&lt;br /&gt;
V=gy(X,Y);&lt;br /&gt;
subplot(3,3,4)&lt;br /&gt;
quiver(X,Y,U,V)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Podemos observar finalmente que las curvas de nivel son ortogonales al campo vectorial gradiente. (ponemos un dibujo encima del otro).&lt;br /&gt;
==Representación del campo vectorial u = sen (PI*Y)/10 i. ==&lt;br /&gt;
El campo vectorial está solo definido en la componente i (vector). Por tanto creamos dos funciones Fx y Fy. Fx es igual a la componente i del campo, y Fy es la componente j, o sea 0. Damos valores a las funciones con U1 y V1 y finalmente representamos con “quiver” en el mismo intervalo que siempre.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
fx=inline('sin(pi*y)/10','x','y');&lt;br /&gt;
fy=inline('0','x','y');&lt;br /&gt;
U1=fx(X,Y);&lt;br /&gt;
V1=fy(X,Y);&lt;br /&gt;
subplot(3,3,5)&lt;br /&gt;
quiver(X,Y,U1,V1)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Representación de cada punto del sólido antes y despúes del desplazamiento determinado por el campo vectorial u. ==&lt;br /&gt;
Definimos X1, que es la componente en x después del desplazamiento. La obtenemos sumando la X inicial y el desplazamiento. La Y y la Z son las mismas, usamos el comando surf con las variables X1, Y, Z. &lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(3,3,6)&lt;br /&gt;
X1=X+U1;&lt;br /&gt;
surf(X1,Y,Z)&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
==Calculo y representación  de la divergencia en todos los puntos del sólido==&lt;br /&gt;
(Introducimos las operaciones aritméticas)&lt;br /&gt;
La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
La divergencia nos da 0, por tanto la representación es  0 en todos los puntos.&lt;br /&gt;
&lt;br /&gt;
==Cálculo del rotacional==&lt;br /&gt;
(introducimos  las operaciones aritméticas y explicamos por encima la divergencia ) &lt;br /&gt;
&lt;br /&gt;
Introducimos con el comando “inline” la componente Z  del rotacional, y la aplicamos a los puntos del sólido. Los puntos que maximizan una función son los que hacen máxima la función coseno, es decir, puntos de los ejes y iguales a los números enteros en este caso, como se puede comprobar en el dibujo.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
 hz=inline('-pi*cos(pi*y)/10','x','y','z');&lt;br /&gt;
Z2=hz(X,Y,Z);&lt;br /&gt;
Z2=abs(Z2);&lt;br /&gt;
subplot(3,3,7)&lt;br /&gt;
surf(X,Y,Z2);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensor de tensiones. ==&lt;br /&gt;
Definimos la función épsilon como la parte simétrica del tensor gradiente de u. El tensor de tensiones se define como (introducimos ecuación)&lt;br /&gt;
Las tensiones normales en la dirección que marca el eje i y el eje j resultan 0 y por tanto su representación es 0.&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a i.==&lt;br /&gt;
Para hallar las tensiones tangenciales al plano ortogonal a î, usamos  la fórmula [oi-(ioi)] para calcularlas, saliendo con solo componente en y .Construimos las matrices Kx Ky y Kz con las componentes de las tensiones, y después las dibujamos usando el comando quiver3 para representar campos vectoriales en 3 dimensiones.&lt;br /&gt;
Como se puede observar en el dibujo, son mayores en…FALTA ESTO .&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Ky=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Kx=zeros(size(Ky));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,8)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
==Tensiones tangenciales respecto al plano ortogonal a j.==&lt;br /&gt;
Para obtener y dibujar estas tensiones, las tangenciales respecto al plano ortogonal a ^j, el método es igual al de las tensiones tangenciales respeto al plano ortognal î, solo que usaremos para hallarlas la fórmula [oj-(joj)]. Luego para representarlas lo haremos igual también, construyendo matrices con las componentes de las tensiones y representándolas sobre los punos de coordenadas X Y Z con el comando quiver3.&lt;br /&gt;
Las mayores tensiones, como se aprecia en la representación, están….FALTAA&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
Kx=(pi/10)*cos(pi*Y)/10;&lt;br /&gt;
Ky=zeros(size(Kx));&lt;br /&gt;
Kz=zeros(size(Ky));&lt;br /&gt;
subplot(3,3,9)&lt;br /&gt;
quiver3(X,Y,Z,Kx,Ky,Kz);&lt;br /&gt;
axis([-1,1,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
Estas tensiones se calculan con la fórmula [oj-(joj)],y a continuación mostramos un dibujo de ellas obtenido con el Matlab:&lt;br /&gt;
En él se ve perfectamente que las mayores tensiones tangenciales al plano ortogonal j son  …&lt;br /&gt;
[[categoria:Teoría de Campos]]&lt;/div&gt;</summary>
		<author><name>Jaime.psoria</name></author>	</entry>

	</feed>