Una partícula desliza sobre una pista circular que gira

Consideremos un aro de radio R que puede girar alrededor de su diámetro vertical con velocidad angular ω. Un punto material de masa m se mueve a lo largo de la circunferencia sin rozamiento. Su posición está dada por el ángulo θ tal como se señala en la figura.

Las fuerzas que actúan sobre la partícula, cuando estamos situados en el Sistema de Referencia en rotación son:

Descomponemos las fuerzas en la dirección vertical y horizontal. En la situación de equilibrio, se cumplirá que

N·cosθ =mg
N
·sinθ =Fc

N=mgcosθ+Fcsinθ=mgcosθ+2Rsin2θ

Energía potencial. Posiciones de equilibrio

Si descomponemos las fuerzas en la dirección tangencial y normal a la circunferencia, tendremos que en la situación de equilibrio

mg·sinθ =Fc·cosθ  

La partícula está en equilibrio en la dirección normal. Si no está en equilibrio en la dirección tangencial, la fuerza neta en esta dirección es

F= -mg·sinθ +Fc·cosθ= -mg·sinθ +mω2·R·sinθ ·cosθ

Esta fuerza depende solamente de la posición θ  y es conservativa. La energía potencial correspondiente a la fuerza F(θ) es

0 θ F(θ)R·dθ = E p (0) E P (θ)

Tomando como nivel cero de energía potencial Ep(0)=0 para θ=0, integramos y haciendo algunas operaciones, se obtiene

E p (θ)=mgR(1cosθ) 1 2 m ω 2 R 2 sin 2 θ

Descripción cualitativa del movimiento de la partícula

La partícula parte del reposo en la posición θ0. Su energía total E es

E= E p ( θ 0 )=mgR(1cos θ 0 ) 1 2 m ω 2 R 2 sin 2 θ 0

Sin rozamiento

La ecuación del movimiento es, fuerza neta F igual a la masa por aceleración tangencial

mR d 2 θ d t 2 = F c cosθmgsinθ mR d 2 θ d t 2 =m ω 2 Rsinθcosθmgsinθ d 2 θ d t 2 =( ω 2 cosθ g R )sinθ

Se resuelve esta ecuación diferencial por procedimientos numéricos, con las siguientes condiciones iniciales, en el instante t=0, θ=θ0, dθ/dt=0.

Solución analítica

La energía de la partícula es la suma de la energía cinética y potencial. La partícula se mueve con velocidad R·dθ/dt a lo largo de la pista circular

E= 1 2 m R 2 ( dθ dt ) 2 1 2 m ω 2 R 2 sin 2 θ+mgR( 1cosθ )

Despejamos la velocidad angular dθ/dt e integramos para obtener la posición angular θ en función del tiempo t

