<?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=Iv%C3%A1n+D%C3%ADez</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=Iv%C3%A1n+D%C3%ADez"/>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/wiki/Especial:Contribuciones/Iv%C3%A1n_D%C3%ADez"/>
		<updated>2026-04-23T14:59:51Z</updated>
		<subtitle>Contribuciones del usuario</subtitle>
		<generator>MediaWiki 1.26.2</generator>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23055</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23055"/>
				<updated>2014-12-15T23:06:48Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensión de Von Mises */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy'' respectivamente.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Estos apartados siguientes podríamos omitirlos, pero como los empleamos a la hora de hacer el programa y la correspondiente captura &lt;br /&gt;
%de pantalla en matlab, los pondremos a modo explicativo, pero no son necesarios.&lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. Definiremos las funciones de desplazamiento (desx, desy) en función de ambas componentes, sumando las componentes del vector de desplazamientos a las coordenadas respectivas de posición. (como vemos en las líneas 8 y 10, de nuestro programa)&lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
Hemos calculado el rotacional a mano, en un papel aparte, obteniendo que es '''Rot [ ū(ρ,θ) ] = 4ρ&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt; - 6ρ + 2''' .&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
Los puntos que sufren un mayor rotacional son aquellos que mayor coordenada Z tienen.&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca los vectores ''i'' y ''j'', los cuales en nuestro trabajo sustiruiremos por ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' y ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' respectivamente, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional. A modo de explicación podríamos decir que las tensiones tangenciales representadas hacen referencia a esfuerzos cortantes del material.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial. Esta zona es casi la más externa de la corona circular, sin llegar a ser lo más externa posible pues como vemos en el dibujo empezaría a disminuir, tomando un color amarillo, en vez de rojo.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores. A mayor altura (z) estas tensiones serán también mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos. Los autovalores calculados son los de la matriz de tensiones. Los hemos calculado aparte en matlab usando la sugerencia del comando 'Eig'.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23016</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23016"/>
				<updated>2014-12-15T22:03:49Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensiones tangenciales respecto al plano ortogonal a gρ */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy'' respectivamente.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Estos apartados siguientes podríamos omitirlos, pero como los empleamos a la hora de hacer el programa y la correspondiente captura &lt;br /&gt;
%de pantalla en matlab, los pondremos a modo explicativo, pero no son necesarios.&lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. Definiremos las funciones de desplazamiento (desx, desy) en función de ambas componentes, sumando las componentes del vector de desplazamientos a las coordenadas respectivas de posición. (como vemos en las líneas 8 y 10, de nuestro programa)&lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
Hemos calculado el rotacional a mano, en un papel aparte, obteniendo que es '''Rot [ ū(ρ,θ) ] = 4ρ&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt; - 6ρ + 2''' .&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
Los puntos que sufren un mayor rotacional son aquellos que mayor coordenada Z tienen.&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca los vectores ''i'' y ''j'', los cuales en nuestro trabajo sustiruiremos por ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' y ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' respectivamente, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional. A modo de explicación podríamos decir que las tensiones tangenciales representadas hacen referencia a esfuerzos cortantes del material.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial. Esta zona es casi la más externa de la corona circular, sin llegar a ser lo más externa posible pues como vemos en el dibujo empezaría a disminuir, tomando un color amarillo, en vez de rojo.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores. A mayor altura (z) estas tensiones serán también mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23015</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23015"/>
				<updated>2014-12-15T21:52:30Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Sólido antes y después del desplazamiento */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy'' respectivamente.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Estos apartados siguientes podríamos omitirlos, pero como los empleamos a la hora de hacer el programa y la correspondiente captura &lt;br /&gt;
%de pantalla en matlab, los pondremos a modo explicativo, pero no son necesarios.&lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. Definiremos las funciones de desplazamiento (desx, desy) en función de ambas componentes, sumando las componentes del vector de desplazamientos a las coordenadas respectivas de posición. (como vemos en las líneas 8 y 10, de nuestro programa)&lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
Hemos calculado el rotacional a mano, en un papel aparte, obteniendo que es '''Rot [ ū(ρ,θ) ] = 4ρ&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt; - 6ρ + 2''' .&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
Los puntos que sufren un mayor rotacional son aquellos que mayor coordenada Z tienen.&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca los vectores ''i'' y ''j'', los cuales en nuestro trabajo sustiruiremos por ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' y ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' respectivamente, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial. Esta zona es casi la más externa de la corona circular, sin llegar a ser lo más externa posible pues como vemos en el dibujo empezaría a disminuir, tomando un color amarillo, en vez de rojo.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores. A mayor altura (z) estas tensiones serán también mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23014</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23014"/>
				<updated>2014-12-15T21:51:58Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Sólido antes y después del desplazamiento */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy'' respectivamente.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Estos apartados siguientes podríamos omitirlos, pero como los empleamos a la hora de hacer el programa y la correspondiente captura &lt;br /&gt;
