1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37
| %
% Tracé du diagramme de Bode d'une fonction du
% deuxième ordre
%
% Définition des paramètres
clear all;
m=410;
k=410;
c1=10;
c2=100;
c3=1000;
wp=sqrt(k/m);
lambda1=c1/(2*sqrt(k*m));
lambda2=c2/(2*sqrt(k*m));
lambda3=c3/(2*sqrt(k*m));
% Définition de la fonction de transfert
H1=tf(1,[m/k c1/k 1]);
H2=tf(1,[m/k c2/k 1]);
H3=tf(1,[m/k c3/k 1]);
% Tracé de la fonction de transfert
P = bodeoptions;
Title('Tracé fonction deuxième ordre');
P.FreqUnits = 'rad/s';
P.MagUnits ='abs';
P.MagScale = 'linear';
P.FreqScale = 'linear';
P.PhaseVisible = 'off';
P.Xlim={[0 3]};
P.Ylim={[0 10]};
h = bodeplot(H1,H2,H3,P);
text(1,1,' \leftarrow lambda=Sqrt(2)/2','FontSize',18) |
Partager