%display latex # Mostrar os resultados renderizados (latex)
Gaussiana
a. Verifique que ∞∫−∞e−12x2dx=√2π
b. Defina a variável simbólica "a". Assuma a>0 e determine ∞∫−∞e−12ax2dx
integrate(exp(-1/2*x^2),x,-oo,oo)
var('a')
assume(a>0)
integrate(exp(-1/2*a*x^2),x,-oo,oo)
Oscilador amortecido
a. Resolva a equação do oscilador amortecido m¨y(t)+b˙y(t)=−ky(t).
Para isso você precisará:
desolve
.A sintáxe do comando é desolve(equação, dvar, ivar=t)
, onde dvar
é a variável dependente e ivar=t
indica que a variável independente e t. Use a ajuda desolve?
se necessário.
Definir as variáveis simbólicas e funções involvidas (ver guia de referencia rápida);
var('m,b,k,t')
y = function('y')(t)
Estabelecer a equação diferencial;
eq = m*diff(y,t,2)+b*diff(y,t) == -k*y
eq
Assuma 4mk−b2>0;
assume(4*m*k-b^2>0)
Resolver a equação diferencial usando o desolve
.
desolve(eq,y,ivar=t)
b. Suponha que um sistema mecânico seja governado por pela equação diferencial ¨y(t)+15˙y(t)=−14y(t).
Para incluir as condições iniciais, use desolve(equação, dvar, ics=[t_0, y(t_0), y'(t_0)])
, onde t_0, y(t_0), y'(t_0)
são as tais condições.
eq2 = diff(y,t,2)+1/5*diff(y,t) == -1/4*y; eq2
sol = desolve(eq2,y,ivar=t,ics=[0,1/2,7/4]); sol
c. Plote um gráfico da solução encontrada no intervalo 0<t<50. Dica: guarde a solução da equação diferencial em uma variável Python (sol = desolve(...)
)
plot(sol,t,0,50)
plot(sol,t,0,50, gridlines=True, frame=True)
plot(sol,t,0,50, gridlines=True, frame=True, axes=False, color='red', title='Título do gráfico')
plot(sol,t,0,50, gridlines=True, frame=True, axes=False, color='red', title='Título do gráfico',
legend_label='solução', axes_labels=['$t$','$y(t)$'])
whos
Variable Type Data/Info ---------------------------------- a Expression a b Expression b eq Expression b*diff(y(t), t) + m*diff(y(t), t, t) == -k*y(t) eq2 Expression 1/5*diff(y(t), t) + diff(y(t), t, t) == -1/4*y(t) k Expression k m Expression m sol Expression 1/2*(3*sqrt(6)*sin(1/5*sq<...>5*sqrt(6)*t))*e^(-1/10*t) t Expression t y Expression y(t)