<?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=Tomas.young</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=Tomas.young"/>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/wiki/Especial:Contribuciones/Tomas.young"/>
		<updated>2026-04-23T12:18:33Z</updated>
		<subtitle>Contribuciones del usuario</subtitle>
		<generator>MediaWiki 1.26.2</generator>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96584</id>
		<title>La Cicloide (GRUPO 65)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96584"/>
				<updated>2025-12-03T15:14:17Z</updated>
		
		<summary type="html">&lt;p&gt;Tomas.young: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | La cicloide. Grupo 65 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | Rafael Jarillo Cabezas &amp;lt;br/&amp;gt; Miguel Tao, Tentor Gonzalez de Eiris &amp;lt;br/&amp;gt; Felipe Yagüe López &amp;lt;br/&amp;gt; Tomas Young Christiansen &amp;lt;br/&amp;gt; Luca Raffin Barrios}}&lt;br /&gt;
Se considera una curva en un plano de dimensión 2 dada por la parametrización: &lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt; 𝛾(t) = (x(t),y(t)) = (R(t-sint),R(1-cost)),      t∈(0,2π) &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
Siendo R un número positivo fijo. En este caso R=3&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Consideramos la curva plana dada por la parametrización en coordenadas cartesianas:&lt;br /&gt;
&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(t) = (x(t), y(t)) = (R(t - \sin t), R(1 - \cos t)), \quad t \in (0, 2\pi)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; es un número positivo fijado. En este trabajo tomamos '''&amp;lt;math&amp;gt;R = 3&amp;lt;/math&amp;gt;'''.&lt;br /&gt;
&lt;br /&gt;
===  Dibujar la curva ===&lt;br /&gt;
&lt;br /&gt;
La curva representa el trayecto de un punto en el borde de una rueda de radio &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; que gira sin deslizar.&lt;br /&gt;
[[Archivo:felipeyluca.jpg|thumb|center|500px|Gráfica de la Cicloide (R=3) generada en MATLAB]]&lt;br /&gt;
&amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
&lt;br /&gt;
R = 3;&lt;br /&gt;
t = linspace(0, 2*pi, 1000);&lt;br /&gt;
&lt;br /&gt;
% Parametrización&lt;br /&gt;
x = R * (t - sin(t));&lt;br /&gt;
y = R * (1 - cos(t));&lt;br /&gt;
&lt;br /&gt;
% Dibujo&lt;br /&gt;
plot(x, y, 'b-', 'LineWidth', 2);&lt;br /&gt;
title('Gráfica de la Cicloide (R=3)');&lt;br /&gt;
xlabel('x'); ylabel('y');&lt;br /&gt;
axis equal; grid on; xlim([0, 2*pi*R]);&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Vectores velocidad y aceleración ===&lt;br /&gt;
&lt;br /&gt;
Calculamos analíticamente los vectores derivando la parametrización:&lt;br /&gt;
El vector velocidad corresponde a la primera derivada del vector inicial con respecto al parámetro t. La parametrización se muestra a continuación:&lt;br /&gt;
* '''Velocidad:''' &amp;lt;math&amp;gt;\gamma'(t) = (3(1 - \cos t), 3\sin t)&amp;lt;/math&amp;gt;&lt;br /&gt;
El vector aceleración viene dado por la segunda derivada de la cicloide con respecto al parámetro t. El vector calculado es el siguiente:&lt;br /&gt;
* '''Aceleración:''' &amp;lt;math&amp;gt;\gamma''(t) = (3\sin t, 3\cos t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación, el código para dibujarlos en un punto arbitrario (por ejemplo, &amp;lt;math&amp;gt;t = \pi/2&amp;lt;/math&amp;gt;):&lt;br /&gt;
[[Archivo:VEL.ACEL.jpg|thumb|center|500px|Gráfica de la curva, velocidad y aceleración generada en MATLAB]]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
clear;clc;&lt;br /&gt;
R=3; &lt;br /&gt;
t=linspace(0,2*pi,20);&lt;br /&gt;
x=R*(t-sin(t));y=R*(1-cos(t));&lt;br /&gt;
%vectores&lt;br /&gt;
Vx=R*(1-cos(t));Vy=R*(sin(t)); &lt;br /&gt;
Ax=R*(sin(t)); Ay=R*(cos(t)); &lt;br /&gt;
figure &lt;br /&gt;
%Dibujo &lt;br /&gt;
plot(x,y,'k')&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,Vx,Vy,'b');&lt;br /&gt;
quiver(x,y,Ax,Ay,'g'); &lt;br /&gt;
hold off&lt;br /&gt;
grid on&lt;br /&gt;
%Etiquetas &lt;br /&gt;
axis equal &lt;br /&gt;
legend('Curva','Velocidad','Aceleración'); &lt;br /&gt;
title('Curva, velocidad y aceleración');&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Longitud de la curva ===&lt;br /&gt;
&lt;br /&gt;
La longitud de la curva se calcula mediante la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} \|\gamma'(t)\| dt = \int_0^{2\pi} 3\sqrt{(1-\cos t)^2 + \sin^2 t} \, dt&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Simplificando el integrando obtenemos &amp;lt;math&amp;gt;6\sin(t/2)&amp;lt;/math&amp;gt;. Resolviendo la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} 6\sin(t/2) dt = [-12\cos(t/2)]_0^{2\pi} = 24&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Cálculo numérico (Método del Rectángulo):'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
clear;clc;&lt;br /&gt;
N=10000; &lt;br /&gt;
h=(2*pi)/N;&lt;br /&gt;
t=0:h:(2*pi-h);&lt;br /&gt;
&lt;br /&gt;
dx=R*(1-cos(t));&lt;br /&gt;
dy=R*sin(t);&lt;br /&gt;
ds=sqrt(dx.^2+dy.^2);&lt;br /&gt;
&lt;br /&gt;
Longitud=sum(ds*h);&lt;br /&gt;
fprintf('Longitud Aproximada: %.5f\n', Longitud);&lt;br /&gt;
fprintf('Longitud Teórica: 24\n');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Vectores tangente y normal ===&lt;br /&gt;
El vector tangente es un vector de magnitud uno que apunta en la misma dirección que la velocidad. Su función es mostrar la dirección instantánea del movimiento a lo largo de la curva.&lt;br /&gt;
* '''Tangente unitario:''' &amp;lt;math&amp;gt;\vec{t}(t) = (\sin(t/2), \cos(t/2))&amp;lt;/math&amp;gt;&lt;br /&gt;
El vector normal es el vector perpendicular (ortogonal) al vector tangente. Este vector señala la concavidad de la curva, es decir, hacia dónde está girando en ese punto.&lt;br /&gt;
* '''Normal unitario:''' &amp;lt;math&amp;gt;\vec{n}(t) = (\cos(t/2), -\sin(t/2))&amp;lt;/math&amp;gt; (apuntando hacia el centro de curvatura).&lt;br /&gt;
[[Archivo:Curva_Tangente_Normal2.png|thumb|center|500px|Gráfica de la curva, tangente y normal generada en MATLAB]]&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
clear;clc;&lt;br /&gt;
R=3; &lt;br /&gt;
t=linspace(0,2*pi,12);&lt;br /&gt;
x=R*(t-sin(t));y=R*(1-cos(t));&lt;br /&gt;
%vectores&lt;br /&gt;
T1=R*(1-cos(t));&lt;br /&gt;
T2=R*(sin(t)); &lt;br /&gt;
norma= sqrt(T1.^2+T2.^2); &lt;br /&gt;
N1=T1./norma; &lt;br /&gt;
N2=T2./norma;&lt;br /&gt;
&lt;br /&gt;
figure &lt;br /&gt;
%Dibujo &lt;br /&gt;
plot(x,y,'k')&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,N1,N2,'r');&lt;br /&gt;
quiver(x,y,N2,-N1,'b'); &lt;br /&gt;
hold off&lt;br /&gt;
grid on&lt;br /&gt;
%Etiquetas &lt;br /&gt;
axis equal &lt;br /&gt;
legend('Curva','`Tangente','Normal'); &lt;br /&gt;
title('Curva, tangente y normal');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
[[Archivo:Cicloide_Frenet.png|thumb|center|400px|Diedro de Frenet a lo largo de la curva]]&lt;br /&gt;
&lt;br /&gt;
===  Curvatura ===&lt;br /&gt;
&lt;br /&gt;
La curvatura &amp;lt;math&amp;gt;\kappa(t)&amp;lt;/math&amp;gt; para &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; viene dada por:&lt;br /&gt;
:&amp;lt;math&amp;gt;\kappa(t) = \frac{1}{4R\sin(t/2)} = \frac{1}{12\sin(t/2)}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 5. Gráfica de la Curvatura ---&lt;br /&gt;
t_k = linspace(0.1, 2*pi-0.1, 100); &lt;br /&gt;
kappa = 1 ./ (12 * sin(t_k / 2));&lt;br /&gt;
&lt;br /&gt;
figure(3);&lt;br /&gt;
plot(t_k, kappa, 'r-', 'LineWidth', 2);&lt;br /&gt;
title('Curvatura \kappa(t)');&lt;br /&gt;
xlabel('t'); grid on;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Curvatura.png|thumb|center|400px|Gráfica de la curvatura en función de t]]&lt;br /&gt;
&lt;br /&gt;
===  Circunferencia osculatriz en t=4 ===&lt;br /&gt;
&lt;br /&gt;
Para el punto &amp;lt;math&amp;gt;P = \gamma(4)&amp;lt;/math&amp;gt;:&lt;br /&gt;
* Radio de curvatura: &amp;lt;math&amp;gt;\rho = 12\sin(2) \approx 10.91&amp;lt;/math&amp;gt;&lt;br /&gt;
* Centro de curvatura: Se calcula numéricamente desplazando &amp;lt;math&amp;gt;P&amp;lt;/math&amp;gt; en dirección normal.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 6. Circunferencia Osculatriz (t=4) ---&lt;br /&gt;
t0 = 4;&lt;br /&gt;
P0 = [R*(t0 - sin(t0)), R*(1 - cos(t0))];&lt;br /&gt;
rho = 12 * sin(t0/2);&lt;br /&gt;
N0 = [cos(t0/2), -sin(t0/2)]; &lt;br /&gt;
Centro = P0 + rho * N0;&lt;br /&gt;
&lt;br /&gt;
figure(4);&lt;br /&gt;
plot(x, y, 'b'); hold on; axis equal; grid on;&lt;br /&gt;
theta = linspace(0, 2*pi, 200);&lt;br /&gt;
xc = Centro(1) + rho * cos(theta);&lt;br /&gt;
yc = Centro(2) + rho * sin(theta);&lt;br /&gt;
plot(xc, yc, 'r--', 'LineWidth', 1.5);&lt;br /&gt;
plot(P0(1), P0(2), 'ko', 'MarkerFaceColor', 'k');&lt;br /&gt;
title('Circunferencia Osculatriz en t=4');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Osculatriz.png|thumb|center|400px|Circunferencia osculatriz en t=4]]&lt;br /&gt;
&lt;br /&gt;
===  Información sobre la curva ===&lt;br /&gt;
[[Archivo:Cicloide-rotacionchino.gif|thumb|333px|Generación de la trayectoria cicloidal]]&lt;br /&gt;
&amp;lt;br&amp;gt; &amp;lt;br&amp;gt;&lt;br /&gt;
La cicloide es una curva plana generada por la trayectoria de un punto fijo en el borde de una circunferencia generadora que rueda sin deslizar sobre una recta horizontal. Un ciclo completo de la curva se forma cuando el punto regresa a la recta horizontal, conocida como el eje horizontal o directriz, abarcando una longitud de 2πr, donde r es el radio del círculo generador.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
Las propiedades y definiciones importantes de la cicloide son:&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Círculo Generador: La circunferencia que gira y en cuyo borde se sitúa el punto que traza la curva.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Directriz (Eje Horizontal): La recta fija sobre la que rueda el círculo.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Punto Inferior y Superior: Los puntos más bajo (de contacto con la directriz) y más alto del círculo generador en cualquier instante, respectivamente.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Ángulo Principal: El ángulo entre la tangente a la cicloide en un punto dado y el eje horizontal.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Rafajarillopillo.gif|thumb|250px|Visualización de la tautócronia]]&lt;br /&gt;
&amp;lt;br&amp;gt; &amp;lt;br&amp;gt;&lt;br /&gt;
La cicloide posee notables propiedades matemáticas, como que toda normal a la cicloide pasa por el punto inferior del círculo generador, y la tangente pasa por el punto superior. También existe una relación angular entre el ángulo que forman la normal a la cicloide y la directriz, que será la mitad del ángulo principal.&lt;br /&gt;
La cicloide es la solución a dos de los problemas más importantes de la mecánica clásica&lt;br /&gt;
Es fundamental en problemas de minimización del tiempo de descenso bajo gravedad, ya que es la curva de descenso más rápido entre dos puntos únicamente por la acción de la gravedad y partiendo de reposo (Braquistócrona). También es la curva donde el tiempo de descenso a el punto más bajo es independiente del punto de partida (Tautócrona).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===  Estructura civil ===&lt;br /&gt;
&lt;br /&gt;
Un ejemplo destacado del uso de arcos cicloidales es el **Museo de Arte Kimbell** en Texas, diseñado por el arquitecto Louis Kahn. La estructura de la cubierta está formada por bóvedas con perfil de cicloide que optimizan la distribución de la luz natural.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===  Superficie reglada en R3 ===&lt;br /&gt;
&lt;br /&gt;
Consideramos la superficie:&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(u, t) = (u, 3(t - \sin t), 3(1 + \cos t))&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:3Dhola.jpg|thumb|center|400px|Cicloide parametrizada en dimensión 3]]&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
u = 0:0.1:1;&lt;br /&gt;
t= 0:0.1:2*pi;&lt;br /&gt;
[U,T] = meshgrid(u,t);&lt;br /&gt;
&lt;br /&gt;
X1 = U;&lt;br /&gt;
X2 = R*(T-sin(T));&lt;br /&gt;
X3 = R*(1+cos(T));&lt;br /&gt;
&lt;br /&gt;
surf(X1,X2,X3);&lt;br /&gt;
colormap jet;&lt;br /&gt;
title('Superficie Reglada Cicloidal');&lt;br /&gt;
axis equal&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Superficie.png|thumb|center|400px|Superficie reglada generada en MATLAB]]&lt;br /&gt;
&lt;br /&gt;
===  Cálculo de la masa ===&lt;br /&gt;
&lt;br /&gt;
Dada la densidad &amp;lt;math&amp;gt;f(x_1, x_2, x_3) = (1 + x_1)(1 + x_2)x_3&amp;lt;/math&amp;gt;, calculamos la masa mediante la integral de superficie. El elemento de área diferencial es &amp;lt;math&amp;gt;dS = 6\sin(t/2) dt du&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 10. Cálculo de Masa ---&lt;br /&gt;
fun_densidad = @(u, t) (1 + u) .* (1 + R*(t - sin(t))) .* (R*(1 + cos(t))) .* (2*R*sin(t/2));&lt;br /&gt;
Masa_Total = integral2(fun_densidad, 0, 1, 0, 2*pi);&lt;br /&gt;
fprintf('Masa total: %.4f\n', Masa_Total);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Resultado aproximado:''' La masa calculada es &amp;lt;math&amp;gt;750.58&amp;lt;/math&amp;gt; unidades.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;/div&gt;</summary>
		<author><name>Tomas.young</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96545</id>
		<title>La Cicloide (GRUPO 65)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96545"/>
				<updated>2025-12-03T15:06:04Z</updated>
		
		<summary type="html">&lt;p&gt;Tomas.young: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | La cicloide. Grupo 65 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | Rafael Jarillo Cabezas &amp;lt;br/&amp;gt; Miguel Tao, Tentor Gonzalez de Eiris &amp;lt;br/&amp;gt; Felipe Yagüe López &amp;lt;br/&amp;gt; Tomas Young Christiansen &amp;lt;br/&amp;gt; Luca Raffin Barrios}}&lt;br /&gt;
Se considera una curva en un plano de dimensión 2 dada por la parametrización: &lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt; 𝛾(t) = (x(t),y(t)) = (R(t-sint),R(1-cost)),      t∈(0,2π) &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
Siendo R un número positivo fijo. En este caso R=3&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Consideramos la curva plana dada por la parametrización en coordenadas cartesianas:&lt;br /&gt;
&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(t) = (x(t), y(t)) = (R(t - \sin t), R(1 - \cos t)), \quad t \in (0, 2\pi)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; es un número positivo fijado. En este trabajo tomamos '''&amp;lt;math&amp;gt;R = 3&amp;lt;/math&amp;gt;'''.&lt;br /&gt;
&lt;br /&gt;
===  Dibujar la curva ===&lt;br /&gt;
&lt;br /&gt;
La curva representa el trayecto de un punto en el borde de una rueda de radio &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; que gira sin deslizar.&lt;br /&gt;
[[Archivo:felipeyluca.jpg|thumb|center|500px|Gráfica de la Cicloide (R=3) generada en MATLAB]]&lt;br /&gt;
&amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
&lt;br /&gt;
R = 3;&lt;br /&gt;
t = linspace(0, 2*pi, 1000);&lt;br /&gt;
&lt;br /&gt;
% Parametrización&lt;br /&gt;
x = R * (t - sin(t));&lt;br /&gt;
y = R * (1 - cos(t));&lt;br /&gt;
&lt;br /&gt;
% Dibujo&lt;br /&gt;
plot(x, y, 'b-', 'LineWidth', 2);&lt;br /&gt;
title('Gráfica de la Cicloide (R=3)');&lt;br /&gt;
xlabel('x'); ylabel('y');&lt;br /&gt;
axis equal; grid on; xlim([0, 2*pi*R]);&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Vectores velocidad y aceleración ===&lt;br /&gt;
&lt;br /&gt;
Calculamos analíticamente los vectores derivando la parametrización:&lt;br /&gt;
El vector velocidad corresponde a la primera derivada del vector inicial con respecto al parámetro t. La parametrización se muestra a continuación:&lt;br /&gt;
* '''Velocidad:''' &amp;lt;math&amp;gt;\gamma'(t) = (3(1 - \cos t), 3\sin t)&amp;lt;/math&amp;gt;&lt;br /&gt;
El vector aceleración viene dado por la segunda derivada de la cicloide con respecto al parámetro t. El vector calculado es el siguiente:&lt;br /&gt;
* '''Aceleración:''' &amp;lt;math&amp;gt;\gamma''(t) = (3\sin t, 3\cos t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación, el código para dibujarlos en un punto arbitrario (por ejemplo, &amp;lt;math&amp;gt;t = \pi/2&amp;lt;/math&amp;gt;):&lt;br /&gt;
[[Archivo:VEL.ACEL.jpg|thumb|center|500px|Gráfica de la curva, velocidad y aceleración generada en MATLAB]]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
clear;clc;&lt;br /&gt;
R=3; &lt;br /&gt;
t=linspace(0,2*pi,20);&lt;br /&gt;
x=R*(t-sin(t));y=R*(1-cos(t));&lt;br /&gt;
%vectores&lt;br /&gt;
Vx=R*(1-cos(t));Vy=R*(sin(t)); &lt;br /&gt;
Ax=R*(sin(t)); Ay=R*(cos(t)); &lt;br /&gt;
figure &lt;br /&gt;
%Dibujo &lt;br /&gt;
plot(x,y,'k')&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,Vx,Vy,'b');&lt;br /&gt;
quiver(x,y,Ax,Ay,'g'); &lt;br /&gt;
hold off&lt;br /&gt;
grid on&lt;br /&gt;
%Etiquetas &lt;br /&gt;
axis equal &lt;br /&gt;
legend('Curva','Velocidad','Aceleración'); &lt;br /&gt;
title('Curva, velocidad y aceleración');&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Longitud de la curva ===&lt;br /&gt;
&lt;br /&gt;
La longitud de la curva se calcula mediante la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} \|\gamma'(t)\| dt = \int_0^{2\pi} 3\sqrt{(1-\cos t)^2 + \sin^2 t} \, dt&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Simplificando el integrando obtenemos &amp;lt;math&amp;gt;6\sin(t/2)&amp;lt;/math&amp;gt;. Resolviendo la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} 6\sin(t/2) dt = [-12\cos(t/2)]_0^{2\pi} = 24&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Cálculo numérico (Método del Rectángulo):'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
clear;clc;&lt;br /&gt;
N=10000; &lt;br /&gt;
h=(2*pi)/N;&lt;br /&gt;
t=0:h:(2*pi-h);&lt;br /&gt;
&lt;br /&gt;
dx=R*(1-cos(t));&lt;br /&gt;
dy=R*sin(t);&lt;br /&gt;
ds=sqrt(dx.^2+dy.^2);&lt;br /&gt;
&lt;br /&gt;
Longitud=sum(ds*h);&lt;br /&gt;
fprintf('Longitud Aproximada: %.5f\n', Longitud);&lt;br /&gt;
fprintf('Longitud Teórica: 24\n');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Vectores tangente y normal ===&lt;br /&gt;
&lt;br /&gt;
* '''Tangente unitario:''' &amp;lt;math&amp;gt;\vec{t}(t) = (\sin(t/2), \cos(t/2))&amp;lt;/math&amp;gt;&lt;br /&gt;
* '''Normal unitario:''' &amp;lt;math&amp;gt;\vec{n}(t) = (\cos(t/2), -\sin(t/2))&amp;lt;/math&amp;gt; (apuntando hacia el centro de curvatura).&lt;br /&gt;
[[Archivo:Curva_Tangente_Normal2.png|thumb|center|500px|Gráfica de la curva, tangente y normal generada en MATLAB]]&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
clear;clc;&lt;br /&gt;
R=3; &lt;br /&gt;
t=linspace(0,2*pi,12);&lt;br /&gt;
x=R*(t-sin(t));y=R*(1-cos(t));&lt;br /&gt;
%vectores&lt;br /&gt;
T1=R*(1-cos(t));&lt;br /&gt;
T2=R*(sin(t)); &lt;br /&gt;
norma= sqrt(T1.^2+T2.^2); &lt;br /&gt;
N1=T1./norma; &lt;br /&gt;
N2=T2./norma;&lt;br /&gt;
&lt;br /&gt;
figure &lt;br /&gt;
%Dibujo &lt;br /&gt;
plot(x,y,'k')&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,N1,N2,'r');&lt;br /&gt;
quiver(x,y,N2,-N1,'b'); &lt;br /&gt;
hold off&lt;br /&gt;
grid on&lt;br /&gt;
%Etiquetas &lt;br /&gt;
axis equal &lt;br /&gt;
legend('Curva','`Tangente','Normal'); &lt;br /&gt;
title('Curva, tangente y normal');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
[[Archivo:Cicloide_Frenet.png|thumb|center|400px|Diedro de Frenet a lo largo de la curva]]&lt;br /&gt;
&lt;br /&gt;
===  Curvatura ===&lt;br /&gt;
&lt;br /&gt;
La curvatura &amp;lt;math&amp;gt;\kappa(t)&amp;lt;/math&amp;gt; para &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; viene dada por:&lt;br /&gt;
:&amp;lt;math&amp;gt;\kappa(t) = \frac{1}{4R\sin(t/2)} = \frac{1}{12\sin(t/2)}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 5. Gráfica de la Curvatura ---&lt;br /&gt;
t_k = linspace(0.1, 2*pi-0.1, 100); &lt;br /&gt;
kappa = 1 ./ (12 * sin(t_k / 2));&lt;br /&gt;
&lt;br /&gt;
figure(3);&lt;br /&gt;
plot(t_k, kappa, 'r-', 'LineWidth', 2);&lt;br /&gt;
title('Curvatura \kappa(t)');&lt;br /&gt;
xlabel('t'); grid on;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Curvatura.png|thumb|center|400px|Gráfica de la curvatura en función de t]]&lt;br /&gt;
&lt;br /&gt;
===  Circunferencia osculatriz en t=4 ===&lt;br /&gt;
&lt;br /&gt;
Para el punto &amp;lt;math&amp;gt;P = \gamma(4)&amp;lt;/math&amp;gt;:&lt;br /&gt;
* Radio de curvatura: &amp;lt;math&amp;gt;\rho = 12\sin(2) \approx 10.91&amp;lt;/math&amp;gt;&lt;br /&gt;
* Centro de curvatura: Se calcula numéricamente desplazando &amp;lt;math&amp;gt;P&amp;lt;/math&amp;gt; en dirección normal.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 6. Circunferencia Osculatriz (t=4) ---&lt;br /&gt;
t0 = 4;&lt;br /&gt;
P0 = [R*(t0 - sin(t0)), R*(1 - cos(t0))];&lt;br /&gt;
rho = 12 * sin(t0/2);&lt;br /&gt;
N0 = [cos(t0/2), -sin(t0/2)]; &lt;br /&gt;
Centro = P0 + rho * N0;&lt;br /&gt;
&lt;br /&gt;
figure(4);&lt;br /&gt;
plot(x, y, 'b'); hold on; axis equal; grid on;&lt;br /&gt;
theta = linspace(0, 2*pi, 200);&lt;br /&gt;
xc = Centro(1) + rho * cos(theta);&lt;br /&gt;
yc = Centro(2) + rho * sin(theta);&lt;br /&gt;
plot(xc, yc, 'r--', 'LineWidth', 1.5);&lt;br /&gt;
plot(P0(1), P0(2), 'ko', 'MarkerFaceColor', 'k');&lt;br /&gt;
title('Circunferencia Osculatriz en t=4');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Osculatriz.png|thumb|center|400px|Circunferencia osculatriz en t=4]]&lt;br /&gt;
&lt;br /&gt;
===  Información sobre la curva ===&lt;br /&gt;
[[Archivo:Cicloide-rotacionchino.gif|thumb|333px|Generación de la trayectoria cicloidal]]&lt;br /&gt;
&amp;lt;br&amp;gt; &amp;lt;br&amp;gt;&lt;br /&gt;
La cicloide es una curva plana generada por la trayectoria de un punto fijo en el borde de una circunferencia generadora que rueda sin deslizar sobre una recta horizontal. Un ciclo completo de la curva se forma cuando el punto regresa a la recta horizontal, conocida como el eje horizontal o directriz, abarcando una longitud de 2πr, donde r es el radio del círculo generador.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
Las propiedades y definiciones importantes de la cicloide son:&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Círculo Generador: La circunferencia que gira y en cuyo borde se sitúa el punto que traza la curva.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Directriz (Eje Horizontal): La recta fija sobre la que rueda el círculo.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Punto Inferior y Superior: Los puntos más bajo (de contacto con la directriz) y más alto del círculo generador en cualquier instante, respectivamente.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Ángulo Principal: El ángulo entre la tangente a la cicloide en un punto dado y el eje horizontal.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo Rafajarillopillo.gif|thumb|250px|Generación de la trayectoria cicloidal]]&lt;br /&gt;
&amp;lt;br&amp;gt; &amp;lt;br&amp;gt;&lt;br /&gt;
La cicloide posee notables propiedades matemáticas, como que toda normal a la cicloide pasa por el punto inferior del círculo generador, y la tangente pasa por el punto superior. También existe una relación angular entre el ángulo que forman la normal a la cicloide y la directriz, que será la mitad del ángulo principal.&lt;br /&gt;
La cicloide es la solución a dos de los problemas más importantes de la mecánica clásica&lt;br /&gt;
Es fundamental en problemas de minimización del tiempo de descenso bajo gravedad, ya que es la curva de descenso más rápido entre dos puntos únicamente por la acción de la gravedad y partiendo de reposo (Braquistócrona). También es la curva donde el tiempo de descenso a el punto más bajo es independiente del punto de partida (Tautócrona).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===  Estructura civil ===&lt;br /&gt;
&lt;br /&gt;
Un ejemplo destacado del uso de arcos cicloidales es el **Museo de Arte Kimbell** en Texas, diseñado por el arquitecto Louis Kahn. La estructura de la cubierta está formada por bóvedas con perfil de cicloide que optimizan la distribución de la luz natural.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===  Superficie reglada en R3 ===&lt;br /&gt;
&lt;br /&gt;
Consideramos la superficie:&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(u, t) = (u, 3(t - \sin t), 3(1 + \cos t))&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:3Dhola.jpg|thumb|center|400px|Cicloide parametrizada en dimensión 3]]&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
u = 0:0.1:1;&lt;br /&gt;
t= 0:0.1:2*pi;&lt;br /&gt;
[U,T] = meshgrid(u,t);&lt;br /&gt;
&lt;br /&gt;
X1 = U;&lt;br /&gt;
X2 = R*(T-sin(T));&lt;br /&gt;
X3 = R*(1+cos(T));&lt;br /&gt;
&lt;br /&gt;
surf(X1,X2,X3);&lt;br /&gt;
colormap jet;&lt;br /&gt;
title('Superficie Reglada Cicloidal');&lt;br /&gt;
axis equal&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Superficie.png|thumb|center|400px|Superficie reglada generada en MATLAB]]&lt;br /&gt;
&lt;br /&gt;
===  Cálculo de la masa ===&lt;br /&gt;
&lt;br /&gt;
Dada la densidad &amp;lt;math&amp;gt;f(x_1, x_2, x_3) = (1 + x_1)(1 + x_2)x_3&amp;lt;/math&amp;gt;, calculamos la masa mediante la integral de superficie. El elemento de área diferencial es &amp;lt;math&amp;gt;dS = 6\sin(t/2) dt du&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 10. Cálculo de Masa ---&lt;br /&gt;
fun_densidad = @(u, t) (1 + u) .* (1 + R*(t - sin(t))) .* (R*(1 + cos(t))) .* (2*R*sin(t/2));&lt;br /&gt;
Masa_Total = integral2(fun_densidad, 0, 1, 0, 2*pi);&lt;br /&gt;
fprintf('Masa total: %.4f\n', Masa_Total);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Resultado aproximado:''' La masa calculada es &amp;lt;math&amp;gt;750.58&amp;lt;/math&amp;gt; unidades.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;/div&gt;</summary>
		<author><name>Tomas.young</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96541</id>
		<title>La Cicloide (GRUPO 65)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96541"/>
				<updated>2025-12-03T15:05:31Z</updated>
		
		<summary type="html">&lt;p&gt;Tomas.young: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | La cicloide. Grupo 65 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | Rafael Jarillo Cabezas &amp;lt;br/&amp;gt; Miguel Tao, Tentor Gonzalez de Eiris &amp;lt;br/&amp;gt; Felipe Yagüe López &amp;lt;br/&amp;gt; Tomas Young Christiansen &amp;lt;br/&amp;gt; Luca Raffin Barrios}}&lt;br /&gt;