( dθ dt ) 2 = ω 2 { 2( EmgR ) m R 2 ω 2 +1 cos 2 θ+2 g/R ω 2 cosθ } ωt= θ 0 θ dθ C cos 2 θ+2λcosθ ,{ C= 2( EmgR ) m R 2 ω 2 +1 λ= g R ω 2

Teniendo en cuenta las relaciones trigonométricas

{ 1+cosθ=2 cos 2 θ 2 1cosθ=2 sin 2 θ 2

Hacemos el cambio de variable

x=tan θ 2 = 1cosθ 1+cosθ cosθ= 1 x 2 1+ x 2 sinθ·dθ= 4x ( 1+ x 2 ) 2 dx dθ= 2 1+ x 2 dx

La integral se expresa en términos de la variable x

dθ C cos 2 θ+2λcosθ = 2dx C ( 1+ x 2 ) 2 ( 1 x 2 ) 2 +2λ( 1 x 2 )( 1+ x 2 ) = 2dx a x 4 +b x 2 +c , { a=C12λ b=2C+2 c=C1+2λ

Buscamos en una tabla de integrales (véase la referencias) la solución para cada uno de los dos posibles casos:

  1. Cuando la energía total es negativa, Em<E<0 y mayor que la mínima, para ω2>g/R (λ<1). La partícula se mueve en el intervalo (θ1, θ0)

  2. Comprobamos que el coeficiente a es negativo. Expresamos el polinomio como producto de factores

    a x 4 +b x 2 +c=(a)( x 0 2 x 2 )( x 2 x 1 2 ) x 0,1 2 = 1C±2 λ 2 +C C12λ = 1+C±2 λ 2 +C 1+2λC

    Comprobamos que x0,1 se corresponden con las posiciones de retorno θ0,1

    cos θ 1 =λ+ λ 2 +C x 1 2 = 1cos θ 1 1+cos θ 1 x 1 2 = 1λ λ 2 +C 1+λ+ λ 2 +C = ( 1λ λ 2 +C )( 1+λ λ 2 +C ) ( 1+λ+ λ 2 +C )( 1+λ λ 2 +C ) = 1+C2 λ 2 +C 1+2λC cos θ 0 =λ λ 2 +C x 0 2 = 1λ+ λ 2 +C 1+λ λ 2 C = ( 1λ+ λ 2 +C )( 1+λ+ λ 2 +C ) ( 1+λ λ 2 +C )( 1+λ+ λ 2 +C ) = 1+C+2 λ 2 +C 1+2λC

    Buscamos la integral en la Tabla, página 282, 3.152, n° 9

    a u dx ( a 2 x 2 )( x 2 b 2 ) = 1 a F( κ,q ),{ κ=arcsin a u u 2 b 2 a 2 b 2 t= a 2 b 2 a , au>b>0

    El resultado de la integral es

    ωt= 2 a x 0 x dx ( x 0 2 x 2 )( x 2 x 1 2 ) ωt= 2 x 0 a F( arcsin( x 0 x x 2 x 1 2 x 0 2 x 1 2 ), x 0 2 x 1 2 x 0 )

    Despejamos la variable x, véase la página Integrales elípticas

    sn( x 0 a 2 ωt, x 0 2 x 1 2 x 0 )=sin( arcsin( x 0 x x 2 x 1 2 x 0 2 x 1 2 ) ) x= x 2 1( 1 x 1 2 x 0 2 ) sn 2 ( x 0 a 2 ωt, x 0 2 x 1 2 x 0 )

    Dehacemos el cambio de variable x=tan(θ/2)

    θ(t)=2arctan x 1 1( 1 x 1 2 x 0 2 ) sn 2 ( x 0 a 2 ωt, x 0 2 x 1 2 x 0 )

    Ejemplo.

    La partícula se mueve entre las posciones angulares θ0=120° (de partida) y θ1=25.84°

    w=7; %velocidad angular de rotación
    R=1; %radio de la pista circular
    th_0=2*pi/3; %ángulo inicial, 120º, parte del reposo
    E=9.8*R*(1-cos(th_0))-w^2*R^2*sin(th_0).^2/2; %energía constante
    C=2*(E-9.8*R)/(R*w)^2+1; %constantes
    lambda=9.8/(R*w^2); 
    th_1=acos(lambda+sqrt(lambda^2+C)); %posiciones extremas
    th_0=acos(lambda-sqrt(lambda^2+C)); 
    x0=(1+C+2*sqrt(lambda^2+C))/(1+2*lambda-C); %cuadrado de x_0
    x1=(1+C-2*sqrt(lambda^2+C))/(1+2*lambda-C); %cuadrado de x_1
    a=C-1-2*lambda; %coeficiente
    th=@(t) 2*atan(sqrt(x1)./sqrt(1-(1-x1/x0)*ellipj(sqrt(x0)
    *sqrt(-a)*w*t/2,1-x1/x0).^2));
    hold on
    fplot(th,[0,5])
    
    %solución numérica
    f=@(t,x) [x(2); (w^2*cos(x(1))-9.8/R)*sin(x(1))]; 
    [t,x]=ode45(f,[0,5],[th_1,0]);
    plot(t,x(:,1))
    hold off
    grid on
    xlabel('t')
    ylabel('\theta')
    set(gca,'YTick',0:pi/6:pi)
    set(gca,'YTickLabel',{'0','\pi/6','\pi/3','\pi/2','2\pi/3', '5\pi/6', '\pi'})
    legend('analítica','numérica','Location', 'best')
    title('Pista circular que gira')

    Vemos que la soluciones analítica y numérica, utilizando el procedimiento ode45 de MATLAB, prácticamente coinciden

    Comprobamos que en el procedimiento numérico, la energía se mantiene aproximadamente constante

    >> Energia=x(:,2).^2*R^2/2-w^2*R^2*sin(x(:,1)).^2/2+9.8*R*(1-cos(x(:,1)))
    Energia =
       -3.6750
       -3.6750
    ....
       -3.6414
       -3.6403
  3. Cuando la energía total es positiva, E>0, para ω2>g/R (λ<1) y para ω2<g/R (λ>1). La partícula se mueve en el intervalo (-θ0, θ0)

  4. El coeficiente a es negativo, el cuadrado de x1 es negativo

    a x 4 +b x 2 +c=(a)( x 0 2 x 2 )( x 2 + x 1 2 ), x 1 2 >0

    Buscamos la integral en la Tabla, página 282, 3.152, n° 4

    u b dx ( b 2 x 2 )( x 2 + a 2 ) = 1 a 2 + b 2 F( δ,r ),{ δ=arccos u b r= b a 2 + b 2 b>u0

    El resultado de la integral es

    ωt= 2 a x 0 x dx ( x 0 2 x 2 )( x 2 + x 1 2 ) ωt= 2 a x 0 2 + x 1 2 F( arccos( x x 0 ), x 0 x 0 2 + x 1 2 )

    Despejamos la variable x, véase la página Integrales elípticas

    sn( x 0 2 + x 1 2 a 2 ωt, x 0 x 0 2 + x 1 2 )=sin( arccos( x x 0 ) ) sn( x 0 2 + x 1 2 a 2 ωt, x 0 x 0 2 + x 1 2 )= 1 ( x x 0 ) 2 x= x 0 1 sn 2 ( x 0 2 + x 1 2 a 2 ωt, x 1 x 0 2 + x 1 2 ) = x 0 cn( x 0 2 + x 1 2 a 2 ωt, x 1 x 0 2 + x 1 2 )

    Hemos utilizado la propiedad, sn2(x|k)+cn2(x|k)=1. Dehacemos el cambio de variable x=tan(θ/2)

    θ(t)=2arctan( x 0 cn( x 0 2 + x 1 2 a 2 ωt, x 1 x 0 2 + x 1 2 ) )

    Ejemplo: λ<1, E>0

    La partícula se mueve entre las posciones angulares θ0=150° (de partida) y θ1=-150°

    w=7; %velocidad angular de rotación
    R=1; %radio de la pista circular
    th_0=5*pi/6; %ángulo inicial, 150º, parte del reposo
    E=9.8*R*(1-cos(th_0))-w^2*R^2*sin(th_0).^2/2; %energía constante
    C=2*(E-9.8*R)/(R*w)^2+1; %constantes
    lambda=9.8/(R*w^2); 
    a=C-1-2*lambda;
    %th_1=acos(lambda+sqrt(lambda^2+C));
    %th_0=acos(lambda-sqrt(lambda^2+C));
    x0=(1+C+2*sqrt(lambda^2+C))/(1+2*lambda-C); %cuadrado de x_0
    x1=(1+C-2*sqrt(lambda^2+C))/(1+2*lambda-C); %cuadrado de x_1
    x1=abs(x1);
    hold on
    t=linspace(0,5,200);
    [~,cn,~]=ellipj(sqrt(x0+x1)*sqrt(-a)*w*t/2,x0/(x0+x1));
    th=2*atan(sqrt(x0)*cn);
    plot(t,th)
    
    %solución numérica
    f=@(t,x) [x(2); (w^2*cos(x(1))-9.8/R)*sin(x(1))]; 
    [t,x]=ode45(f,[0,5],[th_0,0]);
    plot(t,x(:,1))
    hold off
    grid on
    xlabel('t')
    ylabel('\theta')
    legend('analítica','numérica','Location', 'best')
    set(gca,'YTick',-pi:pi/6:pi)
    set(gca,'YTickLabel',{'-\pi', '-5\pi/6', '-2\pi/3', '-\pi/2', '-\pi/3',
     '-\pi/6', '0','\pi/6','\pi/3','\pi/2','2\pi/3', '5\pi/6', '\pi'})
    title('Pista circular que gira')

    Vemos que la soluciones analítica y numérica, utilizando el procedimiento ode45 de MATLAB, prácticamente coinciden

    Comprobamos que en el procedimiento numérico, la energía se mantiene aproximadamente constante

    >> Energia=x(:,2).^2*R^2/2-w^2*R^2*sin(x(:,1)).^2/2+9.8*R*(1-cos(x(:,1)))
    Energia =
       12.1620
       12.1620
    ....
       12.5429
       12.5406

    Ejemplo: λ>1

    La partícula se mueve entre las posciones angulares θ0=120° (de partida) y θ1=-120°

    Vemos que la soluciones analítica y numérica, utilizando el procedimiento ode45 de MATLAB, prácticamente coinciden

Caso particular, E=0, ω2>g/R (λ<1)

Un caso particular importante se produce cuando la energía E de la partícula es nula, en el caso ω2>g/R (λ<1)

E=mgR( 1cosθ ) 1 2 m ω 2 R 2 sin 2 θ,E=0 cos 2 θ2λcosθC=0 cos θ 0,1 =λ± λ 2 +C ,{ λ= g R ω 2 C= 2( 0mgR ) m R 2 ω 2 +1=2λ+1 cos θ 0 =λ λ 2 +C =2λ1 cos θ 1 =λ+ λ 2 +C =1, θ 1 =0 x 0 2 = 1cos θ 0 1+cos θ 0 = 1λ λ

w=7; %velocidad angular de rotación
R=1; %radio de la pista circular
Ep=@(x) 9.8*R*(1-cos(x))-w^2*R^2*sin(x).^2/2;
fplot(Ep,[-pi,pi])
E=0;  %energía constante
line([-pi,pi],[E,E])
lambda=9.8/(R*w^2); 
th_0=acos(2*lambda-1);
Emin=9.8*R-9.8^2/(2*w^2)-w^2*R^2/2;
line([0,0],[Emin, E], 'lineStyle', '--')
line([th_0,th_0],[Emin, E], 'lineStyle', '--')
grid on
xlabel('\theta')
ylabel('E_p(\theta)')
title('Pista circular')

Para la energía E=0, el ángulo inicial θ0=127°

>> th_0*180/pi
ans =
  126.8699

Resolvemos la integral, haciendo el cambio devariable x=tan(θ/2)

dθ C cos 2 θ+2λcosθ = 2dx a x 4 +b x 2 +c =, { a=C12λ=4λ b=2C+2=44λ c=C1+2λ=0 dx x λ x 2 +1λ ,λ<1

Buscamos la integral en la Tabla, página 97, 2.266, caso (a>0, Δ<0)

dx x c x 2 +bx+a ,{ c=λ<0 b=0 a=1λ>0 Δ=4ac b 2 =4λ( 1λ )<0 1 a arccosh( 2a+bx x Δ )= 1 1λ arccosh( 1 x 1λ λ )

Desahaciendo el cambio de variable

ωt= 1 1λ arccosh( 1 x 1λ λ ) 1 1λ arccosh( 1 x 0 1λ λ ) ωt= 1 1λ arccosh( 1 x 1λ λ ) cosh( ωt 1λ )= 1 x 1λ λ x= 1λ λ 1 cosh( ωt 1λ ) θ(t)=2arctan( 1λ λ 1 cosh( ωt 1λ ) )

Ejemplo.

w=7; %velocidad angular de rotación
R=1; %radio de la pista circular
E=0; %energía constante
%solución numérica
f=@(t,x) [x(2); (w^2*cos(x(1))-9.8/R)*sin(x(1))]; 
[t,x]=ode45(f,[0,5],[th_0,0]);
hold on
plot(t,x(:,1))
%solución analítica
C=2*(E-9.8*R)/(R*w)^2+1; %constantes
lambda=9.8/(R*w^2); 
th_0=acos(lambda-sqrt(lambda^2+C));
x0=(1+C+2*sqrt(lambda^2+C))/(1+2*lambda-C); %cuadrado de x_0
th=@(t) 2*atan(sqrt((1-lambda)/lambda)./cosh(sqrt(1-lambda)*(w*t)));
fplot(th,[0,5])
hold off
grid on
xlabel('t')
ylabel('\theta')
legend('numérica', 'analítica','Location', 'best')
set(gca,'YTick',0:pi/6:pi)
set(gca,'YTickLabel',{'0','\pi/6','\pi/3','\pi/2','2\pi/3', '5\pi/6', '\pi'})
title('Pista circular que gira')

En la solución analítica, la partícula parte de la posición θ0=127° y tiende a la posición θ1=0, que alcanza después de un tiempo infinito. Esta posición es de equilibrio inestable, cualquier perturbación, por pequeña que sea, hace que la partícula regrese a la posición de partida.

Comprobamos que en el procedimiento numérico, la energía se mantiene aproximadamente constante

>> Energia=x(:,2).^2*R^2/2-w^2*R^2*sin(x(:,1)).^2/2+9.8*R*(1-cos(x(:,1)))
Energia =
    0.0000
    0.0000
    ....
    -0.1305
    -0.1304

Resumen: ω2>g/R (λ<1)

La situación más importante se produce para ω2>g/R (λ<1). Por ejemplo: la velocidad angular de rotación, ω=7.0 rad/s, radio de la pista circular, R=1.0 m

Representamos en el mismo script, la posición angular θ(t) de la partícula para tres valores de la energía

w=7; %velocidad angular de rotación
R=1; %radio de la pista circular
hold on
for E=[-5,0,5]
    C=2*(E-9.8*R)/(R*w)^2+1; %constantes
    lambda=9.8/(R*w^2); 
%     th_1=acos(lambda+sqrt(lambda^2+C)); %ángulos extremos
%     th_0=acos(lambda-sqrt(lambda^2+C));
    x0=(1+C+2*sqrt(lambda^2+C))/(1+2*lambda-C); %cuadrado de x_0
    x1=(1+C-2*sqrt(lambda^2+C))/(1+2*lambda-C); %cuadrado de x_1
    if E<0
        a=C-1-2*lambda; %coeficiente
        th=@(t) 2*atan(sqrt(x1)./sqrt(1-(1-x1/x0)*ellipj(sqrt(x0)*
sqrt(-a)*w*t/2,1-x1/x0).^2));
        fplot(th,[0,5],'displayName',num2str(E))
    elseif E>0
        x1=abs(x1);
        t=linspace(0,5,200);
        [~,cn,~]=ellipj(sqrt(x0+x1)*sqrt(-a)*w*t/2,x0/(x0+x1));
        th=2*atan(sqrt(x0)*cn);
        plot(t, th, 'displayName',num2str(E))
    else
        th=@(t) 2*atan(sqrt((1-lambda)/lambda)./cosh(sqrt(1-lambda)*(w*t)));
        fplot(th,[0,5],'displayName',num2str(E))
    end
end
hold off
grid on
xlabel('t')
legend('-DynamicLegend','location','northeast')
ylabel('\theta')
set(gca,'YTick',-pi:pi/6:pi)
set(gca,'YTickLabel',{'-\pi', '-5\pi/6', '-2\pi/3', '-\pi/2', '-\pi/3', 
'-\pi/6', '0','\pi/6','\pi/3','\pi/2','2\pi/3', '5\pi/6', '\pi'})
title('Pista circular que gira')

Con rozamiento

Supongamos que el coeficiente de rozamiento entre la partícula y la superficie circular sobre la que desliza es μs. La partícula permanecerá en reposo si Fr/N<μs

La reacción N de la superficie circular es

N=mgcosθ+Fcsinθ=mgcosθ+2R·sin2θ

La reacción N se anula para el ángulo

gcosθ+ ω 2 R( 1 cos 2 θ )=0 cos 2 θ g ω 2 R cosθ1=0 cosθ= 1 2 ( g ω 2 R ( g ω 2 R ) 2 +4 )

Representamos N/mg en función de θ para dos velocidades angulares de rotación ω=2, 7 rad/s

R=1; %radio
hold on
for w=[2,7] %velocidad angular de rotación
    f=@(x) cos(x)+w^2*R*sin(x).^2/9.8;
    th=acos((9.8/(w^2*R)-sqrt((9.8/(w^2*R))^2+4))/2);
    fplot(f,[0,th],'displayName',num2str(w))
    disp(th*180/pi)
end
hold off
grid on
set(gca,'XTick',0:pi/6:pi)
set(gca,'XTickLabel',{'0','\pi/6','\pi/3','\pi/2','\pi/3',
'2\pi/3','5\pi/6','\pi'})
legend('-DynamicLegend','location','best')
xlabel('\theta')
ylabel('N/mg')
title('Pista con rozamiento'

Los posiciones angulares para las cuales la reacción N de la pista se anula son, 110.9° y 154.8°, respectivamente

  110.8754
  154.8216

ω2<g/R

La posición de equilibrio estable es θe=0

Para θ>0, la componente tangencial del peso mgsinθ es mayor que la componente tangencial de la fuerza centrífuga, Fccosθ=mω2Rsinθ·cosθ. La fuerza de rozamiento es la diferencia Fr= mgsinθ-Fccosθ

Representamos Fr/N en función de θ para ω=2 rad/s, con R=1.0 m.

F r N = gsinθ ω 2 Rsinθ·cosθ gcosθ+ ω 2 R sin 2 θ = ( g ω 2 Rcosθ )sinθ gcosθ+ ω 2 R sin 2 θ

R=1; %radio
w=2; %velocidad angular de rotación
f=@(x) (9.8*sin(x)-w^2*R*sin(x).*cos(x))./(9.8*cos(x)+w^2*R*sin(x).^2);
fplot(f,[0,pi/3])
mu=0.4; %coeficiente estático
g=@(x) 9.8*sin(x)-w^2*R*sin(x)*cos(x)-mu*(9.8*cos(x)+w^2*R*sin(x)^2);
th_1=fzero(g,[0,pi/3]);
line([th_1,th_1],[0,mu],'lineStyle','--')
line([0,th_1],[mu,mu],'lineStyle','--')
grid on
set(gca,'XTick',0:pi/12:pi/3)
set(gca,'XTickLabel',{'0','\pi/12','\pi/6','\pi/4','\pi/3'})
xlabel('\theta')
ylabel('F_r/N')
title('Pista con rozamiento')

Dado el coeficiente de rozamiento μs, las posiciones θ en las que la partícula está en equilibrio serán aquellas para las que Fr/N<μs, es decir θ<θ1

El ángulo θ1 se calcula resolviendo la ecuación trascendente, Fr=μsN, utilizando la función fzero de MATLAB

gsinθ ω 2 Rsinθ·cosθ=μ( gcosθ+ ω 2 R sin 2 θ )

El ángulo θ1 en grados es

>> th_1*180/pi
ans =   34.9675

Si la posición inicial de la partícula θ0>θ1 la partícula desliza hacia abajo, la velocidad angular es negativa dθ/dt<0. Las fuerzas sobre la partícula se han mostrado en la figura más arriba. La ecuación del movimiento es

mR d 2 θ d t 2 = F c cosθmgsinθ+ F r F r =μN=μ( F c sinθ+mgcosθ) d 2 θ d t 2 =( ω 2 cosθ g R )sinθ+μ( ω 2 sin 2 θ+ g R cosθ )

Se resuelve esta ecuación diferencial por procedimientos numéricos, con las siguientes condiciones iniciales, en el instante t=0, θ=θ0, dθ/dt=0.

Supongamos que el coeficiente cinético de la pista es μs=μk=0.4 y la partícula parte en reposo desde la posición θ0=π/3 (60°) que es mayor que θ1

function pista_1
    R=1; %radio
    w=2; %velocidad angular de rotación
    mu=0.4; %coeficiente estático y cinético
    f=@(t,x) [x(2); (w^2*cos(x(1))-9.8/R)*sin(x(1))+mu*(w^2*sin(x(1))^2
+9.8*cos(x(1))/R)]; 
    opts=odeset('events',@stop_pista);
    [t,x]=ode45(f,[0,10],[pi/3,0], opts);
    plot(t,x(:,1)) %tiempo, posición
    grid on
    set(gca,'YTick',0:pi/12:pi/2)
    set(gca,'YTickLabel',{'0','\pi/12','\pi/6','\pi/4','\pi/3', '5\pi/12',
'\pi/2'})
    xlabel('t')
    ylabel('\theta');
    title('Pista con rozamiento')
 
    th=x(end,1);
    disp([t(end), th*180/pi])
    N=w^2*R*sin(th)^2+9.8*cos(th);
    Fr=9.8*sin(th)-w^2*R*sin(th)*cos(th);
    disp([Fr, mu*N])

    function [value,isterminal,direction]=stop_pista(~,x)
        value=x(2);
        isterminal=1; %1 detiene cuando la velocidad se hace cero   
        direction=1; 
    end
end

Cuando la partícula se detiene, se verifica si |Fr/N|s en cuyo caso la partícula permanece en reposo, en caso contrario, continua su movimiento hasta la próxima posición de parada.

    1.1585    7.9277
    0.8052    3.9130

La partícula se detiene en la posición θ=7.93° empleando un tiempo de t=1.16 s.

En la posición en la que se detiene, la fuerza de rozamiento vale Fr=0.8052 que es menor que la máxima μsN=3.9130 N

ω2>g/R

Representamos Fr/N en función de θ para ω=7 rad/s, con R=1.0 m.

R=1; %radio
w=7; %velocidad angular de rotación
f=@(x) (9.8*sin(x)-w^2*R*sin(x).*cos(x))./(9.8*cos(x)+w^2*R*sin(x).^2);
hold on
fplot(f,[0,2*pi/3])
mu=0.4; %coeficiente estático
g=@(x) 9.8*sin(x)-w^2*R*sin(x)*cos(x)-mu*(9.8*cos(x)+w^2*R*sin(x)^2);
th_3=fzero(g,[0,2*pi/3]);
line([th_3,th_3],[0,mu],'lineStyle','--')
line([0,th_3],[mu,mu],'lineStyle','--')
%equilibrio
th_e=acos(9.8/(w^2*R));
plot(th_e,0,'ro','markersize',4,'markerfacecolor','r')
%mínimo
th_m=acos((-9.8+sqrt(9.8^2+4*(9.8^2+w^4*R^2)))/(2*w^2*R));
mu=-0.4; %coeficiente estático
g=@(x) 9.8*sin(x)-w^2*R*sin(x)*cos(x)-mu*(9.8*cos(x)+w^2*R*sin(x)^2);
th_1=fzero(g,[0,th_m]);
line([th_1,th_1],[0,mu],'lineStyle','--')
line([0,th_1],[mu,mu],'lineStyle','--')
th_2=fzero(g,[th_m, th_e]);
line([th_2,th_2],[0,mu],'lineStyle','--')
line([0,th_2],[mu,mu],'lineStyle','--')
hold off
disp([th_1, th_2, th_e, th_3]*180/pi)
grid on
xlim([0,2*pi/3])
set(gca,'XTick',0:pi/12:2*pi/3)
set(gca,'XTickLabel',{'0','\pi/12','\pi/6','\pi/4','\pi/3', '5\pi/12',
 '\pi/2', '7\pi/12','2\pi/3'})
xlabel('\theta')
ylabel('F_r/N')
title('Pista con rozamiento')

La fuerza de rozamiento es nula en la posición de equilibrio estable θ e =arccos( g ω 2 R ) , se señala mediante un punto de color rojo en la figura, θe=78.46°

Observamos en la representación gráfica un mínimo en la posición θm, que se calcula derivando Fr/N respecto de θ e igualando a cero

d dθ ( F r N )= ( ( g ω 2 Rcosθ )cosθ+ ω 2 R sin 2 θ )( gcosθ+ ω 2 R sin 2 θ )( gsinθ+2 ω 2 Rsinθcosθ )( g ω 2 Rcosθ )sinθ ( gcosθ+ ω 2 R sin 2 θ ) 2 = g 2 + ω 4 R 2 sin 2 θg ω 2 Rcosθ ( gcosθ+ ω 2 R sin 2 θ ) 2 =0 ω 4 R 2 cos 2 θ+g ω 2 Rcosθ( g 2 + ω 4 R 2 )=0 θ m =arccos( g+ g 2 +4( g 2 + ω 4 R 2 ) 2 ω 2 R )

Los ángulos límites θ1 y θ2 o θ3 para un valor dado del coeficiente de rozamiento μs y una determinada velocidad angular ω se calculan utilizando la función fzero de MATLAB para resolver la ecuación trascendente, FrsN

|gsinθ-ω2Rsinθcosθ|=μ(gcosθ+ω2Rsin2θ)

   6.0718   54.3757   78.4630  100.3107

Si la posición inicial de la partícula está en el intervalo θ1≤θ0≤ θ2 la partícula desliza hacia arriba, la velocidad angular es positiva dθ/dt>0. Las fuerzas sobre la partícula se muestran en la figura.

La ecuación del movimiento es

mR d 2 θ d t 2 = F c cosθmgsinθ F r d 2 θ d t 2 =( ω 2 cosθ g R )sinθμ( ω 2 sin 2 θ+ g R cosθ )

Supongamos que el coeficiente cinético de la pista es μs=μk=0.4 y la partícula parte en reposo desde la posición θ0=π/6 (30°) que es mayor que θ1 y menor que θ2

function pista_4
    R=1; %radio
    w=7; %velocidad angular de rotación
    mu=0.4; %coeficiente estático y cinético
    f=@(t,x) [x(2); (w^2*cos(x(1))-9.8/R)*sin(x(1))-mu*(w^2*sin(x(1))^2+
9.8*cos(x(1))/R)]; 
    opts=odeset('events',@stop_pista);
    [t,x]=ode45(f,[0,10],[pi/6,0], opts);
    plot(t,x(:,1)) %tiempo, posición
    set(gca,'YTick',0:pi/12:pi/2)
    set(gca,'YTickLabel',{'0','\pi/12','\pi/6','\pi/4','\pi/3',
 '5\pi/12','\pi/2'})
    xlabel('t')
    ylabel('\theta');
    title('Pista con rozamiento')
    grid on

    th=x(end,1);
    disp([t(end), th*180/pi])
    N=w^2*R*sin(th)^2+9.8*cos(th);
    Fr=9.8*sin(th)-w^2*R*sin(th)*cos(th);
    disp([Fr, mu*N])


    function [value,isterminal,direction]=stop_pista(~,x)
       %x(1) es  x, x(3) es y
        value=x(2);
        isterminal=1; %1 detiene cuando la velocidad se hace cero   
        direction=-1; 
    end
end
    0.5736   73.0992
   -4.2531   19.0831

La partícula se detiene en la posición θ=73.1° empleando un tiempo de t=0.57 s.

En la posición en la que se detiene, la fuerza de rozamiento vale Fr=4.25 que es menor que la máxima μsN=19.08 N

Actividades

Se introduce

Se pulsa el botón titulado Nuevo

Observamos el movimiento de la partícula en equlibrio o deslizando a lo largo de la pista circular, tal como lo vería un observador no inercial que girase con la pista circular. Se marca la posición angular de equilibrio estable θe.

En la parte derecha, se representa la curva de energía potencial Ep(θ) en color azul, la energía total E (un segmento de color negro). La partícula oscila alrededor de las posiciones de equilibrio θe entre las posiciones de retorno, una es la posición inicial θ0 y la otra la raíz de la ecuación Ep(θ)=Ep(θ0).



Referencias

Thomas E. Baker, Andreas Bill. Jacobi elliptic functions and the complete solution to the bead on the hoop problem. Am. J. Phys. 80 (6), June 2012. pp. 506-514

I. S. Gradshteyn, I. M. Ryzhik. Table of Integrals, Series, and Products. Seventh Edition. Elsevier (2007). Integrales: (primera solución) pág. 282, 3.152, n° 9, (segunda solución) pág. 282, 3.152, n° 4, (tercera solución) pág. 97, 2.266, caso (a>0, Δ<0)