%de pantalla en matlab, los pondremos a modo explicativo, pero no son necesarios.&lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. Definiremos las funciones de desplazamiento (desx, desy) en función de ambas componentes, sumando las componentes del vector de desplazamientos a las coordenadas respectivas de posición.&lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
Hemos calculado el rotacional a mano, en un papel aparte, obteniendo que es '''Rot [ ū(ρ,θ) ] = 4ρ&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt; - 6ρ + 2''' .&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
Los puntos que sufren un mayor rotacional son aquellos que mayor coordenada Z tienen.&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca los vectores ''i'' y ''j'', los cuales en nuestro trabajo sustiruiremos por ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' y ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' respectivamente, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial. Esta zona es casi la más externa de la corona circular, sin llegar a ser lo más externa posible pues como vemos en el dibujo empezaría a disminuir, tomando un color amarillo, en vez de rojo.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores. A mayor altura (z) estas tensiones serán también mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23013</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23013"/>
				<updated>2014-12-15T21:49:16Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Campo de desplazamientos ū */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy'' respectivamente.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Estos apartados siguientes podríamos omitirlos, pero como los empleamos a la hora de hacer el programa y la correspondiente captura &lt;br /&gt;
%de pantalla en matlab, los pondremos a modo explicativo, pero no son necesarios.&lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
Hemos calculado el rotacional a mano, en un papel aparte, obteniendo que es '''Rot [ ū(ρ,θ) ] = 4ρ&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt; - 6ρ + 2''' .&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
Los puntos que sufren un mayor rotacional son aquellos que mayor coordenada Z tienen.&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca los vectores ''i'' y ''j'', los cuales en nuestro trabajo sustiruiremos por ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' y ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' respectivamente, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial. Esta zona es casi la más externa de la corona circular, sin llegar a ser lo más externa posible pues como vemos en el dibujo empezaría a disminuir, tomando un color amarillo, en vez de rojo.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores. A mayor altura (z) estas tensiones serán también mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23012</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23012"/>
				<updated>2014-12-15T21:48:09Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Campo de desplazamientos ū */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy''.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Estos apartados siguientes podríamos omitirlos, pero como los empleamos a la hora de hacer el programa y la correspondiente captura &lt;br /&gt;
%de pantalla en matlab, los pondremos a modo explicativo, pero no son necesarios.&lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
Hemos calculado el rotacional a mano, en un papel aparte, obteniendo que es '''Rot [ ū(ρ,θ) ] = 4ρ&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt; - 6ρ + 2''' .&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
Los puntos que sufren un mayor rotacional son aquellos que mayor coordenada Z tienen.&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca los vectores ''i'' y ''j'', los cuales en nuestro trabajo sustiruiremos por ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' y ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' respectivamente, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial. Esta zona es casi la más externa de la corona circular, sin llegar a ser lo más externa posible pues como vemos en el dibujo empezaría a disminuir, tomando un color amarillo, en vez de rojo.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores. A mayor altura (z) estas tensiones serán también mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23011</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23011"/>
				<updated>2014-12-15T21:47:51Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Campo de desplazamientos ū */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy''.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Estos apartados siguientes podríamos omitirlos, pero como los empleamos a la hora de hacer el programa y la correspondiente captura &lt;br /&gt;
de pantalla en matlab, los pondremos a modo explicativo, pero no son necesarios.&lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
Hemos calculado el rotacional a mano, en un papel aparte, obteniendo que es '''Rot [ ū(ρ,θ) ] = 4ρ&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt; - 6ρ + 2''' .&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
Los puntos que sufren un mayor rotacional son aquellos que mayor coordenada Z tienen.&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca los vectores ''i'' y ''j'', los cuales en nuestro trabajo sustiruiremos por ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' y ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' respectivamente, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial. Esta zona es casi la más externa de la corona circular, sin llegar a ser lo más externa posible pues como vemos en el dibujo empezaría a disminuir, tomando un color amarillo, en vez de rojo.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores. A mayor altura (z) estas tensiones serán también mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23010</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=23010"/>
				<updated>2014-12-15T21:47:33Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Campo de desplazamientos ū */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy''.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Estos apartados siguientes podríamos omitirlos, pero como los empleamos a la hora de hacer el programa y la correspondiente captura de pantalla en matlab, los pondremos a modo explicativo, pero no son necesarios.&lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
Hemos calculado el rotacional a mano, en un papel aparte, obteniendo que es '''Rot [ ū(ρ,θ) ] = 4ρ&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt; - 6ρ + 2''' .&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
Los puntos que sufren un mayor rotacional son aquellos que mayor coordenada Z tienen.&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca los vectores ''i'' y ''j'', los cuales en nuestro trabajo sustiruiremos por ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' y ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' respectivamente, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial. Esta zona es casi la más externa de la corona circular, sin llegar a ser lo más externa posible pues como vemos en el dibujo empezaría a disminuir, tomando un color amarillo, en vez de rojo.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores. A mayor altura (z) estas tensiones serán también mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21566</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21566"/>
				<updated>2014-12-05T10:58:44Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensiones tangenciales respecto al plano ortogonal a gθ/ρ */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy''.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