Se considera una curva en un plano de dimensión 2 dada por la parametrización: &lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt; 𝛾(t) = (x(t),y(t)) = (R(t-sint),R(1-cost)),      t∈(0,2π) &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
Siendo R un número positivo fijo. En este caso R=3&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Consideramos la curva plana dada por la parametrización en coordenadas cartesianas:&lt;br /&gt;
&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(t) = (x(t), y(t)) = (R(t - \sin t), R(1 - \cos t)), \quad t \in (0, 2\pi)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; es un número positivo fijado. En este trabajo tomamos '''&amp;lt;math&amp;gt;R = 3&amp;lt;/math&amp;gt;'''.&lt;br /&gt;
&lt;br /&gt;
===  Dibujar la curva ===&lt;br /&gt;
&lt;br /&gt;
La curva representa el trayecto de un punto en el borde de una rueda de radio &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; que gira sin deslizar.&lt;br /&gt;
[[Archivo:felipeyluca.jpg|thumb|center|500px|Gráfica de la Cicloide (R=3) generada en MATLAB]]&lt;br /&gt;
&amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
&lt;br /&gt;
R = 3;&lt;br /&gt;
t = linspace(0, 2*pi, 1000);&lt;br /&gt;
&lt;br /&gt;
% Parametrización&lt;br /&gt;
x = R * (t - sin(t));&lt;br /&gt;
y = R * (1 - cos(t));&lt;br /&gt;
&lt;br /&gt;
% Dibujo&lt;br /&gt;
plot(x, y, 'b-', 'LineWidth', 2);&lt;br /&gt;
title('Gráfica de la Cicloide (R=3)');&lt;br /&gt;
xlabel('x'); ylabel('y');&lt;br /&gt;
axis equal; grid on; xlim([0, 2*pi*R]);&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Vectores velocidad y aceleración ===&lt;br /&gt;
&lt;br /&gt;
Calculamos analíticamente los vectores derivando la parametrización:&lt;br /&gt;
El vector velocidad corresponde a la primera derivada del vector inicial con respecto al parámetro t. La parametrización se muestra a continuación:&lt;br /&gt;
* '''Velocidad:''' &amp;lt;math&amp;gt;\gamma'(t) = (3(1 - \cos t), 3\sin t)&amp;lt;/math&amp;gt;&lt;br /&gt;
El vector aceleración viene dado por la segunda derivada de la cicloide con respecto al parámetro t. El vector calculado es el siguiente:&lt;br /&gt;
* '''Aceleración:''' &amp;lt;math&amp;gt;\gamma''(t) = (3\sin t, 3\cos t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación, el código para dibujarlos en un punto arbitrario (por ejemplo, &amp;lt;math&amp;gt;t = \pi/2&amp;lt;/math&amp;gt;):&lt;br /&gt;
[[Archivo:VEL.ACEL.jpg|thumb|center|500px|Gráfica de la curva, velocidad y aceleración generada en MATLAB]]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
clear;clc;&lt;br /&gt;
R=3; &lt;br /&gt;
t=linspace(0,2*pi,20);&lt;br /&gt;
x=R*(t-sin(t));y=R*(1-cos(t));&lt;br /&gt;
%vectores&lt;br /&gt;
Vx=R*(1-cos(t));Vy=R*(sin(t)); &lt;br /&gt;
Ax=R*(sin(t)); Ay=R*(cos(t)); &lt;br /&gt;
figure &lt;br /&gt;
%Dibujo &lt;br /&gt;
plot(x,y,'k')&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,Vx,Vy,'b');&lt;br /&gt;
quiver(x,y,Ax,Ay,'g'); &lt;br /&gt;
hold off&lt;br /&gt;
grid on&lt;br /&gt;
%Etiquetas &lt;br /&gt;
axis equal &lt;br /&gt;
legend('Curva','Velocidad','Aceleración'); &lt;br /&gt;
title('Curva, velocidad y aceleración');&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Longitud de la curva ===&lt;br /&gt;
&lt;br /&gt;
La longitud de la curva se calcula mediante la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} \|\gamma'(t)\| dt = \int_0^{2\pi} 3\sqrt{(1-\cos t)^2 + \sin^2 t} \, dt&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Simplificando el integrando obtenemos &amp;lt;math&amp;gt;6\sin(t/2)&amp;lt;/math&amp;gt;. Resolviendo la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} 6\sin(t/2) dt = [-12\cos(t/2)]_0^{2\pi} = 24&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Cálculo numérico (Método del Rectángulo):'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
clear;clc;&lt;br /&gt;
N=10000; &lt;br /&gt;
h=(2*pi)/N;&lt;br /&gt;
t=0:h:(2*pi-h);&lt;br /&gt;
&lt;br /&gt;
dx=R*(1-cos(t));&lt;br /&gt;
dy=R*sin(t);&lt;br /&gt;
ds=sqrt(dx.^2+dy.^2);&lt;br /&gt;
&lt;br /&gt;
Longitud=sum(ds*h);&lt;br /&gt;
fprintf('Longitud Aproximada: %.5f\n', Longitud);&lt;br /&gt;
fprintf('Longitud Teórica: 24\n');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Vectores tangente y normal ===&lt;br /&gt;
&lt;br /&gt;
* '''Tangente unitario:''' &amp;lt;math&amp;gt;\vec{t}(t) = (\sin(t/2), \cos(t/2))&amp;lt;/math&amp;gt;&lt;br /&gt;
* '''Normal unitario:''' &amp;lt;math&amp;gt;\vec{n}(t) = (\cos(t/2), -\sin(t/2))&amp;lt;/math&amp;gt; (apuntando hacia el centro de curvatura).&lt;br /&gt;
[[Archivo:Curva_Tangente_Normal2.png|thumb|center|500px|Gráfica de la curva, tangente y normal generada en MATLAB]]&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
clear;clc;&lt;br /&gt;
R=3; &lt;br /&gt;
t=linspace(0,2*pi,12);&lt;br /&gt;
x=R*(t-sin(t));y=R*(1-cos(t));&lt;br /&gt;
%vectores&lt;br /&gt;
T1=R*(1-cos(t));&lt;br /&gt;
T2=R*(sin(t)); &lt;br /&gt;
norma= sqrt(T1.^2+T2.^2); &lt;br /&gt;
N1=T1./norma; &lt;br /&gt;
N2=T2./norma;&lt;br /&gt;
&lt;br /&gt;
figure &lt;br /&gt;
%Dibujo &lt;br /&gt;
plot(x,y,'k')&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,N1,N2,'r');&lt;br /&gt;
quiver(x,y,-N2,N1,'b'); &lt;br /&gt;
hold off&lt;br /&gt;
grid on&lt;br /&gt;
%Etiquetas &lt;br /&gt;
axis equal &lt;br /&gt;
legend('Curva','`Tangente','Normal'); &lt;br /&gt;
title('Curva, tangente y normal');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
[[Archivo:Cicloide_Frenet.png|thumb|center|400px|Diedro de Frenet a lo largo de la curva]]&lt;br /&gt;
&lt;br /&gt;
===  Curvatura ===&lt;br /&gt;
&lt;br /&gt;
La curvatura &amp;lt;math&amp;gt;\kappa(t)&amp;lt;/math&amp;gt; para &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; viene dada por:&lt;br /&gt;
:&amp;lt;math&amp;gt;\kappa(t) = \frac{1}{4R\sin(t/2)} = \frac{1}{12\sin(t/2)}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 5. Gráfica de la Curvatura ---&lt;br /&gt;
t_k = linspace(0.1, 2*pi-0.1, 100); &lt;br /&gt;
kappa = 1 ./ (12 * sin(t_k / 2));&lt;br /&gt;
&lt;br /&gt;
figure(3);&lt;br /&gt;
plot(t_k, kappa, 'r-', 'LineWidth', 2);&lt;br /&gt;
title('Curvatura \kappa(t)');&lt;br /&gt;
xlabel('t'); grid on;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Curvatura.png|thumb|center|400px|Gráfica de la curvatura en función de t]]&lt;br /&gt;
&lt;br /&gt;
===  Circunferencia osculatriz en t=4 ===&lt;br /&gt;
&lt;br /&gt;
Para el punto &amp;lt;math&amp;gt;P = \gamma(4)&amp;lt;/math&amp;gt;:&lt;br /&gt;
* Radio de curvatura: &amp;lt;math&amp;gt;\rho = 12\sin(2) \approx 10.91&amp;lt;/math&amp;gt;&lt;br /&gt;
* Centro de curvatura: Se calcula numéricamente desplazando &amp;lt;math&amp;gt;P&amp;lt;/math&amp;gt; en dirección normal.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 6. Circunferencia Osculatriz (t=4) ---&lt;br /&gt;
t0 = 4;&lt;br /&gt;
P0 = [R*(t0 - sin(t0)), R*(1 - cos(t0))];&lt;br /&gt;
rho = 12 * sin(t0/2);&lt;br /&gt;
N0 = [cos(t0/2), -sin(t0/2)]; &lt;br /&gt;
Centro = P0 + rho * N0;&lt;br /&gt;
&lt;br /&gt;
figure(4);&lt;br /&gt;
plot(x, y, 'b'); hold on; axis equal; grid on;&lt;br /&gt;
theta = linspace(0, 2*pi, 200);&lt;br /&gt;
xc = Centro(1) + rho * cos(theta);&lt;br /&gt;
yc = Centro(2) + rho * sin(theta);&lt;br /&gt;
plot(xc, yc, 'r--', 'LineWidth', 1.5);&lt;br /&gt;
plot(P0(1), P0(2), 'ko', 'MarkerFaceColor', 'k');&lt;br /&gt;
title('Circunferencia Osculatriz en t=4');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Osculatriz.png|thumb|center|400px|Circunferencia osculatriz en t=4]]&lt;br /&gt;
&lt;br /&gt;
===  Información sobre la curva ===&lt;br /&gt;
[[Archivo:Cicloide-rotacionchino.gif|thumb|333px|Generación de la trayectoria cicloidal]]&lt;br /&gt;
&amp;lt;br&amp;gt; &amp;lt;br&amp;gt;&lt;br /&gt;
La cicloide es una curva plana generada por la trayectoria de un punto fijo en el borde de una circunferencia generadora que rueda sin deslizar sobre una recta horizontal. Un ciclo completo de la curva se forma cuando el punto regresa a la recta horizontal, conocida como el eje horizontal o directriz, abarcando una longitud de 2πr, donde r es el radio del círculo generador.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
Las propiedades y definiciones importantes de la cicloide son:&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Círculo Generador: La circunferencia que gira y en cuyo borde se sitúa el punto que traza la curva.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Directriz (Eje Horizontal): La recta fija sobre la que rueda el círculo.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Punto Inferior y Superior: Los puntos más bajo (de contacto con la directriz) y más alto del círculo generador en cualquier instante, respectivamente.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Ángulo Principal: El ángulo entre la tangente a la cicloide en un punto dado y el eje horizontal.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo Rafajarillopillo.gif|thumb|250px|Generación de la trayectoria cicloidal]]&lt;br /&gt;
&amp;lt;br&amp;gt; &amp;lt;br&amp;gt;&lt;br /&gt;
La cicloide posee notables propiedades matemáticas, como que toda normal a la cicloide pasa por el punto inferior del círculo generador, y la tangente pasa por el punto superior. También existe una relación angular entre el ángulo que forman la normal a la cicloide y la directriz, que será la mitad del ángulo principal.&lt;br /&gt;
La cicloide es la solución a dos de los problemas más importantes de la mecánica clásica&lt;br /&gt;
Es fundamental en problemas de minimización del tiempo de descenso bajo gravedad, ya que es la curva de descenso más rápido entre dos puntos únicamente por la acción de la gravedad y partiendo de reposo (Braquistócrona). También es la curva donde el tiempo de descenso a el punto más bajo es independiente del punto de partida (Tautócrona).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===  Estructura civil ===&lt;br /&gt;
&lt;br /&gt;
Un ejemplo destacado del uso de arcos cicloidales es el **Museo de Arte Kimbell** en Texas, diseñado por el arquitecto Louis Kahn. La estructura de la cubierta está formada por bóvedas con perfil de cicloide que optimizan la distribución de la luz natural.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===  Superficie reglada en R3 ===&lt;br /&gt;
&lt;br /&gt;
Consideramos la superficie:&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(u, t) = (u, 3(t - \sin t), 3(1 + \cos t))&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:3Dhola.jpg|thumb|center|400px|Cicloide parametrizada en dimensión 3]]&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
u = 0:0.1:1;&lt;br /&gt;
t= 0:0.1:2*pi;&lt;br /&gt;
[U,T] = meshgrid(u,t);&lt;br /&gt;
&lt;br /&gt;
X1 = U;&lt;br /&gt;
X2 = R*(T-sin(T));&lt;br /&gt;
X3 = R*(1+cos(T));&lt;br /&gt;
&lt;br /&gt;
surf(X1,X2,X3);&lt;br /&gt;
colormap jet;&lt;br /&gt;
title('Superficie Reglada Cicloidal');&lt;br /&gt;
axis equal&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Superficie.png|thumb|center|400px|Superficie reglada generada en MATLAB]]&lt;br /&gt;
&lt;br /&gt;
===  Cálculo de la masa ===&lt;br /&gt;
&lt;br /&gt;
Dada la densidad &amp;lt;math&amp;gt;f(x_1, x_2, x_3) = (1 + x_1)(1 + x_2)x_3&amp;lt;/math&amp;gt;, calculamos la masa mediante la integral de superficie. El elemento de área diferencial es &amp;lt;math&amp;gt;dS = 6\sin(t/2) dt du&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 10. Cálculo de Masa ---&lt;br /&gt;
fun_densidad = @(u, t) (1 + u) .* (1 + R*(t - sin(t))) .* (R*(1 + cos(t))) .* (2*R*sin(t/2));&lt;br /&gt;
Masa_Total = integral2(fun_densidad, 0, 1, 0, 2*pi);&lt;br /&gt;
fprintf('Masa total: %.4f\n', Masa_Total);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Resultado aproximado:''' La masa calculada es &amp;lt;math&amp;gt;750.58&amp;lt;/math&amp;gt; unidades.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;/div&gt;</summary>
		<author><name>Tomas.young</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Curva_Tangente_Normal2.png&amp;diff=96537</id>
		<title>Archivo:Curva Tangente Normal2.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Curva_Tangente_Normal2.png&amp;diff=96537"/>
				<updated>2025-12-03T15:05:00Z</updated>
		
		<summary type="html">&lt;p&gt;Tomas.young: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Tomas.young</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96459</id>
		<title>La Cicloide (GRUPO 65)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96459"/>
				<updated>2025-12-03T14:48:51Z</updated>
		
		<summary type="html">&lt;p&gt;Tomas.young: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | La cicloide. Grupo 65 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | Rafael Jarillo Cabezas &amp;lt;br/&amp;gt; Miguel Tao, Tentor Gonzalez de Eiris &amp;lt;br/&amp;gt; Felipe Yagüe López &amp;lt;br/&amp;gt; Tomas Young Christiansen &amp;lt;br/&amp;gt; Luca Raffin Barrios}}&lt;br /&gt;
Se considera una curva en un plano de dimensión 2 dada por la parametrización: &lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt; 𝛾(t) = (x(t),y(t)) = (R(t-sint),R(1-cost)),      t∈(0,2π) &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
Siendo R un número positivo fijo. En este caso R=3&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Consideramos la curva plana dada por la parametrización en coordenadas cartesianas:&lt;br /&gt;
&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(t) = (x(t), y(t)) = (R(t - \sin t), R(1 - \cos t)), \quad t \in (0, 2\pi)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; es un número positivo fijado. En este trabajo tomamos '''&amp;lt;math&amp;gt;R = 3&amp;lt;/math&amp;gt;'''.&lt;br /&gt;
&lt;br /&gt;
===  Dibujar la curva ===&lt;br /&gt;
&lt;br /&gt;
La curva representa el trayecto de un punto en el borde de una rueda de radio &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; que gira sin deslizar.&lt;br /&gt;
[[Archivo:felipeyluca.jpg|thumb|center|500px|Gráfica de la Cicloide (R=3) generada en MATLAB]]&lt;br /&gt;
&amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
&lt;br /&gt;
R = 3;&lt;br /&gt;
t = linspace(0, 2*pi, 1000);&lt;br /&gt;
&lt;br /&gt;
% Parametrización&lt;br /&gt;
x = R * (t - sin(t));&lt;br /&gt;
y = R * (1 - cos(t));&lt;br /&gt;
&lt;br /&gt;
% Dibujo&lt;br /&gt;
plot(x, y, 'b-', 'LineWidth', 2);&lt;br /&gt;
title('Gráfica de la Cicloide (R=3)');&lt;br /&gt;
xlabel('x'); ylabel('y');&lt;br /&gt;
axis equal; grid on; xlim([0, 2*pi*R]);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Vectores velocidad y aceleración ===&lt;br /&gt;
&lt;br /&gt;
Calculamos analíticamente los vectores derivando la parametrización:&lt;br /&gt;
El vector velocidad corresponde a la primera derivada del vector inicial con respecto al parámetro t. La parametrización se muestra a continuación:&lt;br /&gt;
* '''Velocidad:''' &amp;lt;math&amp;gt;\gamma'(t) = (3(1 - \cos t), 3\sin t)&amp;lt;/math&amp;gt;&lt;br /&gt;
El vector aceleración viene dado por la segunda derivada de la cicloide con respecto al parámetro t. El vector calculado es el siguiente:&lt;br /&gt;
* '''Aceleración:''' &amp;lt;math&amp;gt;\gamma''(t) = (3\sin t, 3\cos t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación, el código para dibujarlos en un punto arbitrario (por ejemplo, &amp;lt;math&amp;gt;t = \pi/2&amp;lt;/math&amp;gt;):&lt;br /&gt;
[[Archivo:VEL.ACEL.jpg|thumb|center|500px|Gráfica de la curva, velocidad y aceleración generada en MATLAB]]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
clear;clc;&lt;br /&gt;
R=3; &lt;br /&gt;
t=linspace(0,2*pi,20);&lt;br /&gt;
x=R*(t-sin(t));y=R*(1-cos(t));&lt;br /&gt;
%vectores&lt;br /&gt;
Vx=R*(1-cos(t));Vy=R*(sin(t)); &lt;br /&gt;
Ax=R*(sin(t)); Ay=R*(cos(t)); &lt;br /&gt;
figure &lt;br /&gt;
%Dibujo &lt;br /&gt;
plot(x,y,'k')&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,Vx,Vy,'b');&lt;br /&gt;
quiver(x,y,Ax,Ay,'g'); &lt;br /&gt;
hold off&lt;br /&gt;
grid on&lt;br /&gt;
%Etiquetas &lt;br /&gt;
axis equal &lt;br /&gt;
legend('Curva','Velocidad','Aceleración'); &lt;br /&gt;
title('Curva, velocidad y aceleración');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Longitud de la curva ===&lt;br /&gt;
&lt;br /&gt;
La longitud de la curva se calcula mediante la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} \|\gamma'(t)\| dt = \int_0^{2\pi} 3\sqrt{(1-\cos t)^2 + \sin^2 t} \, dt&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Simplificando el integrando obtenemos &amp;lt;math&amp;gt;6\sin(t/2)&amp;lt;/math&amp;gt;. Resolviendo la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} 6\sin(t/2) dt = [-12\cos(t/2)]_0^{2\pi} = 24&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Cálculo numérico (Método del Rectángulo):'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 3. Longitud de Arco (Método Rectángulo) ---&lt;br /&gt;
N = 10000; &lt;br /&gt;
h = (2*pi) / N;&lt;br /&gt;
t_rect = 0:h:(2*pi-h);&lt;br /&gt;
&lt;br /&gt;
dx = R * (1 - cos(t_rect));&lt;br /&gt;
dy = R * sin(t_rect);&lt;br /&gt;
ds = sqrt(dx.^2 + dy.^2);&lt;br /&gt;
&lt;br /&gt;
Longitud_Aprox = sum(ds * h);&lt;br /&gt;
fprintf('Longitud Aproximada: %.5f\n', Longitud_Aprox);&lt;br /&gt;
fprintf('Longitud Teórica: 24\n');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Vectores tangente y normal ===&lt;br /&gt;
&lt;br /&gt;
* '''Tangente unitario:''' &amp;lt;math&amp;gt;\vec{t}(t) = (\sin(t/2), \cos(t/2))&amp;lt;/math&amp;gt;&lt;br /&gt;
* '''Normal unitario:''' &amp;lt;math&amp;gt;\vec{n}(t) = (\cos(t/2), -\sin(t/2))&amp;lt;/math&amp;gt; (apuntando hacia el centro de curvatura).&lt;br /&gt;
[[Archivo:Curva_Tangente_Normal.png|thumb|center|500px|Gráfica de la curva, tangente y normal generada en MATLAB]]&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
clear;clc;&lt;br /&gt;
R=3; &lt;br /&gt;
t=linspace(0,2*pi,12);&lt;br /&gt;
x=R*(t-sin(t));y=R*(1-cos(t));&lt;br /&gt;
%vectores&lt;br /&gt;
T1=R*(1-cos(t));&lt;br /&gt;
T2=R*(sin(t)); &lt;br /&gt;
norma= sqrt(T1.^2+T2.^2); &lt;br /&gt;
N1=T1./norma; &lt;br /&gt;
N2=T2./norma;&lt;br /&gt;
&lt;br /&gt;
figure &lt;br /&gt;
%Dibujo &lt;br /&gt;
plot(x,y,'k')&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,N1,N2,'r');&lt;br /&gt;
quiver(x,y,-N2,N1,'b'); &lt;br /&gt;
hold off&lt;br /&gt;
grid on&lt;br /&gt;
%Etiquetas &lt;br /&gt;
axis equal &lt;br /&gt;
legend('Curva','`Tangente','Normal'); &lt;br /&gt;
title('Curva, tangente y normal');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
[[Archivo:Cicloide_Frenet.png|thumb|center|400px|Diedro de Frenet a lo largo de la curva]]&lt;br /&gt;
&lt;br /&gt;
===  Curvatura ===&lt;br /&gt;
&lt;br /&gt;
La curvatura &amp;lt;math&amp;gt;\kappa(t)&amp;lt;/math&amp;gt; para &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; viene dada por:&lt;br /&gt;
:&amp;lt;math&amp;gt;\kappa(t) = \frac{1}{4R\sin(t/2)} = \frac{1}{12\sin(t/2)}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 5. Gráfica de la Curvatura ---&lt;br /&gt;
t_k = linspace(0.1, 2*pi-0.1, 100); &lt;br /&gt;
kappa = 1 ./ (12 * sin(t_k / 2));&lt;br /&gt;
&lt;br /&gt;
figure(3);&lt;br /&gt;
plot(t_k, kappa, 'r-', 'LineWidth', 2);&lt;br /&gt;
title('Curvatura \kappa(t)');&lt;br /&gt;
xlabel('t'); grid on;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Curvatura.png|thumb|center|400px|Gráfica de la curvatura en función de t]]&lt;br /&gt;
&lt;br /&gt;
===  Circunferencia osculatriz en t=4 ===&lt;br /&gt;
&lt;br /&gt;
Para el punto &amp;lt;math&amp;gt;P = \gamma(4)&amp;lt;/math&amp;gt;:&lt;br /&gt;
* Radio de curvatura: &amp;lt;math&amp;gt;\rho = 12\sin(2) \approx 10.91&amp;lt;/math&amp;gt;&lt;br /&gt;
* Centro de curvatura: Se calcula numéricamente desplazando &amp;lt;math&amp;gt;P&amp;lt;/math&amp;gt; en dirección normal.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 6. Circunferencia Osculatriz (t=4) ---&lt;br /&gt;
t0 = 4;&lt;br /&gt;
P0 = [R*(t0 - sin(t0)), R*(1 - cos(t0))];&lt;br /&gt;
rho = 12 * sin(t0/2);&lt;br /&gt;
N0 = [cos(t0/2), -sin(t0/2)]; &lt;br /&gt;
Centro = P0 + rho * N0;&lt;br /&gt;
&lt;br /&gt;
figure(4);&lt;br /&gt;
plot(x, y, 'b'); hold on; axis equal; grid on;&lt;br /&gt;
theta = linspace(0, 2*pi, 200);&lt;br /&gt;
xc = Centro(1) + rho * cos(theta);&lt;br /&gt;
yc = Centro(2) + rho * sin(theta);&lt;br /&gt;
plot(xc, yc, 'r--', 'LineWidth', 1.5);&lt;br /&gt;
plot(P0(1), P0(2), 'ko', 'MarkerFaceColor', 'k');&lt;br /&gt;
title('Circunferencia Osculatriz en t=4');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Osculatriz.png|thumb|center|400px|Circunferencia osculatriz en t=4]]&lt;br /&gt;
&lt;br /&gt;
===  Información sobre la curva ===&lt;br /&gt;
[[Archivo:Cicloide-rotacionchino.gif|thumb|333px|Generación de la trayectoria cicloidal]]&lt;br /&gt;
&amp;lt;br&amp;gt; &amp;lt;br&amp;gt;&lt;br /&gt;
La cicloide es una curva plana generada por la trayectoria de un punto fijo en el borde de una circunferencia generadora que rueda sin deslizar sobre una recta horizontal. Un ciclo completo de la curva se forma cuando el punto regresa a la recta horizontal, conocida como el eje horizontal o directriz, abarcando una longitud de 2πr, donde r es el radio del círculo generador.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
Las propiedades y definiciones importantes de la cicloide son:&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Círculo Generador: La circunferencia que gira y en cuyo borde se sitúa el punto que traza la curva.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Directriz (Eje Horizontal): La recta fija sobre la que rueda el círculo.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Punto Inferior y Superior: Los puntos más bajo (de contacto con la directriz) y más alto del círculo generador en cualquier instante, respectivamente.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
-Ángulo Principal: El ángulo entre la tangente a la cicloide en un punto dado y el eje horizontal.&lt;br /&gt;
&amp;lt;br&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo Rafajarillopillo.gif|thumb|250px|Generación de la trayectoria cicloidal]]&lt;br /&gt;
&amp;lt;br&amp;gt; &amp;lt;br&amp;gt;&lt;br /&gt;
La cicloide posee notables propiedades matemáticas, como que toda normal a la cicloide pasa por el punto inferior del círculo generador, y la tangente pasa por el punto superior. También existe una relación angular entre el ángulo que forman la normal a la cicloide y la directriz, que será la mitad del ángulo principal.&lt;br /&gt;
La cicloide es la solución a dos de los problemas más importantes de la mecánica clásica&lt;br /&gt;
Es fundamental en problemas de minimización del tiempo de descenso bajo gravedad, ya que es la curva de descenso más rápido entre dos puntos únicamente por la acción de la gravedad y partiendo de reposo (Braquistócrona). También es la curva donde el tiempo de descenso a el punto más bajo es independiente del punto de partida (Tautócrona).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===  Estructura civil ===&lt;br /&gt;
&lt;br /&gt;
Un ejemplo destacado del uso de arcos cicloidales es el **Museo de Arte Kimbell** en Texas, diseñado por el arquitecto Louis Kahn. La estructura de la cubierta está formada por bóvedas con perfil de cicloide que optimizan la distribución de la luz natural.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===  Superficie reglada en R3 ===&lt;br /&gt;
&lt;br /&gt;
Consideramos la superficie:&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(u, t) = (u, 3(t - \sin t), 3(1 + \cos t))&amp;lt;/math&amp;gt;&lt;br /&gt;
[[Archivo:3Dhola.jpg|thumb|center|400px|Cicloide parametrizada en dimensión 3]]&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
u = 0:0.1:1;&lt;br /&gt;
t= 0:0.1:2*pi;&lt;br /&gt;
[U,T] = meshgrid(u,t);&lt;br /&gt;
&lt;br /&gt;
X1 = U;&lt;br /&gt;
X2 = R*(T-sin(T));&lt;br /&gt;
X3 = R*(1+cos(T));&lt;br /&gt;
&lt;br /&gt;
surf(X1,X2,X3);&lt;br /&gt;
colormap jet;&lt;br /&gt;
title('Superficie Reglada Cicloidal');&lt;br /&gt;
axis equal&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Superficie.png|thumb|center|400px|Superficie reglada generada en MATLAB]]&lt;br /&gt;
&lt;br /&gt;
===  Cálculo de la masa ===&lt;br /&gt;
&lt;br /&gt;
Dada la densidad &amp;lt;math&amp;gt;f(x_1, x_2, x_3) = (1 + x_1)(1 + x_2)x_3&amp;lt;/math&amp;gt;, calculamos la masa mediante la integral de superficie. El elemento de área diferencial es &amp;lt;math&amp;gt;dS = 6\sin(t/2) dt du&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 10. Cálculo de Masa ---&lt;br /&gt;
fun_densidad = @(u, t) (1 + u) .* (1 + R*(t - sin(t))) .* (R*(1 + cos(t))) .* (2*R*sin(t/2));&lt;br /&gt;
Masa_Total = integral2(fun_densidad, 0, 1, 0, 2*pi);&lt;br /&gt;
fprintf('Masa total: %.4f\n', Masa_Total);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Resultado aproximado:''' La masa calculada es &amp;lt;math&amp;gt;750.58&amp;lt;/math&amp;gt; unidades.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;/div&gt;</summary>
		<author><name>Tomas.young</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=Archivo:Curva_Tangente_Normal.png&amp;diff=96414</id>
		<title>Archivo:Curva Tangente Normal.png</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=Archivo:Curva_Tangente_Normal.png&amp;diff=96414"/>
				<updated>2025-12-03T14:34:45Z</updated>
		
		<summary type="html">&lt;p&gt;Tomas.young: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&lt;/div&gt;</summary>
		<author><name>Tomas.young</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96320</id>
		<title>La Cicloide (GRUPO 65)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96320"/>
				<updated>2025-12-03T14:08:33Z</updated>
		
		<summary type="html">&lt;p&gt;Tomas.young: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | La cicloide. Grupo 65 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | Rafael Jarillo Cabezas &amp;lt;br/&amp;gt; Miguel Tao, Tentor Gonzalez de Eiris &amp;lt;br/&amp;gt; Felipe Yagüe López &amp;lt;br/&amp;gt; Tomas Young Christiansen &amp;lt;br/&amp;gt; Luca Raffin Barrios}}&lt;br /&gt;
