[adsense:responsibe:9545213979]
y
Ceros: Ninguno
y
s=%s; g=1/(s*(s^2+2)); gs=syslin('c',g); clf; evans(gs); xgrid;
s=%s; g=1/(s*(s^2+2)); gs=syslin('c',g); ts=10; mp=0.1 sig=4/ts; wd=-%pi*sig/log(mp) s1=-sig+%i*wd; gs1=horner(gs,s1); anggs1=atan(imag(gs1),real(gs1)) aux=360*anggs1/(2*%pi); angc=180+113; angc1=angc/5; a=0.4; b=a+0.546/tan((90-angc1)*2*%pi/360) gc=(s+a)^5/(s+b)^5; gt=gc*g; gts=syslin('c',gt); aux2=abs(horner(gt,s1)); kc=1/aux2; gt2=kc*gt; gcgs1=horner(gt2,s1)
El valor de
gcgs1 = - 1.0000000 - 0.0002514i
y
Ceros: 5 ceros en
y
s=%s; g=1/(s*(s^2+2)); gs=syslin('c',g); ts=10; mp=0.1 sig=4/ts; wd=-%pi*sig/log(mp) s1=-sig+%i*wd; gs1=horner(gs,s1); anggs1=atan(imag(gs1),real(gs1)) aux=360*anggs1/(2*%pi); angc=180+113; angc1=angc/5; a=0.4; b=a+0.546/tan((90-angc1)*2*%pi/360) gc=(s+a)^5/(s+b)^5; gt=gc*g; gts=syslin('c',gt); aux2=abs(horner(gt,s1)); kc=1/aux2; gt2=kc*gt; clf; evans(gt2) mtlb_axis([-2 0.25 -3 3]) xgrid plot(real(s1),imag(s1),'*') plot(real(s1),-imag(s1),'*') aux3=string(real(s1)+%i*imag(s1)) aux4=string(real(s1)+%i*imag(s1)) xstring(real(s1),imag(s1),aux3) xstring(real(s1),-imag(s1),aux4)
Añadir nuevo comentario