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
| function r = graf(sigma, AVAM, axeshandle, varargin)
colorflag = 0; r = 0;
if ( isempty(varargin) == 0 )
colorflag = varargin{1};
color = varargin{2};
end
if ( colorflag )
plot(real(AVAM), imag(AVAM), color,'Parent',axeshandle);
return
end
plot(real(AVAM), imag(AVAM), 'm*','Parent',axeshandle);
%title('Autovalores do Sistema','Parent',axeshandle);
%legend('Autovalores do Matlab','Parent',axeshandle);
Z = size(AVAM);
r = abs(sigma - AVAM(Z(1)));
ReSigma = real(sigma);
ImagSigma = imag(sigma);
theta = linspace(0,2*pi,100); % create vector theta
x = r*cos(theta); % generate x-coordinate
y = r*sin(theta); % generate y-coordinate
plot(ReSigma, ImagSigma, 'ro','Parent',axeshandle); % plor o centro do circulo (sigma)
fill(x+ReSigma,y+ImagSigma, [0 0 1] , 'FaceAlpha', 0.1, 'EdgeAlpha' , 0);
%...no filled cercle
%plot(x+ReSigma,y+ImagSigma,'r','Parent',axeshandle); % plot circle
drawnow; |
Partager