Se considera una curva en un plano de dimensión 2 dada por la parametrización: &lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt; 𝛾(t) = (x(t),y(t)) = (R(t-sint),R(1-cost)),      t∈(0,2π) &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
Siendo R un número positivo fijo. En este caso R=3&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
Consideramos la curva plana dada por la parametrización en coordenadas cartesianas:&lt;br /&gt;
&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(t) = (x(t), y(t)) = (R(t - \sin t), R(1 - \cos t)), \quad t \in (0, 2\pi)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; es un número positivo fijado. En este trabajo tomamos '''&amp;lt;math&amp;gt;R = 3&amp;lt;/math&amp;gt;'''.&lt;br /&gt;
&lt;br /&gt;
===  Dibujar la curva ===&lt;br /&gt;
&lt;br /&gt;
La curva representa el trayecto de un punto en el borde de una rueda de radio &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; que gira sin deslizar.&lt;br /&gt;
[[Archivo:felipeyluca.jpg|thumb|center|400px|Gráfica de la Cicloide (R=3) generada en MATLAB]]&lt;br /&gt;
&amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
&lt;br /&gt;
R = 3;&lt;br /&gt;
t = linspace(0, 2*pi, 1000);&lt;br /&gt;
&lt;br /&gt;
% Parametrización&lt;br /&gt;
x = R * (t - sin(t));&lt;br /&gt;
y = R * (1 - cos(t));&lt;br /&gt;
&lt;br /&gt;
% Dibujo&lt;br /&gt;
plot(x, y, 'b-', 'LineWidth', 2);&lt;br /&gt;
title('Gráfica de la Cicloide (R=3)');&lt;br /&gt;
xlabel('x'); ylabel('y');&lt;br /&gt;
axis equal; grid on; xlim([0, 2*pi*R]);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Vectores velocidad y aceleración ===&lt;br /&gt;
&lt;br /&gt;
Calculamos analíticamente los vectores derivando la parametrización:&lt;br /&gt;
El vector velocidad corresponde a la primera derivada del vector inicial con respecto al parámetro t. La parametrización se muestra a continuación:&lt;br /&gt;
* '''Velocidad:''' &amp;lt;math&amp;gt;\gamma'(t) = (3(1 - \cos t), 3\sin t)&amp;lt;/math&amp;gt;&lt;br /&gt;
El vector aceleración viene dado por la segunda derivada de la cicloide con respecto al parámetro t. El vector calculado es el siguiente:&lt;br /&gt;
* '''Aceleración:''' &amp;lt;math&amp;gt;\gamma''(t) = (3\sin t, 3\cos t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación, el código para dibujarlos en un punto arbitrario (por ejemplo, &amp;lt;math&amp;gt;t = \pi/2&amp;lt;/math&amp;gt;):&lt;br /&gt;
[[Archivo:VEL.ACEL.jpg|thumb|center|400px|Gráfica de la curva, velocidad y aceleración generada en MATLAB]]&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
clear;clc;&lt;br /&gt;
R=3; &lt;br /&gt;
t=linspace(0,2*pi,20);&lt;br /&gt;
x=R*(t-sin(t));y=R*(1-cos(t));&lt;br /&gt;
%vectores&lt;br /&gt;
Vx=R*(1-cos(t));Vy=R*(sin(t)); &lt;br /&gt;
Ax=R*(sin(t)); Ay=R*(cos(t)); &lt;br /&gt;
figure &lt;br /&gt;
%Dibujo &lt;br /&gt;
plot(x,y,'k')&lt;br /&gt;
hold on&lt;br /&gt;
quiver(x,y,Vx,Vy,'b');&lt;br /&gt;
quiver(x,y,Ax,Ay,'g'); &lt;br /&gt;
hold off&lt;br /&gt;
grid on&lt;br /&gt;
%Etiquetas &lt;br /&gt;
axis equal &lt;br /&gt;
legend('Curva','Velocidad','Aceleración'); &lt;br /&gt;
title('Curva, velocidad y aceleración');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
=== Longitud de la curva ===&lt;br /&gt;
&lt;br /&gt;
La longitud de la curva se calcula mediante la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} \|\gamma'(t)\| dt = \int_0^{2\pi} 3\sqrt{(1-\cos t)^2 + \sin^2 t} \, dt&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Simplificando el integrando obtenemos &amp;lt;math&amp;gt;6\sin(t/2)&amp;lt;/math&amp;gt;. Resolviendo la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} 6\sin(t/2) dt = [-12\cos(t/2)]_0^{2\pi} = 24&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Cálculo numérico (Método del Rectángulo):'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 3. Longitud de Arco (Método Rectángulo) ---&lt;br /&gt;
N = 10000; &lt;br /&gt;
h = (2*pi) / N;&lt;br /&gt;
t_rect = 0:h:(2*pi-h);&lt;br /&gt;
&lt;br /&gt;
dx = R * (1 - cos(t_rect));&lt;br /&gt;
dy = R * sin(t_rect);&lt;br /&gt;
ds = sqrt(dx.^2 + dy.^2);&lt;br /&gt;
&lt;br /&gt;
Longitud_Aprox = sum(ds * h);&lt;br /&gt;
fprintf('Longitud Aproximada: %.5f\n', Longitud_Aprox);&lt;br /&gt;
fprintf('Longitud Teórica: 24\n');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Vectores tangente y normal ===&lt;br /&gt;
&lt;br /&gt;
* '''Tangente unitario:''' &amp;lt;math&amp;gt;\vec{t}(t) = (\sin(t/2), \cos(t/2))&amp;lt;/math&amp;gt;&lt;br /&gt;
* '''Normal unitario:''' &amp;lt;math&amp;gt;\vec{n}(t) = (\cos(t/2), -\sin(t/2))&amp;lt;/math&amp;gt; (apuntando hacia el centro de curvatura).&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 4. Vectores Tangente y Normal ---&lt;br /&gt;
figure(2);&lt;br /&gt;
plot(x, y, 'b'); hold on; axis equal; grid on;&lt;br /&gt;
title('Vectores Tangente (Magenta) y Normal (Cian)');&lt;br /&gt;
&lt;br /&gt;
t_vals = 1:1:5; &lt;br /&gt;
for k = 1:length(t_vals)&lt;br /&gt;
    tk = t_vals(k);&lt;br /&gt;
    Pk = [R*(tk - sin(tk)), R*(1 - cos(tk))];&lt;br /&gt;
    &lt;br /&gt;
    vk = [R*(1 - cos(tk)), R*sin(tk)];&lt;br /&gt;
    Tk = vk / norm(vk);      % Tangente&lt;br /&gt;
    Nk = [Tk(2), -Tk(1)];    % Normal&lt;br /&gt;
    &lt;br /&gt;
    quiver(Pk(1), Pk(2), Tk(1), Tk(2), 0.5, 'm', 'LineWidth', 2);&lt;br /&gt;
    quiver(Pk(1), Pk(2), Nk(1), Nk(2), 0.5, 'c', 'LineWidth', 2);&lt;br /&gt;