Hemos calculado el rotacional a mano, en un papel aparte, obteniendo que es '''Rot [ ū(ρ,θ) ] = 4ρ&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt; - 6ρ + 2''' .&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
Los puntos que sufren un mayor rotacional son aquellos que mayor coordenada Z tienen.&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca los vectores ''i'' y ''j'', los cuales en nuestro trabajo sustiruiremos por ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' y ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' respectivamente, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial. Esta zona es casi la más externa de la corona circular, sin llegar a ser lo más externa posible pues como vemos en el dibujo empezaría a disminuir, tomando un color amarillo, en vez de rojo.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores. A mayor altura (z) estas tensiones serán también mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21555</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21555"/>
				<updated>2014-12-05T10:55:57Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensiones tangenciales respecto al plano ortogonal a gρ */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy''.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
Hemos calculado el rotacional a mano, en un papel aparte, obteniendo que es '''Rot [ ū(ρ,θ) ] = 4ρ&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt; - 6ρ + 2''' .&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
Los puntos que sufren un mayor rotacional son aquellos que mayor coordenada Z tienen.&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca los vectores ''i'' y ''j'', los cuales en nuestro trabajo sustiruiremos por ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' y ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' respectivamente, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial. Esta zona es casi la más externa de la corona circular, sin llegar a ser lo más externa posible pues como vemos en el dibujo empezaría a disminuir, tomando un color amarillo, en vez de rojo.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21541</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21541"/>
				<updated>2014-12-05T10:51:36Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensor de tensiones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy''.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
Hemos calculado el rotacional a mano, en un papel aparte, obteniendo que es '''Rot [ ū(ρ,θ) ] = 4ρ&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt; - 6ρ + 2''' .&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
Los puntos que sufren un mayor rotacional son aquellos que mayor coordenada Z tienen.&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca los vectores ''i'' y ''j'', los cuales en nuestro trabajo sustiruiremos por ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' y ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' respectivamente, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21531</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21531"/>
				<updated>2014-12-05T10:47:20Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy''.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
Hemos calculado el rotacional a mano, en un papel aparte, obteniendo que es '''Rot [ ū(ρ,θ) ] = 4ρ&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt; - 6ρ + 2''' .&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
Los puntos que sufren un mayor rotacional son aquellos que mayor coordenada Z tienen.&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21528</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21528"/>
				<updated>2014-12-05T10:45:48Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy''.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
Hemos calculado el rotacional a mano, en un papel aparte, obteniendo que es '''Rot [ ū(ρ,θ) ] = 4ρ&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt; - 6ρ + 2''' .&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21526</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21526"/>
				<updated>2014-12-05T10:45:22Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy''.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
Hemos calculado el rotacional a mano, en un papel aparte, obteniendo que es '''Rot [ ū(ρ,θ) ] = 4ρ&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt; - 6ρ + 2'''&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21524</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21524"/>
				<updated>2014-12-05T10:44:37Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Rotacional */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy''.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
Hemos calculado el rotacional a mano, en un papel aparte, obteniendo que es ''''Rot[ū(ρ,θ)]=2 + 4ρ&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt; - 6ρ'''&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21517</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21517"/>
				<updated>2014-12-05T10:39:53Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Divergencia */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy''.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
Considerando la divergencia como una medida del cambio de volumen local debido al desplazamiento, al ser esta nula, no habrá ningunn cambio de volumen a causa del desplazamiento.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21504</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21504"/>
				<updated>2014-12-05T10:32:06Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Campo de desplazamientos ū */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''. Definiremos pues, ''fx'' y ''fy''.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21502</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21502"/>
				<updated>2014-12-05T10:31:22Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Campo de desplazamientos ū */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
Sabemos que g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt; = -ρ·sen(θ)i + ρ·cos(θ)j. Por ello divididermos y definimos el campo en función de los dos componente '''i''','''j'''.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21453</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21453"/>
				<updated>2014-12-05T10:10:44Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Campo de temperaturas del sólido */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21411</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21411"/>
				<updated>2014-12-05T09:38:12Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Masa total */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha, que aún no siendo necesario nos proporciona una idea un poco más visual. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21408</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21408"/>
				<updated>2014-12-05T09:37:04Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Masa total */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|300px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21405</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21405"/>
				<updated>2014-12-05T09:36:48Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensiones tangenciales respecto al plano ortogonal a gθ/ρ */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|350px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21403</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21403"/>
				<updated>2014-12-05T09:36:29Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensiones tangenciales respecto al plano ortogonal a gρ */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|400px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|350px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|350px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21401</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21401"/>
				<updated>2014-12-05T09:36:13Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensor de tensiones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|400px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|350px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|350px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|350px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21399</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=21399"/>
				<updated>2014-12-05T09:35:51Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Mallado de los puntos interiores del sólido */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|250px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|350px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|350px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|350px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|350px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20748</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20748"/>
				<updated>2014-12-04T19:08:07Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Divergencia */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|250px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|350px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|350px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|350px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|350px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20745</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20745"/>
				<updated>2014-12-04T19:07:44Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|350px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|350px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|350px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|350px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20742</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20742"/>
				<updated>2014-12-04T19:06:26Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|350px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|350px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|350px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|350px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|350px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|350px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|350px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|350px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|350px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|350px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20300</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20300"/>
				<updated>2014-12-04T12:07:07Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|&lt;br /&gt;
