colores del padre


////////////NUEVA/////////
Creamos un archivo .m (para poder realizar las operaciones más rápido y hacer modificaciones a las gráficas sin necesidad de escribir todo en de nuevo en laventana de comandos).


////////// archivo .m ////////
syms S
H1=24.542/(S^2+4*S+24.542); %función de trasferencia H1(S)
pretty(H1) %para acomodarlo
Y1=H1*(1/S)%Y1(S)=H1(S)*X(S), pero como X(S)=1/S
y1=ilaplace(Y1) %lo regresamos en terminos de tiempo "t" para poder graficar

H2=245.42/((S+10)*(S^2+4*S+24.542));%función de trasferencia H2(S)
pretty(H2) %para acomodarlo
Y2=H2*(1/S) %Y2(S)=H1(S)*X(S), pero como X(S)=1/S
y2=ilaplace(Y2)%lo regresamos en terminos de tiempo "t" para poder graficar

H3=73.626/((S+3)*(S^2+4*S+24.542)); %función de trasferencia H2(S)
pretty(H3) %para acomodarloY3=H3*(1/S) %Y3(S)=H1(S)*X(S), pero como X(S)=1/S
y3=ilaplace(Y3) %lo regresamos en terminos de tiempo "t" para poder graficar

t=[0:0.01:3];
ft1=1 -(cos((5^(1./2)*10271^(1./2).*t)./50) + (20*5^(1./2)*10271^(1./2)*sin((5^(1./2)*10271^(1./2).*t)./50))./10271)./exp(2.*t);
plot(t,ft1,'LineWidth',2,'Color',[.6 0 0]); %para darle color a nuestrafunción en l gráfica

ft2=1 - (30000*(cos((5^(1./2)*10271^(1./2).*t)./50) + (18271*5^(1./2)*10271^(1./2)*sin((5^(1./2)*10271^(1./2).*t)./50))./3081300))./(42271*exp(2.*t)) -12271./(42271*exp(10.*t));
hold on; %para agrear dos o más graficas en un mismo archivo
plot(t,ft2,'LineWidth',2,'Color',[.2 0 1]) %para darle color a nuestra función en lgráfica

ft3=(1500*(cos((5^(1./2)*10271^(1./2).*t)./50) - (11271*5^(1./2)*10271^(1./2)*sin((5^(1./2)*10271^(1./2).*t)./50))./513550))./(10771*exp(2.*t)) - 12271./(10771*exp(3.*t)) + 1;
hold on;...