end&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Frenet.png|thumb|center|400px|Diedro de Frenet a lo largo de la curva]]&lt;br /&gt;
&lt;br /&gt;
===  Curvatura ===&lt;br /&gt;
&lt;br /&gt;
La curvatura &amp;lt;math&amp;gt;\kappa(t)&amp;lt;/math&amp;gt; para &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; viene dada por:&lt;br /&gt;
:&amp;lt;math&amp;gt;\kappa(t) = \frac{1}{4R\sin(t/2)} = \frac{1}{12\sin(t/2)}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 5. Gráfica de la Curvatura ---&lt;br /&gt;
t_k = linspace(0.1, 2*pi-0.1, 100); &lt;br /&gt;
kappa = 1 ./ (12 * sin(t_k / 2));&lt;br /&gt;
&lt;br /&gt;
figure(3);&lt;br /&gt;
plot(t_k, kappa, 'r-', 'LineWidth', 2);&lt;br /&gt;
title('Curvatura \kappa(t)');&lt;br /&gt;
xlabel('t'); grid on;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Curvatura.png|thumb|center|400px|Gráfica de la curvatura en función de t]]&lt;br /&gt;
&lt;br /&gt;
===  Circunferencia osculatriz en t=4 ===&lt;br /&gt;
&lt;br /&gt;
Para el punto &amp;lt;math&amp;gt;P = \gamma(4)&amp;lt;/math&amp;gt;:&lt;br /&gt;
* Radio de curvatura: &amp;lt;math&amp;gt;\rho = 12\sin(2) \approx 10.91&amp;lt;/math&amp;gt;&lt;br /&gt;
* Centro de curvatura: Se calcula numéricamente desplazando &amp;lt;math&amp;gt;P&amp;lt;/math&amp;gt; en dirección normal.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 6. Circunferencia Osculatriz (t=4) ---&lt;br /&gt;
t0 = 4;&lt;br /&gt;
P0 = [R*(t0 - sin(t0)), R*(1 - cos(t0))];&lt;br /&gt;
rho = 12 * sin(t0/2);&lt;br /&gt;
N0 = [cos(t0/2), -sin(t0/2)]; &lt;br /&gt;
Centro = P0 + rho * N0;&lt;br /&gt;
&lt;br /&gt;
figure(4);&lt;br /&gt;
plot(x, y, 'b'); hold on; axis equal; grid on;&lt;br /&gt;
theta = linspace(0, 2*pi, 200);&lt;br /&gt;
xc = Centro(1) + rho * cos(theta);&lt;br /&gt;
yc = Centro(2) + rho * sin(theta);&lt;br /&gt;
plot(xc, yc, 'r--', 'LineWidth', 1.5);&lt;br /&gt;
plot(P0(1), P0(2), 'ko', 'MarkerFaceColor', 'k');&lt;br /&gt;
title('Circunferencia Osculatriz en t=4');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Osculatriz.png|thumb|center|400px|Circunferencia osculatriz en t=4]]&lt;br /&gt;
&lt;br /&gt;
===  Información sobre la curva ===&lt;br /&gt;
&lt;br /&gt;
La cicloide es una curva plana generada por la trayectoria de un punto fijo en el borde de una circunferencia generadora que rueda sin deslizar sobre una recta horizontal. Un ciclo completo de la curva se forma cuando el punto regresa a la recta horizontal, conocida como el eje horizontal o directriz. abarcando una longitud de 2πr, donde r es el radio del círculo generador &lt;br /&gt;
-Círculo Generador: La circunferencia que gira y en cuyo borde se sitúa el punto que traza la curva.&lt;br /&gt;
-Directriz (Eje Horizontal): La recta fija sobre la que rueda el círculo.&lt;br /&gt;
-Punto Inferior y Superior: Los puntos más bajo (de contacto con la directriz) y más alto del círculo generador en cualquier instante, respectivamente.&lt;br /&gt;
-Ángulo Principal: El ángulo entre la tangente a la cicloide en un punto dado y el eje horizontal.&lt;br /&gt;
La cicloide posee notables propiedades matemáticas, como que toda normal a la cicloide pasa por el punto inferior del círculo generador, y la tangente pasa por el punto superior. También existe una relación angular entre el ángulo que forman la normal a la cicloide y la directriz, que será la mitad del ángulo principal.&lt;br /&gt;
La cicloide es la solución a dos de los problemas más importantes de la mecánica clásica&lt;br /&gt;
Es fundamental en problemas de minimización del tiempo de descenso bajo gravedad, ya que es la curva de descenso más rápido entre dos puntos únicamente por la acción de la gravedad y partiendo de reposo (Braquistócrona). También es la curva donde el tiempo de descenso a el punto más bajo es independiente del punto de partida (Tautócrona).&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
===  Estructura civil ===&lt;br /&gt;
&lt;br /&gt;
Un ejemplo destacado del uso de arcos cicloidales es el **Museo de Arte Kimbell** en Texas, diseñado por el arquitecto Louis Kahn. La estructura de la cubierta está formada por bóvedas con perfil de cicloide que optimizan la distribución de la luz natural.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Kimbell_Art_Museum.jpg|thumb|center|400px|Bóvedas cicloidales del Museo de Arte Kimbell]]&lt;br /&gt;
&lt;br /&gt;
===  Superficie reglada en R3 ===&lt;br /&gt;
&lt;br /&gt;
Consideramos la superficie:&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(u, t) = (u, 3(t - \sin t), 3(1 + \cos t))&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 9. Superficie Reglada ---&lt;br /&gt;
u = 0:0.1:1;&lt;br /&gt;
t_surf = 0:0.1:2*pi;&lt;br /&gt;
[U, T] = meshgrid(u, t_surf);&lt;br /&gt;
&lt;br /&gt;
X1 = U;&lt;br /&gt;
X2 = R * (T - sin(T));&lt;br /&gt;
X3 = R * (1 + cos(T));&lt;br /&gt;
&lt;br /&gt;
figure(5);&lt;br /&gt;
surf(X1, X2, X3);&lt;br /&gt;
shading interp; colormap jet;&lt;br /&gt;
title('Superficie Reglada Cicloidal');&lt;br /&gt;
axis tight; view(45, 30);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Superficie.png|thumb|center|400px|Superficie reglada generada en MATLAB]]&lt;br /&gt;
&lt;br /&gt;
===  Cálculo de la masa ===&lt;br /&gt;
&lt;br /&gt;
Dada la densidad &amp;lt;math&amp;gt;f(x_1, x_2, x_3) = (1 + x_1)(1 + x_2)x_3&amp;lt;/math&amp;gt;, calculamos la masa mediante la integral de superficie. El elemento de área diferencial es &amp;lt;math&amp;gt;dS = 6\sin(t/2) dt du&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 10. Cálculo de Masa ---&lt;br /&gt;
fun_densidad = @(u, t) (1 + u) .* (1 + R*(t - sin(t))) .* (R*(1 + cos(t))) .* (2*R*sin(t/2));&lt;br /&gt;
Masa_Total = integral2(fun_densidad, 0, 1, 0, 2*pi);&lt;br /&gt;
fprintf('Masa total: %.4f\n', Masa_Total);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Resultado aproximado:''' La masa calculada es &amp;lt;math&amp;gt;750.58&amp;lt;/math&amp;gt; unidades.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;/div&gt;</summary>
		<author><name>Tomas.young</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96291</id>
		<title>La Cicloide (GRUPO 65)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96291"/>
				<updated>2025-12-03T13:38:11Z</updated>
		
		<summary type="html">&lt;p&gt;Tomas.young: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | La cicloide. Grupo 65 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | Rafael Jarillo Cabezas &amp;lt;br/&amp;gt; Miguel Tao, Tentor Gonzalez de Eiris &amp;lt;br/&amp;gt; Felipe Yagüe López &amp;lt;br/&amp;gt; Tomas Young Christiansen &amp;lt;br/&amp;gt; Luca Raffin Barrios}}&lt;br /&gt;
Se considera una curva en un plano de dimensión 2 dada por la parametrización: &lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt; 𝛾(t) = (x(t),y(t)) = (R(t-sint),R(1-cost)),      t∈(0,2π) &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
Siendo R un número positivo fijo. En este caso R=3&lt;br /&gt;
&lt;br /&gt;
== G. La Cicloide ==&lt;br /&gt;
&lt;br /&gt;
Consideramos la curva plana dada por la parametrización en coordenadas cartesianas:&lt;br /&gt;
&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(t) = (x(t), y(t)) = (R(t - \sin t), R(1 - \cos t)), \quad t \in (0, 2\pi)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; es un número positivo fijado. En este trabajo tomamos '''&amp;lt;math&amp;gt;R = 3&amp;lt;/math&amp;gt;'''.&lt;br /&gt;
&lt;br /&gt;
===  Dibujar la curva ===&lt;br /&gt;
&lt;br /&gt;
La curva representa el trayecto de un punto en el borde de una rueda de radio &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; que gira sin deslizar.&lt;br /&gt;
[[Archivo:felipeyluca.jpg|thumb|center|500px|Gráfica de la Cicloide (R=3) generada en MATLAB]]&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 1. Gráfica de la Cicloide ---&lt;br /&gt;
&lt;br /&gt;
R = 3;&lt;br /&gt;
t = linspace(0, 2*pi, 1000);&lt;br /&gt;
&lt;br /&gt;
% Parametrización&lt;br /&gt;
x = R * (t - sin(t));&lt;br /&gt;
y = R * (1 - cos(t));&lt;br /&gt;
&lt;br /&gt;
figure(1);&lt;br /&gt;
plot(x, y, 'b-', 'LineWidth', 2);&lt;br /&gt;
title('Gráfica de la Cicloide (R=3)');&lt;br /&gt;
xlabel('x'); ylabel('y');&lt;br /&gt;
axis equal; grid on; xlim([0, 2*pi*R]);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Vectores velocidad y aceleración ===&lt;br /&gt;
&lt;br /&gt;
Calculamos analíticamente los vectores derivando la parametrización:&lt;br /&gt;
El vector velocidad corresponde a la primera derivada del vector inicial con respecto al parámetro t. La parametrización se muestra a continuación:&lt;br /&gt;
* '''Velocidad:''' &amp;lt;math&amp;gt;\gamma'(t) = (3(1 - \cos t), 3\sin t)&amp;lt;/math&amp;gt;&lt;br /&gt;
El vector aceleración viene dado por la segunda derivada de la cicloide con respecto al parámetro t. El vector calculado es el siguiente:&lt;br /&gt;
* '''Aceleración:''' &amp;lt;math&amp;gt;\gamma''(t) = (3\sin t, 3\cos t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación, el código para dibujarlos en un punto arbitrario (por ejemplo, &amp;lt;math&amp;gt;t = \pi/2&amp;lt;/math&amp;gt;):&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 2. Vectores Velocidad y Aceleración ---&lt;br /&gt;
t_p = pi/2; % Punto de ejemplo&lt;br /&gt;
P_vec = [R*(t_p - sin(t_p)), R*(1 - cos(t_p))];&lt;br /&gt;
&lt;br /&gt;
% Cálculo de vectores&lt;br /&gt;
Vel = [R*(1 - cos(t_p)), R*sin(t_p)];&lt;br /&gt;
Acc = [3*sin(t_p), 3*cos(t_p)];&lt;br /&gt;
&lt;br /&gt;
figure(1); hold on;&lt;br /&gt;
quiver(P_vec(1), P_vec(2), Vel(1), Vel(2), 'r', 'LineWidth', 2, 'MaxHeadSize', 0.5, 'DisplayName', 'Velocidad');&lt;br /&gt;
quiver(P_vec(1), P_vec(2), Acc(1), Acc(2), 'g', 'LineWidth', 2, 'MaxHeadSize', 0.5, 'DisplayName', 'Aceleración');&lt;br /&gt;
legend show;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Vectores.png|thumb|center|400px|Vectores velocidad y aceleración sobre la curva]]&lt;br /&gt;
&lt;br /&gt;
=== Longitud de la curva ===&lt;br /&gt;
&lt;br /&gt;
La longitud de la curva se calcula mediante la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} \|\gamma'(t)\| dt = \int_0^{2\pi} 3\sqrt{(1-\cos t)^2 + \sin^2 t} \, dt&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Simplificando el integrando obtenemos &amp;lt;math&amp;gt;6\sin(t/2)&amp;lt;/math&amp;gt;. Resolviendo la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} 6\sin(t/2) dt = [-12\cos(t/2)]_0^{2\pi} = 24&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Cálculo numérico (Método del Rectángulo):'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 3. Longitud de Arco (Método Rectángulo) ---&lt;br /&gt;
N = 10000; &lt;br /&gt;
h = (2*pi) / N;&lt;br /&gt;
t_rect = 0:h:(2*pi-h);&lt;br /&gt;
&lt;br /&gt;
dx = R * (1 - cos(t_rect));&lt;br /&gt;
dy = R * sin(t_rect);&lt;br /&gt;
ds = sqrt(dx.^2 + dy.^2);&lt;br /&gt;
&lt;br /&gt;
Longitud_Aprox = sum(ds * h);&lt;br /&gt;
fprintf('Longitud Aproximada: %.5f\n', Longitud_Aprox);&lt;br /&gt;
fprintf('Longitud Teórica: 24\n');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Vectores tangente y normal ===&lt;br /&gt;
&lt;br /&gt;
* '''Tangente unitario:''' &amp;lt;math&amp;gt;\vec{t}(t) = (\sin(t/2), \cos(t/2))&amp;lt;/math&amp;gt;&lt;br /&gt;
* '''Normal unitario:''' &amp;lt;math&amp;gt;\vec{n}(t) = (\cos(t/2), -\sin(t/2))&amp;lt;/math&amp;gt; (apuntando hacia el centro de curvatura).&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 4. Vectores Tangente y Normal ---&lt;br /&gt;
figure(2);&lt;br /&gt;
plot(x, y, 'b'); hold on; axis equal; grid on;&lt;br /&gt;
title('Vectores Tangente (Magenta) y Normal (Cian)');&lt;br /&gt;
&lt;br /&gt;
t_vals = 1:1:5; &lt;br /&gt;
for k = 1:length(t_vals)&lt;br /&gt;
    tk = t_vals(k);&lt;br /&gt;
    Pk = [R*(tk - sin(tk)), R*(1 - cos(tk))];&lt;br /&gt;
    &lt;br /&gt;
    vk = [R*(1 - cos(tk)), R*sin(tk)];&lt;br /&gt;
    Tk = vk / norm(vk);      % Tangente&lt;br /&gt;
    Nk = [Tk(2), -Tk(1)];    % Normal&lt;br /&gt;
    &lt;br /&gt;
    quiver(Pk(1), Pk(2), Tk(1), Tk(2), 0.5, 'm', 'LineWidth', 2);&lt;br /&gt;
    quiver(Pk(1), Pk(2), Nk(1), Nk(2), 0.5, 'c', 'LineWidth', 2);&lt;br /&gt;
end&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Frenet.png|thumb|center|400px|Diedro de Frenet a lo largo de la curva]]&lt;br /&gt;
&lt;br /&gt;
===  Curvatura ===&lt;br /&gt;
&lt;br /&gt;
La curvatura &amp;lt;math&amp;gt;\kappa(t)&amp;lt;/math&amp;gt; para &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; viene dada por:&lt;br /&gt;
:&amp;lt;math&amp;gt;\kappa(t) = \frac{1}{4R\sin(t/2)} = \frac{1}{12\sin(t/2)}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 5. Gráfica de la Curvatura ---&lt;br /&gt;
t_k = linspace(0.1, 2*pi-0.1, 100); &lt;br /&gt;
kappa = 1 ./ (12 * sin(t_k / 2));&lt;br /&gt;
&lt;br /&gt;
figure(3);&lt;br /&gt;
plot(t_k, kappa, 'r-', 'LineWidth', 2);&lt;br /&gt;
title('Curvatura \kappa(t)');&lt;br /&gt;
xlabel('t'); grid on;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Curvatura.png|thumb|center|400px|Gráfica de la curvatura en función de t]]&lt;br /&gt;
&lt;br /&gt;
===  Circunferencia osculatriz en t=4 ===&lt;br /&gt;
&lt;br /&gt;
Para el punto &amp;lt;math&amp;gt;P = \gamma(4)&amp;lt;/math&amp;gt;:&lt;br /&gt;
* Radio de curvatura: &amp;lt;math&amp;gt;\rho = 12\sin(2) \approx 10.91&amp;lt;/math&amp;gt;&lt;br /&gt;
* Centro de curvatura: Se calcula numéricamente desplazando &amp;lt;math&amp;gt;P&amp;lt;/math&amp;gt; en dirección normal.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 6. Circunferencia Osculatriz (t=4) ---&lt;br /&gt;
t0 = 4;&lt;br /&gt;
P0 = [R*(t0 - sin(t0)), R*(1 - cos(t0))];&lt;br /&gt;
rho = 12 * sin(t0/2);&lt;br /&gt;
N0 = [cos(t0/2), -sin(t0/2)]; &lt;br /&gt;
Centro = P0 + rho * N0;&lt;br /&gt;
&lt;br /&gt;
figure(4);&lt;br /&gt;
plot(x, y, 'b'); hold on; axis equal; grid on;&lt;br /&gt;
theta = linspace(0, 2*pi, 200);&lt;br /&gt;
xc = Centro(1) + rho * cos(theta);&lt;br /&gt;
yc = Centro(2) + rho * sin(theta);&lt;br /&gt;
plot(xc, yc, 'r--', 'LineWidth', 1.5);&lt;br /&gt;
plot(P0(1), P0(2), 'ko', 'MarkerFaceColor', 'k');&lt;br /&gt;
title('Circunferencia Osculatriz en t=4');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Osculatriz.png|thumb|center|400px|Circunferencia osculatriz en t=4]]&lt;br /&gt;
&lt;br /&gt;
===  Información sobre la curva ===&lt;br /&gt;
&lt;br /&gt;
La cicloide es una curva fundamental en la historia de la física y la matemática. Describe dos fenómenos clave:&lt;br /&gt;
* **La Braquistócrona:** Es la curva de descenso más rápido entre dos puntos bajo la acción de la gravedad.&lt;br /&gt;
* **La Tautócrona:** El periodo de oscilación de una partícula que desliza sobre una cicloide invertida es independiente de su amplitud.&lt;br /&gt;
&lt;br /&gt;
En ingeniería, se utiliza en el diseño de engranajes cicloidales, los cuales sufren menos desgaste por rozamiento que los engranajes convencionales.&lt;br /&gt;
&lt;br /&gt;
===  Estructura civil ===&lt;br /&gt;
&lt;br /&gt;
Un ejemplo destacado del uso de arcos cicloidales es el **Museo de Arte Kimbell** en Texas, diseñado por el arquitecto Louis Kahn. La estructura de la cubierta está formada por bóvedas con perfil de cicloide que optimizan la distribución de la luz natural.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Kimbell_Art_Museum.jpg|thumb|center|400px|Bóvedas cicloidales del Museo de Arte Kimbell]]&lt;br /&gt;
&lt;br /&gt;
===  Superficie reglada en R3 ===&lt;br /&gt;
&lt;br /&gt;
Consideramos la superficie:&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(u, t) = (u, 3(t - \sin t), 3(1 + \cos t))&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 9. Superficie Reglada ---&lt;br /&gt;
u = 0:0.1:1;&lt;br /&gt;
t_surf = 0:0.1:2*pi;&lt;br /&gt;
[U, T] = meshgrid(u, t_surf);&lt;br /&gt;
&lt;br /&gt;
X1 = U;&lt;br /&gt;
X2 = R * (T - sin(T));&lt;br /&gt;
X3 = R * (1 + cos(T));&lt;br /&gt;
&lt;br /&gt;
figure(5);&lt;br /&gt;
surf(X1, X2, X3);&lt;br /&gt;
shading interp; colormap jet;&lt;br /&gt;
title('Superficie Reglada Cicloidal');&lt;br /&gt;
axis tight; view(45, 30);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Superficie.png|thumb|center|400px|Superficie reglada generada en MATLAB]]&lt;br /&gt;
&lt;br /&gt;
===  Cálculo de la masa ===&lt;br /&gt;
&lt;br /&gt;
Dada la densidad &amp;lt;math&amp;gt;f(x_1, x_2, x_3) = (1 + x_1)(1 + x_2)x_3&amp;lt;/math&amp;gt;, calculamos la masa mediante la integral de superficie. El elemento de área diferencial es &amp;lt;math&amp;gt;dS = 6\sin(t/2) dt du&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 10. Cálculo de Masa ---&lt;br /&gt;
fun_densidad = @(u, t) (1 + u) .* (1 + R*(t - sin(t))) .* (R*(1 + cos(t))) .* (2*R*sin(t/2));&lt;br /&gt;
Masa_Total = integral2(fun_densidad, 0, 1, 0, 2*pi);&lt;br /&gt;
fprintf('Masa total: %.4f\n', Masa_Total);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Resultado aproximado:''' La masa calculada es &amp;lt;math&amp;gt;750.58&amp;lt;/math&amp;gt; unidades.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;/div&gt;</summary>
		<author><name>Tomas.young</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96284</id>
		<title>La Cicloide (GRUPO 65)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96284"/>
				<updated>2025-12-03T13:22:36Z</updated>
		
		<summary type="html">&lt;p&gt;Tomas.young: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | La cicloide. Grupo 65 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | Rafael Jarillo Cabezas &amp;lt;br/&amp;gt; Miguel Tao, Tentor Gonzalez de Eiris &amp;lt;br/&amp;gt; Felipe Yagüe López &amp;lt;br/&amp;gt; Tomas Young Christiansen &amp;lt;br/&amp;gt; Luca Raffin Barrios}}&lt;br /&gt;