'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20297</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20297"/>
				<updated>2014-12-04T12:06:23Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Masa total */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
A partir de la función de densidad  '''d(x,y,z)=xylog(x+2)''' calculamos la masa y la representamos en el gráfico de la derecha. Con el método del trapecio hallamos una aproximación del valor de la integral, dividiendo la proyección del sólido en cuadrados de lado h=1/1000 para mayor precisión.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20291</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20291"/>
				<updated>2014-12-04T12:01:44Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Masa total */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello usaremos como función de densidad  '''d(x,y,z)=xylog(x+2)''' a partir de la cual calculamos la masa y la representamos en el gráfico de la derecha.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%En primer lugar vamos a dibujar la gráfica de distribución de la masa&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Sabemos que densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Calculamos el volumen a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
&lt;br /&gt;
%En segundo lugar, vamos a calcular la integral de la densidad&lt;br /&gt;
%Método del trapecio&lt;br /&gt;
%Definimos las particiones de los rectángulos&lt;br /&gt;
h=1/1000;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20287</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20287"/>
				<updated>2014-12-04T11:57:45Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Masa total */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello usaremos como función de densidad  '''d(x,y,z)=xylog(x+2)''' a partir de la cual calculamos la masa y la representamos en el gráfico de la derecha.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar &lt;br /&gt;
%Hallamos la integral de la densidad&lt;br /&gt;
h=1/1000;;&lt;br /&gt;
%Definimos nuestra función de densidad&lt;br /&gt;
f=(uu.*vv.*exp((-1)./(uu.^2)));&lt;br /&gt;
a=(h^2)*f;&lt;br /&gt;
%Nos muestra el resultado&lt;br /&gt;
masa=sum(sum(a))&lt;br /&gt;
}}                      &lt;br /&gt;
LA MASA TOTAL ES: M=0.0021&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20248</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20248"/>
				<updated>2014-12-04T11:28:14Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensión de Von Mises */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ y la representamos.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
