nums=[1 1]

dens=[1 -2 1]

for x=1:200

u(x)=1;

end

for x=1:200

r(x)=x;

end

rlocus(nums,dens)

zgrid

title('Root Locus del sistema sin controlar')

dlsim(nums,dens,u)

title('Resp. del sistema sin cont. al escalon')

dlsim(nums,dens,r)

title('Resp. del sistema sin cont. a la rampa')

numc=[1 -0.8]

denc=[1 0.8]

k=0.0755

[sysn,sysd]=series(k*numc,denc,nums,dens)

[numlc,denlc]=cloop(sysn,sysd,-1)

rlocus(numlc,denlc)

zgrid

title('Root Locus del sistema con controlador, k=0.0755')

dlsim(numlc,denlc,u)

title('Resp. del sistema con cont. al escalon, k=0.0755')

dlsim(numlc,denlc,r)

title('Resp. del sistema con cont. a la rampa, k=0.0755')

k=0.0967

[sysn,sysd]=series(k*numc,denc,nums,dens)

[numlc,denlc]=cloop(sysn,sysd,-1)

rlocus(numlc,denlc)

zgrid

title('Root Locus del sistema con controlador, k=0.0967')

dlsim(numlc,denlc,u)

title('Resp. del sistema con cont. al escalon, k=0.0967')

dlsim(numlc,denlc,r)

title('Resp. del sistema con cont. a la rampa, k=0.0967')

k=0.4302

[sysn,sysd]=series(k*numc,denc,nums,dens)

[numlc,denlc]=cloop(sysn,sysd,-1)

rlocus(numlc,denlc)

zgrid

title('Root Locus del sistema con controlador, k=0.4302')

dlsim(numlc,denlc,u)

title('Resp. del sistema con cont. al escalon, k=0.4302')

dlsim(numlc,denlc,r)

title('Resp. del sistema con cont. a la rampa, k=0.4302')

k=0.9955

[sysn,sysd]=series(k*numc,denc,nums,dens)

[numlc,denlc]=cloop(sysn,sysd,-1)

rlocus(numlc,denlc)

zgrid

title('Root Locus del sistema con controlador, k=0.9955')

dlsim(numlc,denlc,u)

title('Resp. del sistema con cont. al escalon, k=0.9955')

dlsim(numlc,denlc,r)

title('Resp. del sistema con cont. a la rampa, k=0.9955')

k=2.7593

[sysn,sysd]=series(k*numc,denc,nums,dens)

[numlc,denlc]=cloop(sysn,sysd,-1)

rlocus(numlc,denlc)

zgrid

title('Root Locus del sistema con controlador, k=2.7593')

dlsim(numlc,denlc,u)

title('Resp. del sistema con cont. al escalon, k=2.7593')

dlsim(numlc,denlc,r)

title('Resp. del sistema con cont. a la rampa, k=2.7593')