Se considera una curva en un plano de dimensión 2 dada por la parametrización: &lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt; 𝛾(t) = (x(t),y(t)) = (R(t-sint),R(1-cost)),      t∈(0,2π) &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
Siendo R un número positivo fijo. En este caso R=3&lt;br /&gt;
&lt;br /&gt;
== G. La Cicloide ==&lt;br /&gt;
&lt;br /&gt;
Consideramos la curva plana dada por la parametrización en coordenadas cartesianas:&lt;br /&gt;
&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(t) = (x(t), y(t)) = (R(t - \sin t), R(1 - \cos t)), \quad t \in (0, 2\pi)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; es un número positivo fijado. En este trabajo tomamos '''&amp;lt;math&amp;gt;R = 3&amp;lt;/math&amp;gt;'''.&lt;br /&gt;
&lt;br /&gt;
===  Dibujar la curva ===&lt;br /&gt;
&lt;br /&gt;
La curva representa el trayecto de un punto en el borde de una rueda de radio &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; que gira sin deslizar.&lt;br /&gt;
[[Archivo:felipeyluca.jpg|thumb|center|500px|Gráfica de la Cicloide (R=3) generada en MATLAB]]&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 1. Gráfica de la Cicloide ---&lt;br /&gt;
&lt;br /&gt;
R = 3;&lt;br /&gt;
t = linspace(0, 2*pi, 1000);&lt;br /&gt;
&lt;br /&gt;
% Parametrización&lt;br /&gt;
x = R * (t - sin(t));&lt;br /&gt;
y = R * (1 - cos(t));&lt;br /&gt;
&lt;br /&gt;
figure(1);&lt;br /&gt;
plot(x, y, 'b-', 'LineWidth', 2);&lt;br /&gt;
title('Gráfica de la Cicloide (R=3)');&lt;br /&gt;
xlabel('x'); ylabel('y');&lt;br /&gt;
axis equal; grid on; xlim([0, 2*pi*R]);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&lt;br /&gt;
===  Vectores velocidad y aceleración ===&lt;br /&gt;
&lt;br /&gt;
Calculamos analíticamente los vectores derivando la parametrización:&lt;br /&gt;
El vector velocidad corresponde a la primera derivada del vector inicial con respecto al parámetro t. La parametrización se muestra a continuación:&lt;br /&gt;
* '''Velocidad:''' &amp;lt;math&amp;gt;\gamma'(t) = (3(1 - \cos t), 3\sin t)&amp;lt;/math&amp;gt;&lt;br /&gt;
El vector aceleración viene dado por la segunda derivada de la cicloide con respecto al parámetro t. El vector calculado es el siguiente:&lt;br /&gt;
* '''Aceleración:''' &amp;lt;math&amp;gt;\gamma''(t) = (3\sin t, 3\cos t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación, el código para dibujarlos en un punto arbitrario (por ejemplo, &amp;lt;math&amp;gt;t = \pi/2&amp;lt;/math&amp;gt;):&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 2. Vectores Velocidad y Aceleración ---&lt;br /&gt;
t_p = pi/2; % Punto de ejemplo&lt;br /&gt;
P_vec = [R*(t_p - sin(t_p)), R*(1 - cos(t_p))];&lt;br /&gt;
&lt;br /&gt;
% Cálculo de vectores&lt;br /&gt;
Vel = [R*(1 - cos(t_p)), R*sin(t_p)];&lt;br /&gt;
Acc = [3*sin(t_p), 3*cos(t_p)];&lt;br /&gt;
&lt;br /&gt;
figure(1); hold on;&lt;br /&gt;
quiver(P_vec(1), P_vec(2), Vel(1), Vel(2), 'r', 'LineWidth', 2, 'MaxHeadSize', 0.5, 'DisplayName', 'Velocidad');&lt;br /&gt;
quiver(P_vec(1), P_vec(2), Acc(1), Acc(2), 'g', 'LineWidth', 2, 'MaxHeadSize', 0.5, 'DisplayName', 'Aceleración');&lt;br /&gt;
legend show;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Vectores.png|thumb|center|400px|Vectores velocidad y aceleración sobre la curva]]&lt;br /&gt;
&lt;br /&gt;
=== (3) Longitud de la curva ===&lt;br /&gt;
&lt;br /&gt;
La longitud de la curva se calcula mediante la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} \|\gamma'(t)\| dt = \int_0^{2\pi} 3\sqrt{(1-\cos t)^2 + \sin^2 t} \, dt&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Simplificando el integrando obtenemos &amp;lt;math&amp;gt;6\sin(t/2)&amp;lt;/math&amp;gt;. Resolviendo la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} 6\sin(t/2) dt = [-12\cos(t/2)]_0^{2\pi} = 24&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Cálculo numérico (Método del Rectángulo):'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 3. Longitud de Arco (Método Rectángulo) ---&lt;br /&gt;
N = 10000; &lt;br /&gt;
h = (2*pi) / N;&lt;br /&gt;
t_rect = 0:h:(2*pi-h);&lt;br /&gt;
&lt;br /&gt;
dx = R * (1 - cos(t_rect));&lt;br /&gt;
dy = R * sin(t_rect);&lt;br /&gt;
ds = sqrt(dx.^2 + dy.^2);&lt;br /&gt;
&lt;br /&gt;
Longitud_Aprox = sum(ds * h);&lt;br /&gt;
fprintf('Longitud Aproximada: %.5f\n', Longitud_Aprox);&lt;br /&gt;
fprintf('Longitud Teórica: 24\n');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== (4) Vectores tangente y normal ===&lt;br /&gt;
&lt;br /&gt;
* '''Tangente unitario:''' &amp;lt;math&amp;gt;\vec{t}(t) = (\sin(t/2), \cos(t/2))&amp;lt;/math&amp;gt;&lt;br /&gt;
* '''Normal unitario:''' &amp;lt;math&amp;gt;\vec{n}(t) = (\cos(t/2), -\sin(t/2))&amp;lt;/math&amp;gt; (apuntando hacia el centro de curvatura).&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 4. Vectores Tangente y Normal ---&lt;br /&gt;
figure(2);&lt;br /&gt;
plot(x, y, 'b'); hold on; axis equal; grid on;&lt;br /&gt;
title('Vectores Tangente (Magenta) y Normal (Cian)');&lt;br /&gt;
&lt;br /&gt;
t_vals = 1:1:5; &lt;br /&gt;
for k = 1:length(t_vals)&lt;br /&gt;
    tk = t_vals(k);&lt;br /&gt;
    Pk = [R*(tk - sin(tk)), R*(1 - cos(tk))];&lt;br /&gt;
    &lt;br /&gt;
    vk = [R*(1 - cos(tk)), R*sin(tk)];&lt;br /&gt;
    Tk = vk / norm(vk);      % Tangente&lt;br /&gt;
    Nk = [Tk(2), -Tk(1)];    % Normal&lt;br /&gt;
    &lt;br /&gt;
    quiver(Pk(1), Pk(2), Tk(1), Tk(2), 0.5, 'm', 'LineWidth', 2);&lt;br /&gt;
    quiver(Pk(1), Pk(2), Nk(1), Nk(2), 0.5, 'c', 'LineWidth', 2);&lt;br /&gt;
