<?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=Pedro.michelini</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=Pedro.michelini"/>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/wiki/Especial:Contribuciones/Pedro.michelini"/>
		<updated>2026-04-24T08: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=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=48322</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=48322"/>
				<updated>2021-12-13T22:40:29Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(\vec r\)&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;(x,y) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(\vec r\)(x, y) = ~\(\vec r\)0(x, y) + ~\(\vec u\)(x, y).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ)=\frac{ρ − 1}{5}&lt;br /&gt;
sin(θ)~&amp;lt;/math&amp;gt;\(\vec e\)&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|250px|miniatura|derecha|Representación del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar. Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|550px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del gráfico se deduce que la temperatura aumenta en la dirección negativa de x. Por lo tanto, el valor máximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente consiste en: &lt;br /&gt;
[[Archivo:Formulagradiente.png|200px|miniatura|centro|Fórmula del gradiente de una función]]&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;T=&amp;lt;math&amp;gt;\frac{2(x-3)}{(x-3)^2+2}&amp;lt;/math&amp;gt;\(\vec i\). Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
[[Archivo:Gradiente4-A1.JPG|400px|miniatura|derecha|Gradiente de la temperatura comparado con sus curvas de nivel]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                                                               &lt;br /&gt;
T=log10((x-3).^2 + 2); &lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
contour(x,y,T,60)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
ti=inline('(2.*(x-3))./(log(10).*((x-3).^2)+2)','x','y'); %Derivada parcial con respecto a x&lt;br /&gt;
tj=inline('0.*x','x','y');                                %Derivada parcial con respecto a y   &lt;br /&gt;
Tx=ti(x,y);&lt;br /&gt;
Ty=tj(x,y);&lt;br /&gt;
quiver(x,y,Tx,Ty);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(h,'maxheadsize',0.33)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo \(\vec u\) de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia  e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;=&amp;lt;math&amp;gt;\frac{-x_2}{ρ}&amp;lt;/math&amp;gt;\(\vec i\)+&amp;lt;math&amp;gt;\frac{x_1}{ρ}&amp;lt;/math&amp;gt;\(\vec j\)=-sin(θ)\(\vec i\)+cos(θ)\(\vec j\).&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: \(\vec u\)=-&amp;lt;math&amp;gt;\frac{ρ-1}{5}&amp;lt;/math&amp;gt;sin&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;(θ)\(\vec i\)+&amp;lt;math&amp;gt;\frac{ρ-1}{5}&amp;lt;/math&amp;gt;cos(θ)sin(θ)\(\vec j\)&lt;br /&gt;
[[Archivo:Campovectoresxx.png|550Px|miniatura|derecha|Campo de deformaciones sobre los diversos puntos del mallado.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
hold on  &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                 &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo \(\vec u\):&lt;br /&gt;
[[Archivo:Desplazamientoss.png|500px|miniatura|derecha|La placa antes y después de la acción del campo de desplazamientos]]&lt;br /&gt;
[[Archivo:Desplazamiento placa.JPG|500px|miniatura|derecha|Comparación antes (verde) y después del desplazamiento (rojo)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
%Comparación de ambas representaciones. &lt;br /&gt;
hold on&lt;br /&gt;
figure                                 &lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
title('Desplazamiento de la placa','Fontsize',16);&lt;br /&gt;
hold on&lt;br /&gt;
i = mesh(x,y,0*x);&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo \(\vec u\) ha creado una ligera torsión radial en la placa y una elongación del extremo derecho.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
&lt;br /&gt;
A continuación, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento, es decir, que una parte del sólido aumentará de volumen y otra lo perderá (dilatación o contracción).&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del gráfico se puede deducir que la divergencia toma valores máximos en el punto (ρ, θ) = (2,0) y valores mínimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ). Como vemos en la gráfica, la divergencia es positiva cuando θ se encuentra entre 0 y π/2 (se dilata); es negativa con θ entra π/2 y 2π (se contrae) y al ser nula entorno a π/2, esa región del sólido se mantiene constante en volumen.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en '''\(\vec e\)&amp;lt;sub&amp;gt;z&amp;lt;/sub&amp;gt;'''. &lt;br /&gt;
Calculamos su módulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el gráfico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2). Recientemente hemos aprendido a interpretarlo mediante el teorema de Stokes, y viendo la gráfica en 3D, sabemos que la velocidad en θ=0 y en θ=π es nula en cuanto a rotación, y es máxima en el punto mencionado antes, lo que genera una tensión plástica que lo deforma.&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este ε(u). Entonces conoceremos el tensor de tensiones definido como σ. Sabemos que σ se puede obtener a partir de la fórmula:&lt;br /&gt;
[[Archivo:Fórmulasigma.JPG|150px|miniatura|centro]]&lt;br /&gt;
Tomamos los coeficientes de Lamé (λ y μ) ambos como iguales a 1, y el tensor de deformaciones como la suma del gradiente de \(\vec u\) con su matriz traspuesta divididos por 2. EL resultado de sigma lo podemos ver incluido en el código del programa.&lt;br /&gt;
&lt;br /&gt;
Después podremos representar las tensiones normales en la dirección que marca el eje i, es decir &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt;  = \(\vec g_{i}\) * σ * \(\vec g_{i}\), las tensiones normales en la dirección que marca el eje j, es decir &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt;  = \(\vec g_{j}\) * σ * \(\vec g_{j}\) y las correspondientes al eje k, es decir &amp;lt;math&amp;gt;\vec k&amp;lt;/math&amp;gt;  = \(\vec g_{k}\) * σ * \(\vec g_{k}\). Resultan las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Tensordetensiones3D.JPG|550px|miniatura|derecha|Tensiones normales a los ejes]]&lt;br /&gt;
[[Archivo:Tensordetensiones2D.JPG|550px|miniatura|derecha|Vista plano XY]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1).*cos(tt)./(5.*rr); %Elementos (1,1) y (3,3) de la matriz sigma &lt;br /&gt;
b=(2-rr).*sin(tt)./5;    %elementos (2,1) y (1,2)&lt;br /&gt;
c= 2.* (rr-1).*cos(tt)./5;   %Elemento (2,2) de la matriz Épsilon&lt;br /&gt;
d=a+c; %Elemento (2,2) de la matriz Sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
La siguiente gráfica representa las tensiones superficiales a la placa. Como se ve en el resultado, estas incrementan cuando θ tiende a π/2.&lt;br /&gt;
[[Archivo:Tensiones tangenciales al plano ortogonal a i.JPG|450px|miniatura|derecha|Tensiones tangenciales.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(2-rr).*sin(tt)./5;&lt;br /&gt;
b=(2-rr).*sin(tt)./5;&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   &lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tensión de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuándo un material&lt;br /&gt;
inicia un comportamiento plástico. Emplearemos la siguiente fórmula, que toma como valores de σ(1), σ(2) y σ(3) los autovalores de la matriz σ calculada en el apartado 9. En el programa incluimos una calculadora de autovalores.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:VonMises4-A.JPG|350px|miniatura|derecha|Tensión de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%Creación matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=(r-1)./(5.*r).*cos(t);&lt;br /&gt;
     sigma(1,2)=(2-r)./10.*sin(t);&lt;br /&gt;
     sigma(2,1)=(2-r)./10.*sin(t);&lt;br /&gt;
     sigma(2,2)=(2.*r.^2-r-1)./(5.*r).*cos(t);&lt;br /&gt;
     sigma(3,3)=(r-1)./(5.*r).*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Fórmula de Tensión de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                %Pasamos a cartesianas  &lt;br /&gt;
xx=RR.*cos(TT);        &lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (2,0) y en (2,π).&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
El campo de fuerzas que actúa sobre la placa sigue la siguiente fórmula  F = −∇ · σ. En la gráfica podemos apreciar claramente cómo actúa sobre el sólido este campo y podríamos intuir qué desplazamiento y deformación sufriría.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de fuerzas sobre el sólido.JPG|400px|miniatura|derecha|Campo de fuerzas que recibe la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
z=0.*x;  &lt;br /&gt;
hold on&lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                 &lt;br /&gt;
axis ([-3,3,-1,3])             &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=(2.*RR.^2-RR.^3-1)./(5.*RR.^2).*cos(TT);&lt;br /&gt;
b=-(2.*RR.^2-2.*RR-1)./(5.*RR).*sin(TT);&lt;br /&gt;
c=-1./RR.*cos(TT);&lt;br /&gt;
w=quiver3(x,y,z,a,b,c);&lt;br /&gt;
axis ([-3,3,-1,3,-1,1])&lt;br /&gt;
title('Campo de fuerzas','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=48310</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=48310"/>
				<updated>2021-12-13T15:25:33Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: /* Representación del campo vectorial de deformaciones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(\vec r\)&amp;lt;sub&amp;gt;0&amp;lt;/sub&amp;gt;(x,y) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(\vec r\)(x, y) = ~\(\vec r\)0(x, y) + ~\(\vec u\)(x, y).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~&amp;lt;/math&amp;gt;\(\vec e\)&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|250px|miniatura|derecha|Representación del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|550px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del gráfico se deduce que la temperatura aumenta en la dirección negativa de x. Por lo tanto, el valor máximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
[[Archivo:Formulagradiente.png|200px|miniatura|centro|Fórmula del gradiente de una función]]&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla&amp;lt;/math&amp;gt;T=&amp;lt;math&amp;gt;\frac{2(x-3)}{(x-3)^2+2}&amp;lt;/math&amp;gt;\(\vec i\). Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
[[Archivo:Gradiente4-A1.JPG|400px|miniatura|derecha|Gradiente de la temperatura comparado con sus curvas de nivel]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                                                               &lt;br /&gt;
T=log10((x-3).^2 + 2); &lt;br /&gt;
hold on       %Campo escalar de temperatura            &lt;br /&gt;
contour(x,y,T,60)             %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
ti=inline('(2.*(x-3))./(log(10).*((x-3).^2)+2)','x','y'); %Derivada parcial con respecto a x&lt;br /&gt;
tj=inline('0.*x','x','y');                                %Derivada parcial con respecto a y   &lt;br /&gt;
Tx=ti(x,y);&lt;br /&gt;
Ty=tj(x,y);&lt;br /&gt;
quiver(x,y,Tx,Ty);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title ('Gradiente de la Temperatura','Fontsize',18);&lt;br /&gt;
set(h,'maxheadsize',0.33)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo \(\vec u\) de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia  e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;=&amp;lt;math&amp;gt;\frac{-x_2}{ρ}&amp;lt;/math&amp;gt;\(\vec i\)+&amp;lt;math&amp;gt;\frac{x_1}{ρ}&amp;lt;/math&amp;gt;\(\vec j\)=-sin(θ)\(\vec i\)+cos(θ)\(\vec j\).&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: \(\vec u\)=-&amp;lt;math&amp;gt;\frac{ρ-1}{5}&amp;lt;/math&amp;gt;sin&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;(θ)\(\vec i\)+&amp;lt;math&amp;gt;\frac{ρ-1}{5}&amp;lt;/math&amp;gt;cos(θ)sin(θ)\(\vec j\)&lt;br /&gt;
[[Archivo:Campovectoresxx.png|550Px|miniatura|derecha|Campo de deformaciones sobre los diversos puntos del mallado.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
hold on  &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                 &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo \(\vec u\):&lt;br /&gt;
[[Archivo:Desplazamientoss.png|500px|miniatura|derecha|La placa antes y después de la acción del campo de desplazamientos]]&lt;br /&gt;
[[Archivo:Desplazamiento placa.JPG|500px|miniatura|derecha|Comparación antes (verde) y después del desplazamiento (rojo)]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
%Comparación de ambas representaciones. &lt;br /&gt;
hold on&lt;br /&gt;
figure                                 &lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
title('Desplazamiento de la placa','Fontsize',16);&lt;br /&gt;
hold on&lt;br /&gt;
i = mesh(x,y,0*x);&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como podemos apreciar al comparar estas dos gráficas, el desplazamiento producido por el campo \(\vec u\) ha creado una ligera torsión radial en la placa y una elongación del extremo izquierdo.&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
&lt;br /&gt;
A continuación, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento, es decir, que una parte del sólido aumentará de volumen y otra lo perderá (dilatación o contracción).&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del gráfico se puede deducir que la divergencia toma valores máximos en el punto (ρ, θ) = (2,0) y valores mínimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ). Como vemos en la gráfica, la divergencia es positiva cuando θ se encuentra entre 0 y π/2 (se dilata); es negativa con θ entra π/2 y 2π (se contrae) y al ser nula entorno a π/2, esa región del sólido se mantiene constante en volumen.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en '''\(\vec e\)&amp;lt;sub&amp;gt;z&amp;lt;/sub&amp;gt;'''. &lt;br /&gt;
Calculamos su módulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el gráfico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2). Recientemente hemos aprendido a interpretarlo mediante el teorema de Stokes, y viendo la gráfica en 3D, sabemos que la velocidad en θ=0 y en θ=π es nula en cuanto a rotación, y es máxima en el punto mencionado antes, lo que genera una tensión plástica que lo deforma.&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
Una vez definida la parte simétrica del tensor gradiente de u conocido como tensor de deformaciones. siendo este ε(u). Entonces conoceremos el tensor de tensiones definido como σ. Sabemos que σ se puede obtener a partir de la fórmula:&lt;br /&gt;
[[Archivo:Fórmulasigma.JPG|150px|miniatura|centro]]&lt;br /&gt;
Tomamos los coeficientes de Lamé (λ y μ) ambos como iguales a 1, y el tensor de deformaciones como la suma del gradiente de \(\vec u\) con su matriz traspuesta divididos por 2. EL resultado de sigma lo podemos ver incluido en el código del programa.&lt;br /&gt;
&lt;br /&gt;
Después podremos representar las tensiones normales en la dirección que marca el eje i, es decir &amp;lt;math&amp;gt;\vec i &amp;lt;/math&amp;gt;  = \(\vec g_{i}\) * σ * \(\vec g_{i}\), las tensiones normales en la dirección que marca el eje j, es decir &amp;lt;math&amp;gt;\vec j &amp;lt;/math&amp;gt;  = \(\vec g_{j}\) * σ * \(\vec g_{j}\) y las correspondientes al eje k, es decir &amp;lt;math&amp;gt;\vec k&amp;lt;/math&amp;gt;  = \(\vec g_{k}\) * σ * \(\vec g_{k}\). Resultan las siguientes gráficas:&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Tensordetensiones3D.JPG|550px|miniatura|derecha|Tensiones normales a los ejes]]&lt;br /&gt;
[[Archivo:Tensordetensiones2D.JPG|550px|miniatura|derecha|Vista plano XY]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t); &lt;br /&gt;
clf&lt;br /&gt;
subplot(1,3,1);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(rr-1).*cos(tt)./(5.*rr); %Elementos (1,1) y (3,3) de la matriz sigma &lt;br /&gt;
b=(2-rr).*sin(tt)./5;    %elementos (2,1) y (1,2)&lt;br /&gt;
c= 2.* (rr-1).*cos(tt)./5;   %Elemento (2,2) de la matriz Épsilon&lt;br /&gt;
d=a+c; %Elemento (2,2) de la matriz Sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
figure&lt;br /&gt;
subplot(3,1,1);&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,2);   %Elemento (2,2) de la matriz sigma&lt;br /&gt;
surf(xx,yy,d)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(3,1,3);   %Elemento (3,3) de la matriz sigma&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
colorbar&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
La siguiente gráfica representa las tensiones superficiales a la placa. Como se ve en el resultado, estas incrementan cuando θ tiende a π/2.&lt;br /&gt;
[[Archivo:Tensiones tangenciales al plano ortogonal a i.JPG|450px|miniatura|derecha|Tensiones tangenciales.]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
r=1:h:2;&lt;br /&gt;
t=0:h:pi;&lt;br /&gt;
[rr,tt]=meshgrid(r,t);&lt;br /&gt;
xx=rr.*cos(tt);&lt;br /&gt;
yy=rr.*sin(tt);&lt;br /&gt;
a=(2-rr).*sin(tt)./5;&lt;br /&gt;
b=(2-rr).*sin(tt)./5;&lt;br /&gt;
surf(xx,yy,a)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
subplot(1,3,2);   &lt;br /&gt;
surf(xx,yy,b)&lt;br /&gt;
axis equal&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tensión de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuándo un material&lt;br /&gt;
inicia un comportamiento plástico. Emplearemos la siguiente fórmula, que toma como valores de σ(1), σ(2) y σ(3) los autovalores de la matriz σ calculada en el apartado 9. En el programa incluimos una calculadora de autovalores para una mayor comodidad.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:VonMises4-A.JPG|350px|miniatura|derecha|Tensión de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%Creación matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=(r-1)./(5.*r).*cos(t);&lt;br /&gt;
     sigma(1,2)=(2-r)./10.*sin(t);&lt;br /&gt;
     sigma(2,1)=(2-r)./10.*sin(t);&lt;br /&gt;
     sigma(2,2)=(2.*r.^2-r-1)./(5.*r).*cos(t);&lt;br /&gt;
     sigma(3,3)=(r-1)./(5.*r).*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Fórmula de Tensión de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                %Pasamos a cartesianas  &lt;br /&gt;
xx=RR.*cos(TT);        &lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (2,0) y en (2,π).&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
El campo de fuerzas que actúa sobre la placa sigue la siguiente fórmula  F = −∇ · σ. En la gráfica podemos apreciar claramente cómo actúa sobre el sólido este campo y podríamos intuir qué desplazamiento y deformación sufriría.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Campo de fuerzas sobre el sólido.JPG|400px|miniatura|derecha|Campo de fuerzas que recibe la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
z=0.*x;  &lt;br /&gt;
hold on&lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                 &lt;br /&gt;
axis ([-3,3,-1,3])             &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=(2.*RR.^2-RR.^3-1)./(5.*RR.^2).*cos(TT);&lt;br /&gt;
b=-(2.*RR.^2-2.*RR-1)./(5.*RR).*sin(TT);&lt;br /&gt;
c=-1./RR.*cos(TT);&lt;br /&gt;
w=quiver3(x,y,z,a,b,c);&lt;br /&gt;
axis ([-3,3,-1,3,-1,1])&lt;br /&gt;
title('Campo de fuerzas','Fontsize',18);&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
view(2)&lt;br /&gt;
hold off&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47812</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47812"/>
				<updated>2021-12-10T09:46:56Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|200px|miniatura|derecha|Representacion del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|450px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del grafico se deduce que la temperatura aumenta en la direccion negativa de x. Por lo tanto, el valor maximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt;e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;/math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:Campovectoresxx.png|300px|miniatura|derecha|Campo de Vectores]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
[[Archivo:Desplazamientoss.png|450px|miniatura|derecha|Comparacion antes y despues]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en ez.&lt;br /&gt;
Calculamos su modulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Observamos en el grafico que los puntos que sufren un mayor rotacional son los que se aproximan al punto (ρ, θ) = (1,π/2).&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
[[Archivo:Graficovm.png|350px|miniatura|derecha|Tension de Von Mises]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Como se observa, el mayor valor se alcanza cuando (ρ, θ) = (1,π/2). Sin embargo, cuando θ=π/2 todos los valores de ρ se pueden considerar &amp;quot;de riesgo&amp;quot;.&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Desplazamientoss.png&amp;diff=47811</id>
		<title>Archivo:Desplazamientoss.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Desplazamientoss.png&amp;diff=47811"/>
				<updated>2021-12-10T09:40:42Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Campovectoresxx.png&amp;diff=47810</id>
		<title>Archivo:Campovectoresxx.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Campovectoresxx.png&amp;diff=47810"/>
				<updated>2021-12-10T09:38:26Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Graficovm.png&amp;diff=47809</id>
		<title>Archivo:Graficovm.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Graficovm.png&amp;diff=47809"/>
				<updated>2021-12-10T09:31:42Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47808</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47808"/>
				<updated>2021-12-10T09:28:53Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Malladooox.png|200px|miniatura|derecha|Representacion del mallado]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
[[Archivo:Cniveltemperaturas.png|450px|miniatura|derecha|Temperaturas]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
Del grafico se deduce que la temperatura aumenta en la direccion negativa de x. Por lo tanto, el valor maximo se alcanza cuando x=-2.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt;e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;/math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo]]&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: [[Archivo: DivU.png]]&lt;br /&gt;
&lt;br /&gt;
[[Archivo:divergenciaU.png|300px|miniatura|derecha|Divergencia]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
Continuamos calculando el rotacional, con resultado: [[Archivo: Formularottt.png]] en ez.&lt;br /&gt;
Calculamos su modulo y graficamos:&lt;br /&gt;
[[Archivo:Rotacionall.png|450px|miniatura|derecha|Rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Formularottt.png&amp;diff=47807</id>
		<title>Archivo:Formularottt.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Formularottt.png&amp;diff=47807"/>
				<updated>2021-12-10T09:26:57Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Rotacionall.png&amp;diff=47806</id>
		<title>Archivo:Rotacionall.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Rotacionall.png&amp;diff=47806"/>
				<updated>2021-12-10T09:23:08Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Cniveltemperaturas.png&amp;diff=47805</id>
		<title>Archivo:Cniveltemperaturas.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Cniveltemperaturas.png&amp;diff=47805"/>
				<updated>2021-12-10T09:17:29Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Malladooox.png&amp;diff=47802</id>
		<title>Archivo:Malladooox.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Malladooox.png&amp;diff=47802"/>
				<updated>2021-12-10T09:15:00Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:DivergenciaU.png&amp;diff=47800</id>
		<title>Archivo:DivergenciaU.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:DivergenciaU.png&amp;diff=47800"/>
				<updated>2021-12-10T09:10:54Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Divergencia.gif&amp;diff=47797</id>
		<title>Archivo:Divergencia.gif</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Divergencia.gif&amp;diff=47797"/>
				<updated>2021-12-10T09:06:50Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:DivU.png&amp;diff=47796</id>
		<title>Archivo:DivU.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:DivU.png&amp;diff=47796"/>
				<updated>2021-12-10T09:03:22Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47795</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47795"/>
				<updated>2021-12-10T09:01:22Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt;e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;/math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo]]&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
A continuacion, calculamos la divergencia del campo vectorial. La divergencia es una medida del cambio de volumen local debido al desplazamiento.&lt;br /&gt;
Al calcularla nos queda: &lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
Del grafico se puede deducir que la divergencia toma valores maximos en el punto (ρ, θ) = (2,0) y valores minimos en el punto (ρ, θ) = (2,π).&lt;br /&gt;
Por otro lado, vemos que la divergencia es nula cuando ρ=1 (cualquiera sea el θ) y cuando θ=π/2 (cualquiera sea el ρ).&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
Debemos calcular la Tension de Von Mises. Se trata de una magnitud escalar que se suele usar como indicador para saber cuando un material&lt;br /&gt;
inicia un comportamiento plastico.&lt;br /&gt;
[[Archivo: TVONMISES.png]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:TVONMISES.png&amp;diff=47790</id>
		<title>Archivo:TVONMISES.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:TVONMISES.png&amp;diff=47790"/>
				<updated>2021-12-10T08:31:26Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: Formula de la Tension de Von Mises&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;Formula de la Tension de Von Mises&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47784</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47784"/>
				<updated>2021-12-10T08:16:50Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt;e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;/math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo]]&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                          %Paso de muestreo                                 &lt;br /&gt;
rr= 1:h:2;                       %Usamos coordenadas polares&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);        %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
                                 %Sólido antes de los desplazamientos&lt;br /&gt;
subplot(1,2,1)                  &lt;br /&gt;
i=mesh(x,y,0*x);&lt;br /&gt;
view(2)&lt;br /&gt;
set(i,'EdgeColor','g');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa no desplazada','Fontsize',16); &lt;br /&gt;
                                 %Sólido después de los desplazamientos&lt;br /&gt;
subplot(1,2,2)                     &lt;br /&gt;
A=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
B=((RR-1)./5).*(cos(TT).*sin(TT)); &lt;br /&gt;
X=x+A;&lt;br /&gt;
Y=y+B;&lt;br /&gt;
j=mesh(X,Y,0*X);&lt;br /&gt;
view(2)&lt;br /&gt;
set(j,'EdgeColor','r');&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
title('Placa desplazada','Fontsize',16);&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                        %Paso de muestreo&lt;br /&gt;
                               %Usamos coordenadas polares&lt;br /&gt;
rr= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);      %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
DIVu=((1)./RR).*(cos(TT).*((RR-1)./5)); %Divergencia de u&lt;br /&gt;
surf(x,y,DIVu);&lt;br /&gt;
view(2);&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Divergencia','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;                                       %Paso de muestreo                                &lt;br /&gt;
rr=1:h:2;                                    %Usamos coordenadas polares&lt;br /&gt;
tt=0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);                    %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);&lt;br /&gt;
ROTu=abs((sin(TT)./(5.*RR)).*(2-((1)./RR))); %Modulo del rotacional de u&lt;br /&gt;
                                             %Rotacional en 2-D&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
surf (x,y,ROTu);&lt;br /&gt;
axis equal&lt;br /&gt;
view(2);&lt;br /&gt;
colorbar;&lt;br /&gt;
title('Rotacional en 2-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
                                            %Rotacional en 3-D&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
surf(x,y,ROTu);               &lt;br /&gt;
colorbar&lt;br /&gt;
title('Rotacional en 3-D', 'Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
zlabel('Eje Z')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h=0.1;&lt;br /&gt;
rr=[1:h:2];&lt;br /&gt;
tt=[0:h:pi];&lt;br /&gt;
[RR,TT]=meshgrid(rr,tt); &lt;br /&gt;
sigma=zeros(3,3);%%Creacion matriz sigma y de Von Mises              &lt;br /&gt;
VM=zeros(32,11); %Tomando cada punto del mallado (dimensiones)&lt;br /&gt;
for i=1:32*11&lt;br /&gt;
     r=RR(i)';&lt;br /&gt;
     t=TT(i)';&lt;br /&gt;
     sigma(1,1)=((r-1)/5*r)*cos(t);&lt;br /&gt;
     sigma(1,2)=sin(t)/10;&lt;br /&gt;
     sigma(2,1)=sin(t)/5;&lt;br /&gt;
     sigma(2,2)=(r-1)*cos(t)*((2/5)+(1/(5*r)));&lt;br /&gt;
     sigma(3,3)=((r-1)/5)*cos(t);&lt;br /&gt;
     [v,d]=eig(sigma);                           %obtenemos autovalores&lt;br /&gt;
     VM(i)=sqrt(((d(1,1)-d(2,2))^2+(d(2,2)-d(3,3))^2+(d(3,3)-d(1,1))^2)/2);  %Formula de Tension de Von Mises&lt;br /&gt;
end&lt;br /&gt;
                 &lt;br /&gt;
xx=RR.*cos(TT);         %Pasamos a cartesianas&lt;br /&gt;
yy=RR.*sin(TT);&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
title('Tension de Von Mises')&lt;br /&gt;
axis([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar&lt;br /&gt;
view(2)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47780</id>
		<title>Deformación de un semianillo plano Grupo 4-A</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Deformaci%C3%B3n_de_un_semianillo_plano_Grupo_4-A&amp;diff=47780"/>
				<updated>2021-12-10T07:46:55Z</updated>
		
		<summary type="html">&lt;p&gt;Pedro.michelini: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ Trabajo | Deformación de un semianillo plano Grupo 4-A | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC21/22|Curso 2021/22]] | Jaime Guerrero Suárez, Sergio Míguez González, Pedro Michelini}}&lt;br /&gt;
&lt;br /&gt;
{| class=&amp;quot;wikitable&amp;quot;&lt;br /&gt;
|-&lt;br /&gt;
! '''Trabajo realizado por estudiantes'''&lt;br /&gt;
|-&lt;br /&gt;
| Título || Deformación de un semianillo plano Grupo 4-A&lt;br /&gt;
|-&lt;br /&gt;
| Asignatura || [[Categoría:Teoría de Campos|Teoría de Campos]]&lt;br /&gt;
|-&lt;br /&gt;
| Curso || 2021/22&lt;br /&gt;
|-&lt;br /&gt;
| Autores || Jaime Guerrero Suárez&lt;br /&gt;
Sergio Míguez González&lt;br /&gt;
Pedro Michelini&lt;br /&gt;
|-&lt;br /&gt;
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura.&lt;br /&gt;
|}&lt;br /&gt;
&lt;br /&gt;
=Enunciado=&lt;br /&gt;
&lt;br /&gt;
&amp;lt;p&amp;gt;Consideramos una placa plana que ocupa la mitad de un anillo circular centrado en el origen y comprendido entre los radios 1 y 2, en el plano y ≥ 0. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la temperatura \(T(x,y,t)\), que viene dada por &amp;lt;math&amp;gt;T(x, y) = log((x − 3)^2 + 2)&amp;lt;/math&amp;gt;, y los desplazamientos \(\vec u(x,y,t)\) producidos por la acción de una fuerza determinada. De esta forma, si definimos \(r_0(x,y)\) el vector de posición de los puntos de la placa en reposo, la posición de cada punto \((x,y)\) de la placa después de la deformación viene dada por \(r(x, y) = ~r0(x, y) + ~u(x, y)\).&lt;br /&gt;
Vamos a suponer que la fuerza aplicada sobre la placa ha provocado un desplazamiento de los puntos&lt;br /&gt;
de la misma dado por el vector de desplazamientos &amp;lt;math&amp;gt;\vec u(ρ, θ) = ρ − 1&lt;br /&gt;
5&lt;br /&gt;
sin(θ)~eθ&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
=Mallado=&lt;br /&gt;
&lt;br /&gt;
Comenzamos la representación del sólido definiendo un mallado siguiendo las directrices del enunciado: &amp;quot;Tomar los ejes (comando&lt;br /&gt;
axis) en el rectángulo (x, y) ∈ [-3; 3] × [−1; 3] y como paso de muestreo h = 1/10 para&lt;br /&gt;
las variables x e y. Al tratarse de una figura plana en 2D, la componente z es nula.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                                                        &lt;br /&gt;
mesh(x,y,0.*x)                  %Visualización de la placa&lt;br /&gt;
view(2)                           &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación de la temperatura=&lt;br /&gt;
&lt;br /&gt;
Una vez tenemos bien definido el mallado (que representa al propio sólido), pasamos a la representación de la temperatura a partir de la función &amp;lt;math&amp;gt;T(x, y) = log((x − 3)2 + 2)&amp;lt;/math&amp;gt;. Para llevarla a cabo, representamos el campo escalar, donde se puede observar la posición de la Temperatura máxima (en el punto (-2,0.1). Además, hemos definido una serie de curvas de nivel para poder apreciar mejor el cambio de temperatura a lo largo de la placa.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                           %Paso de muestreo&lt;br /&gt;
r= 1:h:2;&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(r,tt);       %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);  &lt;br /&gt;
T=log10((x-3).^2 + 2);&lt;br /&gt;
hold on&lt;br /&gt;
subplot(1,2,1)                %Dividimos la pantalla en dos&lt;br /&gt;
surf(x,y,T)                   %Representamos el campo escalar de temperaturas&lt;br /&gt;
view(2)&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
colorbar                      %Mostramos la escala&lt;br /&gt;
subplot(1,2,2)                %Escribimos en la segunda pantalla&lt;br /&gt;
contour(x,y,T,30)&lt;br /&gt;
title('Curvas de Nivel','Fontsize',16)      %Líneas de nivel&lt;br /&gt;
colorbar                      %Mostramos las escala&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
hold off    &lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Gradiente de Temperatura=&lt;br /&gt;
&lt;br /&gt;
El siguiente paso después de observar el campo de la temperatura es calcular el gradiente de esta misma función y dibujarlo como campo vectorial. El cálculo del gradiente es sencillo y consiste en &lt;br /&gt;
&amp;lt;gallery&amp;gt;&lt;br /&gt;
Formulagradiente.png|Fórmula del gradiente de una función&lt;br /&gt;
&amp;lt;/gallery&amp;gt;&lt;br /&gt;
En nuestro caso, el gradiente calculado manualmente nos da &amp;lt;math&amp;gt;\nabla T=\frac{2(x-3)}{(x-3)^2+2}\vec i\&amp;lt;/math&amp;gt;. Como sabemos, por definición el gradiente es siempre perpendicular a la función original. Una vez que lo tenemos ya calculado, podemos observarlo y confirmar que, efectivamente, se trata de un campo vectorial perpendicular a las curvas de nivel formadas por la temperatura.&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Representación del campo vectorial de deformaciones=&lt;br /&gt;
&lt;br /&gt;
Ahora nos centraremos en el campo u de deformaciones, definido en el enunciado en coordenadas cilíndricas (factor a tener en cuenta). No necesitamos calcularlo, pero sí convertir la dirección de e&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; en las direcciones \(\vec i\) y \(\vec j\) para poder representarlo sin problema en la misma cuadrícula. Aplicamos la equivalencia &amp;lt;math&amp;gt;e_θ=\frac{-x_2\vec i\+x_1\vec j\}{ρ}=-sin(θ)\vec i\+cos(θ)\vec j\&amp;lt;/math&amp;gt;.&lt;br /&gt;
El nuevo campo \(\vec u\) nos queda de la siguiente forma: &amp;lt;math&amp;gt;\vec u=-\frac{ρ-1}{5}cos(θ)sin(θ)\vec i+\frac{ρ-1}{5}cos_2(θ)\vec j\&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
h= 0.1;                     %Paso de muestreo                              &lt;br /&gt;
rr= 1:h:2;                  %Usamos coordenadas polares.&lt;br /&gt;
tt= 0:h:pi;&lt;br /&gt;
[RR,TT]= meshgrid(rr,tt);   %Mallado&lt;br /&gt;
x=RR.*cos(TT);&lt;br /&gt;
y=RR.*sin(TT);                     &lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
a=-((RR-1)./5).*((sin(TT)).^2);&lt;br /&gt;
b=((RR-1)./5).*(cos(TT).*sin(TT));&lt;br /&gt;
w=quiver(x,y,a,b);                       %Representacion de los vectores&lt;br /&gt;
axis ([-3,3,-1,3])&lt;br /&gt;
title('Campo de vectores','Fontsize',16);&lt;br /&gt;
xlabel('Eje X')&lt;br /&gt;
ylabel('Eje Y')&lt;br /&gt;
set(w,'maxheadsize',0.33)&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo]]&lt;br /&gt;
&lt;br /&gt;
=Desplazamiento del mallado producido por el campo vectorial=&lt;br /&gt;
&lt;br /&gt;
Ya tenemos el campo vectorial del desplazamiento, por lo que vamos a poder observar la deformación en la placa antes y después de la acción del campo u:&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Divergencia del campo vectorial=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Rotacional del campo vectorial=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensiones normales a los ejes coordenados=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=Tensiones tangenciales respecto al plano ortogonal a \(\vec i\)=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Tensión de Von Mises=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
=Campo de fuerzas \(\vec F\) que actúa sobre la placa=&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
}}&lt;br /&gt;
&lt;br /&gt;
[[Archivo:]]&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC21/22]]&lt;/div&gt;</summary>
		<author><name>Pedro.michelini</name></author>	</entry>

	</feed>