En la gráfica podemos apreciar en que punto la tensión es mayor.&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello usaremos como función de densidad  '''d(x,y,z)=xylog(x+2)''' a partir de la cual calculamos la masa y la representamos en el gráfico de la derecha.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20246</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20246"/>
				<updated>2014-12-04T11:27:02Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensiones tangenciales respecto al plano ortogonal a gθ/ρ */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibujamos la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Hemos variado la posición de la figura para verla como se nos pide.&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Tenemos el módulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Dibujamos la malla de la divergencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Dibujamos la malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello usaremos como función de densidad  '''d(x,y,z)=xylog(x+2)''' a partir de la cual calculamos la masa y la representamos en el gráfico de la derecha.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20235</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20235"/>
				<updated>2014-12-04T11:21:50Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensiones tangenciales respecto al plano ortogonal a gθ/ρ */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, al igual que en el apartado anterior.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos donde las tensiones son mayores.&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello usaremos como función de densidad  '''d(x,y,z)=xylog(x+2)''' a partir de la cual calculamos la masa y la representamos en el gráfico de la derecha.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20231</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20231"/>
				<updated>2014-12-04T11:20:27Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensiones tangenciales respecto al plano ortogonal a j */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ . Igual que en el apartado anterior, diremos dónde es mayor y las comparamos con el módulo de divergencia y rotacional.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello usaremos como función de densidad  '''d(x,y,z)=xylog(x+2)''' a partir de la cual calculamos la masa y la representamos en el gráfico de la derecha.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20225</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20225"/>
				<updated>2014-12-04T11:18:42Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensiones tangenciales respecto al plano ortogonal a gρ */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial.&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''j'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ . Igual que en el apartado anterior, diremos dónde es mayor y las comparamos con el módulo de divergencia y rotacional.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello usaremos como función de densidad  '''d(x,y,z)=xylog(x+2)''' a partir de la cual calculamos la masa y la representamos en el gráfico de la derecha.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20220</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20220"/>
				<updated>2014-12-04T11:18:08Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensiones tangenciales respecto al plano ortogonal a gρ */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
En la gráfica apreciamos las zonas de mayor tensión tangencial&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''j'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ . Igual que en el apartado anterior, diremos dónde es mayor y las comparamos con el módulo de divergencia y rotacional.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello usaremos como función de densidad  '''d(x,y,z)=xylog(x+2)''' a partir de la cual calculamos la masa y la representamos en el gráfico de la derecha.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20218</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20218"/>
				<updated>2014-12-04T11:17:48Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031) &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''j'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ . Igual que en el apartado anterior, diremos dónde es mayor y las comparamos con el módulo de divergencia y rotacional.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello usaremos como función de densidad  '''d(x,y,z)=xylog(x+2)''' a partir de la cual calculamos la masa y la representamos en el gráfico de la derecha.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20211</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20211"/>
				<updated>2014-12-04T11:16:54Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensiones tangenciales respecto al plano ortogonal a gρ */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;, junto a la divergencia y el rotacional&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''j'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ . Igual que en el apartado anterior, diremos dónde es mayor y las comparamos con el módulo de divergencia y rotacional.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello usaremos como función de densidad  '''d(x,y,z)=xylog(x+2)''' a partir de la cual calculamos la masa y la representamos en el gráfico de la derecha.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20209</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20209"/>
				<updated>2014-12-04T11:16:33Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Masa total */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;. Indicamos donde son mayores y comparamos esta gráfica también con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''j'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ . Igual que en el apartado anterior, diremos dónde es mayor y las comparamos con el módulo de divergencia y rotacional.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello usaremos como función de densidad  '''d(x,y,z)=xylog(x+2)''' a partir de la cual calculamos la masa y la representamos en el gráfico de la derecha.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20208</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20208"/>
				<updated>2014-12-04T11:16:08Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Masa total */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;. Indicamos donde son mayores y comparamos esta gráfica también con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''j'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ . Igual que en el apartado anterior, diremos dónde es mayor y las comparamos con el módulo de divergencia y rotacional.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello usaremos como función de densidad  '''d(x,y,z)=xylog(x+2)''' a partir de la cual pcalculamos la masa y la representamos en el gráfico de la derecha.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20207</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20207"/>
				<updated>2014-12-04T11:16:04Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensiones tangenciales respecto al plano ortogonal a gρ */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;. Indicamos donde son mayores y comparamos esta gráfica también con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogonal g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''j'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ . Igual que en el apartado anterior, diremos dónde es mayor y las comparamos con el módulo de divergencia y rotacional.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello nos indican la función densidad de nuestra placa a partir de la cual podremos hallar la masa y representarla.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar      }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20200</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20200"/>
				<updated>2014-12-04T11:15:16Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensiones tangenciales respecto al plano ortogonal a gρ */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;. Indicamos donde son mayores y comparamos esta gráfica también con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogona a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''j'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ . Igual que en el apartado anterior, diremos dónde es mayor y las comparamos con el módulo de divergencia y rotacional.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello nos indican la función densidad de nuestra placa a partir de la cual podremos hallar la masa y representarla.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar      }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20194</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20194"/>
				<updated>2014-12-04T11:13:38Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensiones tangenciales respecto al plano ortogonal a j */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;. Indicamos donde son mayores y comparamos esta gráfica también con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogona a i&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''j'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ . Igual que en el apartado anterior, diremos dónde es mayor y las comparamos con el módulo de divergencia y rotacional.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello nos indican la función densidad de nuestra placa a partir de la cual podremos hallar la masa y representarla.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar      }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20193</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20193"/>
				<updated>2014-12-04T11:13:30Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensiones tangenciales respecto al plano ortogonal a i */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;. Indicamos donde son mayores y comparamos esta gráfica también con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogona a i&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''j'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a gθ/ρ. Igual que en el apartado anterior, diremos dónde es mayor y las comparamos con el módulo de divergencia y rotacional.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello nos indican la función densidad de nuestra placa a partir de la cual podremos hallar la masa y representarla.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar      }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20189</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20189"/>
				<updated>2014-12-04T11:11:35Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Divergencia */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 2D&lt;br /&gt;
view(2)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''i'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;. Indicamos donde son mayores y comparamos esta gráfica también con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogona a i&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''j'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a gθ/ρ. Igual que en el apartado anterior, diremos dónde es mayor y las comparamos con el módulo de divergencia y rotacional.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello nos indican la función densidad de nuestra placa a partir de la cual podremos hallar la masa y representarla.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar      }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20187</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20187"/>
				<updated>2014-12-04T11:11:12Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensor de tensiones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 3D&lt;br /&gt;
view(3)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de '''ū''' y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''i'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;. Indicamos donde son mayores y comparamos esta gráfica también con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogona a i&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''j'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a gθ/ρ. Igual que en el apartado anterior, diremos dónde es mayor y las comparamos con el módulo de divergencia y rotacional.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello nos indican la función densidad de nuestra placa a partir de la cual podremos hallar la masa y representarla.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar      }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20185</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20185"/>
				<updated>2014-12-04T11:11:04Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Divergencia */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
div=0.*yy&lt;br /&gt;
surf(xx,yy,div)&lt;br /&gt;
%Visualización en 3D&lt;br /&gt;
view(3)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de u y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''i'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;. Indicamos donde son mayores y comparamos esta gráfica también con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogona a i&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''j'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a gθ/ρ. Igual que en el apartado anterior, diremos dónde es mayor y las comparamos con el módulo de divergencia y rotacional.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello nos indican la función densidad de nuestra placa a partir de la cual podremos hallar la masa y representarla.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar      }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20184</id>
		<title>Visualización de campos vectoriales y escalares en elasticidad. Grupo C-16</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Visualizaci%C3%B3n_de_campos_vectoriales_y_escalares_en_elasticidad._Grupo_C-16&amp;diff=20184"/>
				<updated>2014-12-04T11:10:36Z</updated>
		
		<summary type="html">&lt;p&gt;Iván Díez: /* - Tensor de tensiones */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;br /&gt;
{{ TrabajoED | Visualización de campos escalares y vectoriales en elasticidad.Grupo C-16.| [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC14/15|2014-15]]|'''Iván Díez Berjano''' (1111), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Alejandro Montesinos Pérez''' (954), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Jorge Martinez Velasco''' (931), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Pablo Sobrado''' (976), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Luis Vergara Rojo''' (1031), &amp;lt;br /&amp;gt;&lt;br /&gt;
'''Ignacio Perez Abellan''' (928) }}&lt;br /&gt;
&lt;br /&gt;
Consideramos una placa circular plana que ocupa el anillo circular centrado en el origen y comprendido entre los radios 1 y 2. En ella vamos a suponer que tenemos definidas dos cantidades físicas: la '''temperatura''' ('''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;''')  y los '''desplazamientos''' ('''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''), dependientes cada una de las variables que se mostraran más adelante en los apartados correspondientes.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== - Mallado de los puntos interiores del sólido ==&lt;br /&gt;
[[Archivo:Imagen1'.png|300px|miniaturadeimagen|derecha|Mallado de la corona circular.]]&lt;br /&gt;
El mallado consiste en la representación de los puntos que componen la placa sólida en forma de corona circular. Tomaremos como paso de muestreo 0.1 para las variables X e Y.&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Definición de parámetros de la superficie&lt;br /&gt;
u=[1:0.1:2];          &lt;br /&gt;
v=[0:0.1:2*pi+0.1];&lt;br /&gt;
%Creación del mallado&lt;br /&gt;
[uu,vv]=meshgrid(u,v); &lt;br /&gt;
%Parametrización&lt;br /&gt;
xx=uu.*cos(vv);        &lt;br /&gt;
yy=uu.*sin(vv);&lt;br /&gt;
%Dibujo de la malla&lt;br /&gt;
mesh(xx,yy,0*xx)  &lt;br /&gt;
%Ajustamos la gráfica &lt;br /&gt;
axis([-4,4,-4,4]); &lt;br /&gt;
view(2);}}&lt;br /&gt;
&lt;br /&gt;
La parametrización quedará hecha únicamente en este apartado, no se escribirán en el resto de programas.&lt;br /&gt;
&lt;br /&gt;
== - Campo de temperaturas del sólido ==&lt;br /&gt;
La temperatura del sólido varía a lo largo de este según la función '''T(x,y)=e&amp;lt;sup&amp;gt;-y&amp;lt;/sup&amp;gt;'''. Dibujaremos las curvas de nivel para observar en que lugares esta temperatura es máxima. La función de temperaturas depende solo de la variable Y, por lo que se mantendrá constante para todo valor de X. &lt;br /&gt;
[[Archivo:Imagen22.png|450px|miniaturadeimagen|derecha|Distribución de la temperatura en la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Campo escalar temperatura&lt;br /&gt;
T=exp(-yy); &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1);&lt;br /&gt;
%Representación de la malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Vista según los planos X e Y    &lt;br /&gt;
view(2)&lt;br /&gt;
axis([-4,4,-4,4]) &lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2);&lt;br /&gt;
%Representación de la misma malla&lt;br /&gt;
%Vista en 3D&lt;br /&gt;
mesh(xx,yy,T); &lt;br /&gt;
colorbar;  }}&lt;br /&gt;
&lt;br /&gt;
En la gráfica observamos que cuanto mayor es el valor de la Y y de la Z, menor es la temperatura; luego los puntos de máxima temperatura son los más alejados del foco y por tanto con menor valor de Y.&amp;lt;br /&amp;gt;&lt;br /&gt;
LA TEMPERATURA SERÁ MÁXIMA EN EL PUNTO (X,Y,Z)=(0,-2,7.5)&lt;br /&gt;
&lt;br /&gt;
== - Gradiente del campo de temperaturas ==&lt;br /&gt;
El gradiente del campo de temperaturas (∇T) nos indica cómo varía la temperatura al trasladarnos por el plano. El módulo del gradiente nos indica la rapidez con la que aumenta la temperatura. El gradiente apunta en la dirección en la cual la temperatura aumenta más rápido, que es la dirección en donde la derivada direccional será máxima.&lt;br /&gt;
Como hemos visto en teoría, el vector gradiente será perpendicular a las líneas de contorno de nuestro sólido (Podemos verlo en la figura mostrada a la derecha). En la representación podemos observar las diferentes lineas circulares y concéntricas que muestran la disminución de la temperatura a medida que los puntos del sólido se alejan del foco.&lt;br /&gt;
[[Archivo:Imagen3.png|450px|miniaturadeimagen|derecha|Representación del campo vectorial del gradiente de T  (∇T)]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Gradiente del campo&lt;br /&gt;
Gradiente=-exp(-yy);	&lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación del gradiente junto con el campo de temperaturashold on&lt;br /&gt;
%Malla del campo de temperaturas&lt;br /&gt;
mesh(xx,yy,T);&lt;br /&gt;
%Gradiente&lt;br /&gt;
quiver3(xx,yy,T,0*xx,Gradiente,0*T);&lt;br /&gt;
hold off&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del gradiente &lt;br /&gt;
quiver(xx,yy,0*xx,Gradiente); colorbar&lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Campo de desplazamientos ū ==&lt;br /&gt;
Usaremos como campo de desplazamientos  '''ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;'''. Dibujaremos su correspondiente campo de vectores.&lt;br /&gt;
[[Archivo:Imagen4.png|450px|miniaturadeimagen|derecha| Desplazamiento del campo vectorial ū(ρ,θ)=(1-ρ)&amp;lt;sup&amp;gt;2&amp;lt;/sup&amp;gt;·g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Componente x(uu,vv) de mi campo vectorial&lt;br /&gt;
fx=(1-uu).^2.*(-(uu.*sin(vv))); &lt;br /&gt;
%Componente y(uu,vv) del campo vectorial&lt;br /&gt;
fy=(1-uu).^2.*(uu.*cos(vv));  &lt;br /&gt;
%Representamos el campo vectorial sobre la placa&lt;br /&gt;
quiver(xx,yy,fx,fy)  &lt;br /&gt;
%Límites de los ejes x e y en la representación de la placa&lt;br /&gt;
axis([-3,3,-3,3])&lt;br /&gt;
%Visualización&lt;br /&gt;
view(2)         &lt;br /&gt;
%Nombramos el eje x&lt;br /&gt;
xlabel('x');   &lt;br /&gt;
%Nombramos el eje y&lt;br /&gt;
ylabel('y');  &lt;br /&gt;
%Damos un título al gráfico&lt;br /&gt;
title('Mallado y campo de vectores u') }}&lt;br /&gt;
&lt;br /&gt;
== - Sólido antes y después del desplazamiento ==&lt;br /&gt;
Representaremos en una misma ventana nuestro sólido antes y después del desplazamiento dado por el campo de vectores anterior y así poder compararlos. &lt;br /&gt;
[[Archivo:Imagen5.png|450px|miniaturadeimagen|derecha| Placa del sólido antes y después desplazamiento]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Creación de la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representación&lt;br /&gt;
mesh(xx,yy,0*xx)      &lt;br /&gt;
axis([-4,4,-4,4]);&lt;br /&gt;
view(2);&lt;br /&gt;
%Desplazamiento en eje x&lt;br /&gt;
desx=xx+fx;&lt;br /&gt;
%Desplazamiento en eje y&lt;br /&gt;
desy=yy+fy;&lt;br /&gt;
%Creación de la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Representación del desplazamiento&lt;br /&gt;
mesh(desx,desy,yy.*0)&lt;br /&gt;
axis([-4,4,-4,4]); view(2); }}&lt;br /&gt;
&lt;br /&gt;
Podemos apreciar que el desplazamiento es mínimo.&lt;br /&gt;
&lt;br /&gt;
== - Divergencia ==&lt;br /&gt;
Aquí calculamos la divergencia del campo de vectores u en todos los puntos del sólido y la representamos. A través de esta gráfica veremos qué puntos tienen mayor divergencia. &lt;br /&gt;
[[Archivo:Imagen6.png|350px|miniaturadeimagen|derecha|Divergencia del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo= &lt;br /&gt;
%Calculamos la divergencia a mano y el resultado fue cero&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,0.*yy)&lt;br /&gt;
%Visualización en 3D&lt;br /&gt;
view(3)&lt;br /&gt;
colorbar }}&lt;br /&gt;
La divergencia del campo de vectores u es cero, por lo que en la gráfica no se aprecia variación.&lt;br /&gt;
&lt;br /&gt;
== - Rotacional ==&lt;br /&gt;
En este apartado calculamos el rotacional del campo de desplazamientos u en todos los puntos del sólido y lo representamos. A través de la gráfica se observa cuáles son los puntos que sufren un mayor rotacional.&lt;br /&gt;
[[Archivo:Imagen7'.png|450px|miniaturadeimagen|derecha|Rotacional del campo del desplazamineto]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Creamos la matriz del rotacional &lt;br /&gt;
rotacional = zeros(64,11);&lt;br /&gt;
%Asignamos los valores del rotacional a la matriz componente a componente&lt;br /&gt;
%Calculamos así el módulo del rotacional&lt;br /&gt;
i=1;&lt;br /&gt;
j=1;&lt;br /&gt;
for i = 1:64&lt;br /&gt;
  for j = 1:11&lt;br /&gt;
    rotacional(i,j)= 2+4.*(uu(i,j).^2)-6.*uu(i,j);&lt;br /&gt;
    j= j+1;&lt;br /&gt;
  end&lt;br /&gt;
  i = i+1;&lt;br /&gt;
end&lt;br /&gt;
%Creamos la primera subventana&lt;br /&gt;
subplot(1,2,1)&lt;br /&gt;
%Representamos el campo vectorial&lt;br /&gt;
quiver3(xx,yy,xx*0,xx*0,xx*0,-rotacional); &lt;br /&gt;
%Creamos la segunda subventana&lt;br /&gt;
subplot(1,2,2)&lt;br /&gt;
%Dibujamos el mallado del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional); colorbar; }}&lt;br /&gt;
&lt;br /&gt;
== - Tensor de tensiones ==&lt;br /&gt;
Definimos la parte simétrica del tensor gradiente de u y calculamos el tensor de tensiones σ. Dibujamos las tensiones normales en la dirección que marca g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt; y g&amp;lt;sub&amp;gt;θ&amp;lt;/sub&amp;gt;/ρ, y comparamos esta gráfica con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Im8.jpg|450px|miniaturadeimagen|derecha|Tensiones normales, Divergencia y Rotacional]]&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones normales&lt;br /&gt;
tensN=0.*uu;&lt;br /&gt;
%Dibujamos la malla&lt;br /&gt;
surf(xx,yy,tensN)                 &lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;&lt;br /&gt;
%Dibujamos la superficie del divergente                     &lt;br /&gt;
surf(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''i'' ==&lt;br /&gt;
Aquí dibujamos las tensiones tangenciales respecto al plano ortogonal a g&amp;lt;sub&amp;gt;ρ&amp;lt;/sub&amp;gt;. Indicamos donde son mayores y comparamos esta gráfica también con las del módulo de la divergencia y el rotacional.&lt;br /&gt;
[[Archivo:Imagen9.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
mesh(xx,yy,tensT) &lt;br /&gt;
%Vista desde el plano ortogona a i&lt;br /&gt;
view(2)&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                       &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensiones tangenciales respecto al plano ortogonal a ''j'' ==&lt;br /&gt;
Representamos las tensiones tangenciales por el plano ortogonal a gθ/ρ. Igual que en el apartado anterior, diremos dónde es mayor y las comparamos con el módulo de divergencia y rotacional.&lt;br /&gt;
[[Archivo:Imagen10.jpg|450px|miniaturadeimagen|derecha|Comparacion de las tensiones tangenciales con las del módulo de la divergencia y las del módulo del rotacional]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
subplot(1,3,1)&lt;br /&gt;
%Modulo de las tensiones tangenciales&lt;br /&gt;
tensT=uu.*(1-uu).*(-2+uu.*(1-uu).^2);                    &lt;br /&gt;
%Dibuja la malla de las tensiones tangenciales&lt;br /&gt;
surf(xx,yy,tensT)&lt;br /&gt;
%Movido para verlo perpendicular a j&lt;br /&gt;
subplot(1,3,2)&lt;br /&gt;
%Modulo de la divergencia&lt;br /&gt;
div=0.*uu;  &lt;br /&gt;
%Malla de la diverencia&lt;br /&gt;
mesh(xx,yy,div);          &lt;br /&gt;
subplot(1,3,3)&lt;br /&gt;
%Malla del rotacional&lt;br /&gt;
mesh(xx,yy,rotacional)&lt;br /&gt;
colorbar                         &lt;br /&gt;
 }}&lt;br /&gt;
&lt;br /&gt;
== - Tensión de Von Mises ==&lt;br /&gt;
Calculamos la tensión de Von Mises a partir de la fórmula dada calculando los autovalores de σ. Esta es una magnitud escalar que pintaremos y analizándola indicamos en qué punto se alcanza el mayor valor.&lt;br /&gt;
[[Archivo:Imagen11.jpg|450px|miniaturadeimagen|derecha|Representación de la Tensión de Von Mises.]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Calculamos la tension de Von Mises&lt;br /&gt;
VM=sqrt(3).*(1-uu).*(-2+uu.*(1-uu).^2);&lt;br /&gt;
%Dibujamos la superficie&lt;br /&gt;
surf(xx,yy,VM)&lt;br /&gt;
colorbar}}&lt;br /&gt;
&lt;br /&gt;
== - Masa total ==&lt;br /&gt;
En este apartado debemos hallar la masa. Para ello nos indican la función densidad de nuestra placa a partir de la cual podremos hallar la masa y representarla.&lt;br /&gt;
[[Archivo:Imagen12.png|450px|miniaturadeimagen|derecha|Distribución de la masa de la placa]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
%Masa=densidad*Volumen&lt;br /&gt;
%Densidad=xx*yy*log(xx+2);&lt;br /&gt;
%Volumen hallado a mano&lt;br /&gt;
masa=xx.*yy.*log(xx+2).*(pi*4-pi*1);               &lt;br /&gt;
%Representación de la malla&lt;br /&gt;
surf(xx,yy,masa)                     &lt;br /&gt;
axis([-2,2,-2,2])                   &lt;br /&gt;
colorbar      }}                      &lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC14/15]]&lt;/div&gt;</summary>
		<author><name>Iván Díez</name></author>	</entry>

	</feed>