function vykresli(n,varargin)
global data_history

figure(10);
hold on;

if (nargin<2)
    c = 'b';
else
    c = varargin{1};
end;
plot(data_history(1,:),data_history(n,:),c);

hold off;