end&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Frenet.png|thumb|center|400px|Diedro de Frenet a lo largo de la curva]]&lt;br /&gt;
&lt;br /&gt;
=== (5) Curvatura ===&lt;br /&gt;
&lt;br /&gt;
La curvatura &amp;lt;math&amp;gt;\kappa(t)&amp;lt;/math&amp;gt; para &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; viene dada por:&lt;br /&gt;
:&amp;lt;math&amp;gt;\kappa(t) = \frac{1}{4R\sin(t/2)} = \frac{1}{12\sin(t/2)}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 5. Gráfica de la Curvatura ---&lt;br /&gt;
t_k = linspace(0.1, 2*pi-0.1, 100); &lt;br /&gt;
kappa = 1 ./ (12 * sin(t_k / 2));&lt;br /&gt;
&lt;br /&gt;
figure(3);&lt;br /&gt;
plot(t_k, kappa, 'r-', 'LineWidth', 2);&lt;br /&gt;
title('Curvatura \kappa(t)');&lt;br /&gt;
xlabel('t'); grid on;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Curvatura.png|thumb|center|400px|Gráfica de la curvatura en función de t]]&lt;br /&gt;
&lt;br /&gt;
=== (6) Circunferencia osculatriz en t=4 ===&lt;br /&gt;
&lt;br /&gt;
Para el punto &amp;lt;math&amp;gt;P = \gamma(4)&amp;lt;/math&amp;gt;:&lt;br /&gt;
* Radio de curvatura: &amp;lt;math&amp;gt;\rho = 12\sin(2) \approx 10.91&amp;lt;/math&amp;gt;&lt;br /&gt;
* Centro de curvatura: Se calcula numéricamente desplazando &amp;lt;math&amp;gt;P&amp;lt;/math&amp;gt; en dirección normal.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 6. Circunferencia Osculatriz (t=4) ---&lt;br /&gt;
t0 = 4;&lt;br /&gt;
P0 = [R*(t0 - sin(t0)), R*(1 - cos(t0))];&lt;br /&gt;
rho = 12 * sin(t0/2);&lt;br /&gt;
N0 = [cos(t0/2), -sin(t0/2)]; &lt;br /&gt;
Centro = P0 + rho * N0;&lt;br /&gt;
&lt;br /&gt;
figure(4);&lt;br /&gt;
plot(x, y, 'b'); hold on; axis equal; grid on;&lt;br /&gt;
theta = linspace(0, 2*pi, 200);&lt;br /&gt;
xc = Centro(1) + rho * cos(theta);&lt;br /&gt;
yc = Centro(2) + rho * sin(theta);&lt;br /&gt;
plot(xc, yc, 'r--', 'LineWidth', 1.5);&lt;br /&gt;
plot(P0(1), P0(2), 'ko', 'MarkerFaceColor', 'k');&lt;br /&gt;
title('Circunferencia Osculatriz en t=4');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Osculatriz.png|thumb|center|400px|Circunferencia osculatriz en t=4]]&lt;br /&gt;
&lt;br /&gt;
=== (7) Información sobre la curva ===&lt;br /&gt;
&lt;br /&gt;
La cicloide es una curva fundamental en la historia de la física y la matemática. Describe dos fenómenos clave:&lt;br /&gt;
* **La Braquistócrona:** Es la curva de descenso más rápido entre dos puntos bajo la acción de la gravedad.&lt;br /&gt;
* **La Tautócrona:** El periodo de oscilación de una partícula que desliza sobre una cicloide invertida es independiente de su amplitud.&lt;br /&gt;
&lt;br /&gt;
En ingeniería, se utiliza en el diseño de engranajes cicloidales, los cuales sufren menos desgaste por rozamiento que los engranajes convencionales.&lt;br /&gt;
&lt;br /&gt;
=== (8) Estructura civil ===&lt;br /&gt;
&lt;br /&gt;
Un ejemplo destacado del uso de arcos cicloidales es el **Museo de Arte Kimbell** en Texas, diseñado por el arquitecto Louis Kahn. La estructura de la cubierta está formada por bóvedas con perfil de cicloide que optimizan la distribución de la luz natural.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Kimbell_Art_Museum.jpg|thumb|center|400px|Bóvedas cicloidales del Museo de Arte Kimbell]]&lt;br /&gt;
&lt;br /&gt;
=== (9) Superficie reglada en R3 ===&lt;br /&gt;
&lt;br /&gt;
Consideramos la superficie:&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(u, t) = (u, 3(t - \sin t), 3(1 + \cos t))&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 9. Superficie Reglada ---&lt;br /&gt;
u = 0:0.1:1;&lt;br /&gt;
t_surf = 0:0.1:2*pi;&lt;br /&gt;
[U, T] = meshgrid(u, t_surf);&lt;br /&gt;
&lt;br /&gt;
X1 = U;&lt;br /&gt;
X2 = R * (T - sin(T));&lt;br /&gt;
X3 = R * (1 + cos(T));&lt;br /&gt;
&lt;br /&gt;
figure(5);&lt;br /&gt;
surf(X1, X2, X3);&lt;br /&gt;
shading interp; colormap jet;&lt;br /&gt;
title('Superficie Reglada Cicloidal');&lt;br /&gt;
axis tight; view(45, 30);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Superficie.png|thumb|center|400px|Superficie reglada generada en MATLAB]]&lt;br /&gt;
&lt;br /&gt;
=== (10) Cálculo de la masa ===&lt;br /&gt;
&lt;br /&gt;
Dada la densidad &amp;lt;math&amp;gt;f(x_1, x_2, x_3) = (1 + x_1)(1 + x_2)x_3&amp;lt;/math&amp;gt;, calculamos la masa mediante la integral de superficie. El elemento de área diferencial es &amp;lt;math&amp;gt;dS = 6\sin(t/2) dt du&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 10. Cálculo de Masa ---&lt;br /&gt;
fun_densidad = @(u, t) (1 + u) .* (1 + R*(t - sin(t))) .* (R*(1 + cos(t))) .* (2*R*sin(t/2));&lt;br /&gt;
Masa_Total = integral2(fun_densidad, 0, 1, 0, 2*pi);&lt;br /&gt;
fprintf('Masa total: %.4f\n', Masa_Total);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Resultado aproximado:''' La masa calculada es &amp;lt;math&amp;gt;750.58&amp;lt;/math&amp;gt; unidades.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;/div&gt;</summary>
		<author><name>Tomas.young</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96283</id>
		<title>La Cicloide (GRUPO 65)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96283"/>
				<updated>2025-12-03T13:18:03Z</updated>
		
		<summary type="html">&lt;p&gt;Tomas.young: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | La cicloide. Grupo 65 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | Rafael Jarillo Cabezas &amp;lt;br/&amp;gt; Miguel Tao, Tentor Gonzalez de Eiris &amp;lt;br/&amp;gt; Felipe Yagüe López &amp;lt;br/&amp;gt; Tomas Young Christiansen &amp;lt;br/&amp;gt; Luca Raffin Barrios}}&lt;br /&gt;
Se considera una curva en un plano de dimensión 2 dada por la parametrización: &lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt; 𝛾(t) = (x(t),y(t)) = (R(t-sint),R(1-cost)),      t∈(0,2π) &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
Siendo R un número positivo fijo. En este caso R=3&lt;br /&gt;
&lt;br /&gt;
== G. La Cicloide ==&lt;br /&gt;
&lt;br /&gt;
Consideramos la curva plana dada por la parametrización en coordenadas cartesianas:&lt;br /&gt;
&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(t) = (x(t), y(t)) = (R(t - \sin t), R(1 - \cos t)), \quad t \in (0, 2\pi)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; es un número positivo fijado. En este trabajo tomamos '''&amp;lt;math&amp;gt;R = 3&amp;lt;/math&amp;gt;'''.&lt;br /&gt;
&lt;br /&gt;
===  Dibujar la curva ===&lt;br /&gt;
&lt;br /&gt;
La curva representa el trayecto de un punto en el borde de una rueda de radio &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; que gira sin deslizar.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 1. Gráfica de la Cicloide ---&lt;br /&gt;
R = 3;&lt;br /&gt;
t = linspace(0, 2*pi, 1000);&lt;br /&gt;
&lt;br /&gt;
% Parametrización&lt;br /&gt;
x = R * (t - sin(t));&lt;br /&gt;
y = R * (1 - cos(t));&lt;br /&gt;
&lt;br /&gt;
figure(1);&lt;br /&gt;
plot(x, y, 'b-', 'LineWidth', 2);&lt;br /&gt;
title('Gráfica de la Cicloide (R=3)');&lt;br /&gt;
xlabel('x'); ylabel('y');&lt;br /&gt;
axis equal; grid on; xlim([0, 2*pi*R]);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:felipeyluca.jpg|thumb|center|500px|Gráfica de la Cicloide (R=3) generada en MATLAB]]&lt;br /&gt;
&lt;br /&gt;
===  Vectores velocidad y aceleración ===&lt;br /&gt;
&lt;br /&gt;
Calculamos analíticamente los vectores derivando la parametrización:&lt;br /&gt;
El vector velocidad corresponde a la primera derivada del vector inicial con respecto al parámetro t. La parametrización se muestra a continuación:&lt;br /&gt;
* '''Velocidad:''' &amp;lt;math&amp;gt;\gamma'(t) = (3(1 - \cos t), 3\sin t)&amp;lt;/math&amp;gt;&lt;br /&gt;
El vector aceleración viene dado por la segunda derivada de la cicloide con respecto al parámetro t. El vector calculado es el siguiente:&lt;br /&gt;
* '''Aceleración:''' &amp;lt;math&amp;gt;\gamma''(t) = (3\sin t, 3\cos t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación, el código para dibujarlos en un punto arbitrario (por ejemplo, &amp;lt;math&amp;gt;t = \pi/2&amp;lt;/math&amp;gt;):&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 2. Vectores Velocidad y Aceleración ---&lt;br /&gt;
t_p = pi/2; % Punto de ejemplo&lt;br /&gt;
P_vec = [R*(t_p - sin(t_p)), R*(1 - cos(t_p))];&lt;br /&gt;
&lt;br /&gt;
% Cálculo de vectores&lt;br /&gt;
Vel = [R*(1 - cos(t_p)), R*sin(t_p)];&lt;br /&gt;
Acc = [3*sin(t_p), 3*cos(t_p)];&lt;br /&gt;
&lt;br /&gt;
figure(1); hold on;&lt;br /&gt;
quiver(P_vec(1), P_vec(2), Vel(1), Vel(2), 'r', 'LineWidth', 2, 'MaxHeadSize', 0.5, 'DisplayName', 'Velocidad');&lt;br /&gt;
quiver(P_vec(1), P_vec(2), Acc(1), Acc(2), 'g', 'LineWidth', 2, 'MaxHeadSize', 0.5, 'DisplayName', 'Aceleración');&lt;br /&gt;
legend show;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Vectores.png|thumb|center|400px|Vectores velocidad y aceleración sobre la curva]]&lt;br /&gt;
&lt;br /&gt;
=== (3) Longitud de la curva ===&lt;br /&gt;
&lt;br /&gt;
La longitud de la curva se calcula mediante la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} \|\gamma'(t)\| dt = \int_0^{2\pi} 3\sqrt{(1-\cos t)^2 + \sin^2 t} \, dt&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Simplificando el integrando obtenemos &amp;lt;math&amp;gt;6\sin(t/2)&amp;lt;/math&amp;gt;. Resolviendo la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} 6\sin(t/2) dt = [-12\cos(t/2)]_0^{2\pi} = 24&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Cálculo numérico (Método del Rectángulo):'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 3. Longitud de Arco (Método Rectángulo) ---&lt;br /&gt;
N = 10000; &lt;br /&gt;
h = (2*pi) / N;&lt;br /&gt;
t_rect = 0:h:(2*pi-h);&lt;br /&gt;
&lt;br /&gt;
dx = R * (1 - cos(t_rect));&lt;br /&gt;
dy = R * sin(t_rect);&lt;br /&gt;
ds = sqrt(dx.^2 + dy.^2);&lt;br /&gt;
&lt;br /&gt;
Longitud_Aprox = sum(ds * h);&lt;br /&gt;
fprintf('Longitud Aproximada: %.5f\n', Longitud_Aprox);&lt;br /&gt;
fprintf('Longitud Teórica: 24\n');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== (4) Vectores tangente y normal ===&lt;br /&gt;
&lt;br /&gt;
* '''Tangente unitario:''' &amp;lt;math&amp;gt;\vec{t}(t) = (\sin(t/2), \cos(t/2))&amp;lt;/math&amp;gt;&lt;br /&gt;
* '''Normal unitario:''' &amp;lt;math&amp;gt;\vec{n}(t) = (\cos(t/2), -\sin(t/2))&amp;lt;/math&amp;gt; (apuntando hacia el centro de curvatura).&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 4. Vectores Tangente y Normal ---&lt;br /&gt;
figure(2);&lt;br /&gt;
plot(x, y, 'b'); hold on; axis equal; grid on;&lt;br /&gt;
title('Vectores Tangente (Magenta) y Normal (Cian)');&lt;br /&gt;
&lt;br /&gt;
t_vals = 1:1:5; &lt;br /&gt;
for k = 1:length(t_vals)&lt;br /&gt;
    tk = t_vals(k);&lt;br /&gt;
    Pk = [R*(tk - sin(tk)), R*(1 - cos(tk))];&lt;br /&gt;
    &lt;br /&gt;
    vk = [R*(1 - cos(tk)), R*sin(tk)];&lt;br /&gt;
    Tk = vk / norm(vk);      % Tangente&lt;br /&gt;
    Nk = [Tk(2), -Tk(1)];    % Normal&lt;br /&gt;
    &lt;br /&gt;
    quiver(Pk(1), Pk(2), Tk(1), Tk(2), 0.5, 'm', 'LineWidth', 2);&lt;br /&gt;
    quiver(Pk(1), Pk(2), Nk(1), Nk(2), 0.5, 'c', 'LineWidth', 2);&lt;br /&gt;
end&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Frenet.png|thumb|center|400px|Diedro de Frenet a lo largo de la curva]]&lt;br /&gt;
&lt;br /&gt;
=== (5) Curvatura ===&lt;br /&gt;
&lt;br /&gt;
La curvatura &amp;lt;math&amp;gt;\kappa(t)&amp;lt;/math&amp;gt; para &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; viene dada por:&lt;br /&gt;
:&amp;lt;math&amp;gt;\kappa(t) = \frac{1}{4R\sin(t/2)} = \frac{1}{12\sin(t/2)}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 5. Gráfica de la Curvatura ---&lt;br /&gt;
t_k = linspace(0.1, 2*pi-0.1, 100); &lt;br /&gt;
kappa = 1 ./ (12 * sin(t_k / 2));&lt;br /&gt;
&lt;br /&gt;
figure(3);&lt;br /&gt;
plot(t_k, kappa, 'r-', 'LineWidth', 2);&lt;br /&gt;
title('Curvatura \kappa(t)');&lt;br /&gt;
xlabel('t'); grid on;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Curvatura.png|thumb|center|400px|Gráfica de la curvatura en función de t]]&lt;br /&gt;
&lt;br /&gt;
=== (6) Circunferencia osculatriz en t=4 ===&lt;br /&gt;
&lt;br /&gt;
Para el punto &amp;lt;math&amp;gt;P = \gamma(4)&amp;lt;/math&amp;gt;:&lt;br /&gt;
* Radio de curvatura: &amp;lt;math&amp;gt;\rho = 12\sin(2) \approx 10.91&amp;lt;/math&amp;gt;&lt;br /&gt;
* Centro de curvatura: Se calcula numéricamente desplazando &amp;lt;math&amp;gt;P&amp;lt;/math&amp;gt; en dirección normal.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 6. Circunferencia Osculatriz (t=4) ---&lt;br /&gt;
t0 = 4;&lt;br /&gt;
P0 = [R*(t0 - sin(t0)), R*(1 - cos(t0))];&lt;br /&gt;
rho = 12 * sin(t0/2);&lt;br /&gt;
N0 = [cos(t0/2), -sin(t0/2)]; &lt;br /&gt;
Centro = P0 + rho * N0;&lt;br /&gt;
&lt;br /&gt;
figure(4);&lt;br /&gt;
plot(x, y, 'b'); hold on; axis equal; grid on;&lt;br /&gt;
theta = linspace(0, 2*pi, 200);&lt;br /&gt;
xc = Centro(1) + rho * cos(theta);&lt;br /&gt;
yc = Centro(2) + rho * sin(theta);&lt;br /&gt;
plot(xc, yc, 'r--', 'LineWidth', 1.5);&lt;br /&gt;
plot(P0(1), P0(2), 'ko', 'MarkerFaceColor', 'k');&lt;br /&gt;
title('Circunferencia Osculatriz en t=4');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Osculatriz.png|thumb|center|400px|Circunferencia osculatriz en t=4]]&lt;br /&gt;
&lt;br /&gt;
=== (7) Información sobre la curva ===&lt;br /&gt;
&lt;br /&gt;
La cicloide es una curva fundamental en la historia de la física y la matemática. Describe dos fenómenos clave:&lt;br /&gt;
* **La Braquistócrona:** Es la curva de descenso más rápido entre dos puntos bajo la acción de la gravedad.&lt;br /&gt;
* **La Tautócrona:** El periodo de oscilación de una partícula que desliza sobre una cicloide invertida es independiente de su amplitud.&lt;br /&gt;
&lt;br /&gt;
En ingeniería, se utiliza en el diseño de engranajes cicloidales, los cuales sufren menos desgaste por rozamiento que los engranajes convencionales.&lt;br /&gt;
&lt;br /&gt;
=== (8) Estructura civil ===&lt;br /&gt;
&lt;br /&gt;
Un ejemplo destacado del uso de arcos cicloidales es el **Museo de Arte Kimbell** en Texas, diseñado por el arquitecto Louis Kahn. La estructura de la cubierta está formada por bóvedas con perfil de cicloide que optimizan la distribución de la luz natural.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Kimbell_Art_Museum.jpg|thumb|center|400px|Bóvedas cicloidales del Museo de Arte Kimbell]]&lt;br /&gt;
&lt;br /&gt;
=== (9) Superficie reglada en R3 ===&lt;br /&gt;
&lt;br /&gt;
Consideramos la superficie:&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(u, t) = (u, 3(t - \sin t), 3(1 + \cos t))&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 9. Superficie Reglada ---&lt;br /&gt;
u = 0:0.1:1;&lt;br /&gt;
t_surf = 0:0.1:2*pi;&lt;br /&gt;
[U, T] = meshgrid(u, t_surf);&lt;br /&gt;
&lt;br /&gt;
X1 = U;&lt;br /&gt;
X2 = R * (T - sin(T));&lt;br /&gt;
X3 = R * (1 + cos(T));&lt;br /&gt;
&lt;br /&gt;
figure(5);&lt;br /&gt;
surf(X1, X2, X3);&lt;br /&gt;
shading interp; colormap jet;&lt;br /&gt;
title('Superficie Reglada Cicloidal');&lt;br /&gt;
axis tight; view(45, 30);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Superficie.png|thumb|center|400px|Superficie reglada generada en MATLAB]]&lt;br /&gt;
&lt;br /&gt;
=== (10) Cálculo de la masa ===&lt;br /&gt;
&lt;br /&gt;
Dada la densidad &amp;lt;math&amp;gt;f(x_1, x_2, x_3) = (1 + x_1)(1 + x_2)x_3&amp;lt;/math&amp;gt;, calculamos la masa mediante la integral de superficie. El elemento de área diferencial es &amp;lt;math&amp;gt;dS = 6\sin(t/2) dt du&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 10. Cálculo de Masa ---&lt;br /&gt;
fun_densidad = @(u, t) (1 + u) .* (1 + R*(t - sin(t))) .* (R*(1 + cos(t))) .* (2*R*sin(t/2));&lt;br /&gt;
Masa_Total = integral2(fun_densidad, 0, 1, 0, 2*pi);&lt;br /&gt;
fprintf('Masa total: %.4f\n', Masa_Total);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Resultado aproximado:''' La masa calculada es &amp;lt;math&amp;gt;750.58&amp;lt;/math&amp;gt; unidades.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;/div&gt;</summary>
		<author><name>Tomas.young</name></author>	</entry>

	<entry>
		<id>https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96282</id>
		<title>La Cicloide (GRUPO 65)</title>
		<link rel="alternate" type="text/html" href="https://mat.caminos.upm.es/w/index.php?title=La_Cicloide_(GRUPO_65)&amp;diff=96282"/>
				<updated>2025-12-03T13:14:20Z</updated>
		
		<summary type="html">&lt;p&gt;Tomas.young: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;{{ TrabajoED | La cicloide. Grupo 65 | [[:Categoría:Teoría de Campos|Teoría de Campos]]|[[:Categoría:TC25/26|2025-26]] | Rafael Jarillo Cabezas &amp;lt;br/&amp;gt; Miguel Tao, Tentor Gonzalez de Eiris &amp;lt;br/&amp;gt; Felipe Yagüe López &amp;lt;br/&amp;gt; Tomas Young Christiansen &amp;lt;br/&amp;gt; Luca Raffin Barrios}}&lt;br /&gt;
