Grafico
Gráfico do Cosseno
t = [0:0.1:4*%pi];
y = cos(t);
plot2d(t, y, style=[color("red")])
Gráfico do Seno
t = [0:0.1:4*%pi];
y = sin(t);
plot2d(t, y, style=[color("red")])
Sistema subamortecido
k = 4*10^5;
m = 1200;
c = 10^4;
Xo = 0.4;
lambda = c/(2*m);
mi = sqrt(abs(c^2-4*m*k))/(2*m);
A = Xo;
B = (lambda*A)/mi;
t = 0:0.01:2;
y = A*exp(-lambda*t).*cos(mi*t)+B*exp(-lambda*t).*sin(mi*t);
plot2d(t,y,style = [color("blue")], rect = [0, -0.5, 1.4, 0.5], axesflag = 4)
revisão da página: 4, última edição: 21 Apr 2011 20:44