% U53, Example 5.5, Satellite Control w/ Lead Compensator
% Having a Relatively Small Value for the Pole
% 

s = tf( 's' )

sysG = (s+1)/(s^2*(s+4));

rlocus( sysG, 'r' );

axis('equal')

axis([-6, 2, -3, 3]) 

%grid

% axis([-13, 1, -5, 5]) 
set(gco,'LineWidth',4) 

% For example