Se considera una curva en un plano de dimensión 2 dada por la parametrización: &lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt; 𝛾(t) = (x(t),y(t)) = (R(t-sint),R(1-cost)),      t∈(0,2π) &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
Siendo R un número positivo fijo. En este caso R=3&lt;br /&gt;
==Dibujo de la curva==&lt;br /&gt;
[[Archivo:felipeyluca.jpg|thumb|center|500px|Gráfica de la Cicloide (R=3) generada en MATLAB]]&lt;br /&gt;
&lt;br /&gt;
{{matlab|codigo=&lt;br /&gt;
&lt;br /&gt;
R = 3;&lt;br /&gt;
t = linspace(0, 2*pi, 1000);&lt;br /&gt;
x = R * (t - sin(t));&lt;br /&gt;
y = R * (1 - cos(t));&lt;br /&gt;
figure;&lt;br /&gt;
plot(x, y, 'b-', 'LineWidth', 2);&lt;br /&gt;
title('Gráfica de la Cicloide (R=3)');&lt;br /&gt;
xlabel('x');&lt;br /&gt;
ylabel('y');&lt;br /&gt;
axis equal; &lt;br /&gt;
grid on;&lt;br /&gt;
}}&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
&amp;lt;br/&amp;gt; &amp;lt;br/&amp;gt;&lt;br /&gt;
==Vector velocidad y aceleración==&lt;br /&gt;
===Velocidad===&lt;br /&gt;
El vector velocidad corresponde a la primera derivada del vector inicial con respecto al parámetro t. La parametrización se muestra a continuación:&lt;br /&gt;
&amp;lt;br /&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&amp;lt;math&amp;gt; γ'(t) = x′(t)\vec i + y′(t)\vec j = R(1-cos(t))\vec i +Rsen(t)\vec j &amp;lt;/math&amp;gt;&lt;br /&gt;
&amp;lt;br /&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
Como se aprecia en la imagen abajo, esta parametrización muestra la longitud, dirección y sentido que sigue cada punto en la curva inicial.&lt;br /&gt;
===Aceleración===&lt;br /&gt;
El vector aceleración viene dado por la segunda derivada de la cicloide con respecto al parámetro t. El vector calculado es el siguiente:&lt;br /&gt;
&amp;lt;br /&amp;gt;&amp;lt;br /&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== G. La Cicloide ==&lt;br /&gt;
&lt;br /&gt;
Consideramos la curva plana dada por la parametrización en coordenadas cartesianas:&lt;br /&gt;
&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(t) = (x(t), y(t)) = (R(t - \sin t), R(1 - \cos t)), \quad t \in (0, 2\pi)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
donde &amp;lt;math&amp;gt;R&amp;lt;/math&amp;gt; es un número positivo fijado. En este trabajo tomamos '''&amp;lt;math&amp;gt;R = 3&amp;lt;/math&amp;gt;'''.&lt;br /&gt;
&lt;br /&gt;
===  Dibujar la curva ===&lt;br /&gt;
&lt;br /&gt;
La curva representa el trayecto de un punto en el borde de una rueda de radio &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; que gira sin deslizar.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 1. Gráfica de la Cicloide ---&lt;br /&gt;
R = 3;&lt;br /&gt;
t = linspace(0, 2*pi, 1000);&lt;br /&gt;
&lt;br /&gt;
% Parametrización&lt;br /&gt;
x = R * (t - sin(t));&lt;br /&gt;
y = R * (1 - cos(t));&lt;br /&gt;
&lt;br /&gt;
figure(1);&lt;br /&gt;
plot(x, y, 'b-', 'LineWidth', 2);&lt;br /&gt;
title('Gráfica de la Cicloide (R=3)');&lt;br /&gt;
xlabel('x'); ylabel('y');&lt;br /&gt;
axis equal; grid on; xlim([0, 2*pi*R]);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Grafica.png|thumb|center|400px|Gráfica de la Cicloide generada con MATLAB]]&lt;br /&gt;
&lt;br /&gt;
===  Vectores velocidad y aceleración ===&lt;br /&gt;
&lt;br /&gt;
Calculamos analíticamente los vectores derivando la parametrización:&lt;br /&gt;
El vector velocidad corresponde a la primera derivada del vector inicial con respecto al parámetro t. La parametrización se muestra a continuación:&lt;br /&gt;
* '''Velocidad:''' &amp;lt;math&amp;gt;\gamma'(t) = (3(1 - \cos t), 3\sin t)&amp;lt;/math&amp;gt;&lt;br /&gt;
El vector aceleración viene dado por la segunda derivada de la cicloide con respecto al parámetro t. El vector calculado es el siguiente:&lt;br /&gt;
* '''Aceleración:''' &amp;lt;math&amp;gt;\gamma''(t) = (3\sin t, 3\cos t)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
A continuación, el código para dibujarlos en un punto arbitrario (por ejemplo, &amp;lt;math&amp;gt;t = \pi/2&amp;lt;/math&amp;gt;):&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 2. Vectores Velocidad y Aceleración ---&lt;br /&gt;
t_p = pi/2; % Punto de ejemplo&lt;br /&gt;
P_vec = [R*(t_p - sin(t_p)), R*(1 - cos(t_p))];&lt;br /&gt;
&lt;br /&gt;
% Cálculo de vectores&lt;br /&gt;
Vel = [R*(1 - cos(t_p)), R*sin(t_p)];&lt;br /&gt;
Acc = [3*sin(t_p), 3*cos(t_p)];&lt;br /&gt;
&lt;br /&gt;
figure(1); hold on;&lt;br /&gt;
quiver(P_vec(1), P_vec(2), Vel(1), Vel(2), 'r', 'LineWidth', 2, 'MaxHeadSize', 0.5, 'DisplayName', 'Velocidad');&lt;br /&gt;
quiver(P_vec(1), P_vec(2), Acc(1), Acc(2), 'g', 'LineWidth', 2, 'MaxHeadSize', 0.5, 'DisplayName', 'Aceleración');&lt;br /&gt;
legend show;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Vectores.png|thumb|center|400px|Vectores velocidad y aceleración sobre la curva]]&lt;br /&gt;
&lt;br /&gt;
=== (3) Longitud de la curva ===&lt;br /&gt;
&lt;br /&gt;
La longitud de la curva se calcula mediante la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} \|\gamma'(t)\| dt = \int_0^{2\pi} 3\sqrt{(1-\cos t)^2 + \sin^2 t} \, dt&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Simplificando el integrando obtenemos &amp;lt;math&amp;gt;6\sin(t/2)&amp;lt;/math&amp;gt;. Resolviendo la integral:&lt;br /&gt;
:&amp;lt;math&amp;gt;L = \int_0^{2\pi} 6\sin(t/2) dt = [-12\cos(t/2)]_0^{2\pi} = 24&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Cálculo numérico (Método del Rectángulo):'''&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 3. Longitud de Arco (Método Rectángulo) ---&lt;br /&gt;
N = 10000; &lt;br /&gt;
h = (2*pi) / N;&lt;br /&gt;
t_rect = 0:h:(2*pi-h);&lt;br /&gt;
&lt;br /&gt;
dx = R * (1 - cos(t_rect));&lt;br /&gt;
dy = R * sin(t_rect);&lt;br /&gt;
ds = sqrt(dx.^2 + dy.^2);&lt;br /&gt;
&lt;br /&gt;
Longitud_Aprox = sum(ds * h);&lt;br /&gt;
fprintf('Longitud Aproximada: %.5f\n', Longitud_Aprox);&lt;br /&gt;
fprintf('Longitud Teórica: 24\n');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== (4) Vectores tangente y normal ===&lt;br /&gt;
&lt;br /&gt;
* '''Tangente unitario:''' &amp;lt;math&amp;gt;\vec{t}(t) = (\sin(t/2), \cos(t/2))&amp;lt;/math&amp;gt;&lt;br /&gt;
* '''Normal unitario:''' &amp;lt;math&amp;gt;\vec{n}(t) = (\cos(t/2), -\sin(t/2))&amp;lt;/math&amp;gt; (apuntando hacia el centro de curvatura).&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 4. Vectores Tangente y Normal ---&lt;br /&gt;
figure(2);&lt;br /&gt;
plot(x, y, 'b'); hold on; axis equal; grid on;&lt;br /&gt;
title('Vectores Tangente (Magenta) y Normal (Cian)');&lt;br /&gt;
&lt;br /&gt;
t_vals = 1:1:5; &lt;br /&gt;
for k = 1:length(t_vals)&lt;br /&gt;
    tk = t_vals(k);&lt;br /&gt;
    Pk = [R*(tk - sin(tk)), R*(1 - cos(tk))];&lt;br /&gt;
    &lt;br /&gt;
    vk = [R*(1 - cos(tk)), R*sin(tk)];&lt;br /&gt;
    Tk = vk / norm(vk);      % Tangente&lt;br /&gt;
    Nk = [Tk(2), -Tk(1)];    % Normal&lt;br /&gt;
    &lt;br /&gt;
    quiver(Pk(1), Pk(2), Tk(1), Tk(2), 0.5, 'm', 'LineWidth', 2);&lt;br /&gt;
    quiver(Pk(1), Pk(2), Nk(1), Nk(2), 0.5, 'c', 'LineWidth', 2);&lt;br /&gt;
end&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Frenet.png|thumb|center|400px|Diedro de Frenet a lo largo de la curva]]&lt;br /&gt;
&lt;br /&gt;
=== (5) Curvatura ===&lt;br /&gt;
&lt;br /&gt;
La curvatura &amp;lt;math&amp;gt;\kappa(t)&amp;lt;/math&amp;gt; para &amp;lt;math&amp;gt;R=3&amp;lt;/math&amp;gt; viene dada por:&lt;br /&gt;
:&amp;lt;math&amp;gt;\kappa(t) = \frac{1}{4R\sin(t/2)} = \frac{1}{12\sin(t/2)}&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 5. Gráfica de la Curvatura ---&lt;br /&gt;
t_k = linspace(0.1, 2*pi-0.1, 100); &lt;br /&gt;
kappa = 1 ./ (12 * sin(t_k / 2));&lt;br /&gt;
&lt;br /&gt;
figure(3);&lt;br /&gt;
plot(t_k, kappa, 'r-', 'LineWidth', 2);&lt;br /&gt;
title('Curvatura \kappa(t)');&lt;br /&gt;
xlabel('t'); grid on;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Curvatura.png|thumb|center|400px|Gráfica de la curvatura en función de t]]&lt;br /&gt;
&lt;br /&gt;
=== (6) Circunferencia osculatriz en t=4 ===&lt;br /&gt;
&lt;br /&gt;
Para el punto &amp;lt;math&amp;gt;P = \gamma(4)&amp;lt;/math&amp;gt;:&lt;br /&gt;
* Radio de curvatura: &amp;lt;math&amp;gt;\rho = 12\sin(2) \approx 10.91&amp;lt;/math&amp;gt;&lt;br /&gt;
* Centro de curvatura: Se calcula numéricamente desplazando &amp;lt;math&amp;gt;P&amp;lt;/math&amp;gt; en dirección normal.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 6. Circunferencia Osculatriz (t=4) ---&lt;br /&gt;
t0 = 4;&lt;br /&gt;
P0 = [R*(t0 - sin(t0)), R*(1 - cos(t0))];&lt;br /&gt;
rho = 12 * sin(t0/2);&lt;br /&gt;
N0 = [cos(t0/2), -sin(t0/2)]; &lt;br /&gt;
Centro = P0 + rho * N0;&lt;br /&gt;
&lt;br /&gt;
figure(4);&lt;br /&gt;
plot(x, y, 'b'); hold on; axis equal; grid on;&lt;br /&gt;
theta = linspace(0, 2*pi, 200);&lt;br /&gt;
xc = Centro(1) + rho * cos(theta);&lt;br /&gt;
yc = Centro(2) + rho * sin(theta);&lt;br /&gt;
plot(xc, yc, 'r--', 'LineWidth', 1.5);&lt;br /&gt;
plot(P0(1), P0(2), 'ko', 'MarkerFaceColor', 'k');&lt;br /&gt;
title('Circunferencia Osculatriz en t=4');&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Osculatriz.png|thumb|center|400px|Circunferencia osculatriz en t=4]]&lt;br /&gt;
&lt;br /&gt;
=== (7) Información sobre la curva ===&lt;br /&gt;
&lt;br /&gt;
La cicloide es una curva fundamental en la historia de la física y la matemática. Describe dos fenómenos clave:&lt;br /&gt;
* **La Braquistócrona:** Es la curva de descenso más rápido entre dos puntos bajo la acción de la gravedad.&lt;br /&gt;
* **La Tautócrona:** El periodo de oscilación de una partícula que desliza sobre una cicloide invertida es independiente de su amplitud.&lt;br /&gt;
&lt;br /&gt;
En ingeniería, se utiliza en el diseño de engranajes cicloidales, los cuales sufren menos desgaste por rozamiento que los engranajes convencionales.&lt;br /&gt;
&lt;br /&gt;
=== (8) Estructura civil ===&lt;br /&gt;
&lt;br /&gt;
Un ejemplo destacado del uso de arcos cicloidales es el **Museo de Arte Kimbell** en Texas, diseñado por el arquitecto Louis Kahn. La estructura de la cubierta está formada por bóvedas con perfil de cicloide que optimizan la distribución de la luz natural.&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Kimbell_Art_Museum.jpg|thumb|center|400px|Bóvedas cicloidales del Museo de Arte Kimbell]]&lt;br /&gt;
&lt;br /&gt;
=== (9) Superficie reglada en R3 ===&lt;br /&gt;
&lt;br /&gt;
Consideramos la superficie:&lt;br /&gt;
:&amp;lt;math&amp;gt;\gamma(u, t) = (u, 3(t - \sin t), 3(1 + \cos t))&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 9. Superficie Reglada ---&lt;br /&gt;
u = 0:0.1:1;&lt;br /&gt;
t_surf = 0:0.1:2*pi;&lt;br /&gt;
[U, T] = meshgrid(u, t_surf);&lt;br /&gt;
&lt;br /&gt;
X1 = U;&lt;br /&gt;
X2 = R * (T - sin(T));&lt;br /&gt;
X3 = R * (1 + cos(T));&lt;br /&gt;
&lt;br /&gt;
figure(5);&lt;br /&gt;
surf(X1, X2, X3);&lt;br /&gt;
shading interp; colormap jet;&lt;br /&gt;
title('Superficie Reglada Cicloidal');&lt;br /&gt;
axis tight; view(45, 30);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
[[Archivo:Cicloide_Superficie.png|thumb|center|400px|Superficie reglada generada en MATLAB]]&lt;br /&gt;
&lt;br /&gt;
=== (10) Cálculo de la masa ===&lt;br /&gt;
&lt;br /&gt;
Dada la densidad &amp;lt;math&amp;gt;f(x_1, x_2, x_3) = (1 + x_1)(1 + x_2)x_3&amp;lt;/math&amp;gt;, calculamos la masa mediante la integral de superficie. El elemento de área diferencial es &amp;lt;math&amp;gt;dS = 6\sin(t/2) dt du&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;matlab&amp;quot;&amp;gt;&lt;br /&gt;
% --- 10. Cálculo de Masa ---&lt;br /&gt;
fun_densidad = @(u, t) (1 + u) .* (1 + R*(t - sin(t))) .* (R*(1 + cos(t))) .* (2*R*sin(t/2));&lt;br /&gt;
Masa_Total = integral2(fun_densidad, 0, 1, 0, 2*pi);&lt;br /&gt;
fprintf('Masa total: %.4f\n', Masa_Total);&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
'''Resultado aproximado:''' La masa calculada es &amp;lt;math&amp;gt;750.58&amp;lt;/math&amp;gt; unidades.&lt;br /&gt;
&lt;br /&gt;
[[Categoría:Teoría de Campos]]&lt;br /&gt;
[[Categoría:TC25/26]]&lt;/div&gt;</summary>
		<author><name>Tomas.young</name></author>	</entry>

	</feed>