Цвет гистограмы

[y,x] = hist(...);
bar(x,y,'r')

kk = str2num(get(handles.input_4,'String'));   % kk=1000      input(' :> kk=');  % размер генеральной выборки
n = str2num(get(handles.input_1,'String')); %n=20; 
Mx= str2num(get(handles.input_2,'String'));%Mx=5
 
 
Dx=str2num(get(handles.input_3,'String'));% Dx=4
xmin=Mx-3*sqrt(Dx); xmax=Mx+3*sqrt(Dx); dx=(xmax-xmin)/n;
        xmax=xmin+n*dx;  %коррекция максим.границы
        x=xmin:dx:xmax;
        fx=exp(-((x-Mx).^2/(2*Dx)))/sqrt(2*pi*Dx);
  sigm=3; %параметр масштаба или мода плотности распределения
        xmin=0;     xmax=str2num(get(handles.sigm5,'String')); %11->sigm=3; 15->sigm=4; 8->sigm=2
        dx=(xmax-xmin)/n;
        xmax=xmin+n*dx;  %коррекция максим.границы
        x2=xmin:dx:xmax;
        for i=1:length(x2), 
           fx1(i)=x2(i)/sigm^2*exp(-x2(i)^2/(2*sigm^2));
        end; 
        
a1=get(handles.checkbox1,'value');
a2=get(handles.checkbox2,'value');
 
if a1==1; 
    plot(x,fx,'Color','red');grid on;
end
if a2==1; plot(x,fx1,'Color','green');grid on;
end
if a1*a2==1; plot(x,fx,x,fx1);grid on;
end
axes(handles.axes2);
cla;
for i=1:n;
    fxsr(i)=(fx(i+1)+fx(i))/2; p(i)=fxsr(i)*dx;
end;
% нормирование (для провед единичного испытания)
s=zeros(1,n); sp=0; sumP=sum(p);
for i=1:n, 
    pn(i)=p(i)/sumP; 
    sp=sp+pn(i); spx(i)=sp;
end;
% собственно моделирование СВ, равномерно распределенной на интервале [x(i)...x(i+1)[
for ik=1:kk,
    r1=rand;    % одиночное испытание - попадание в один из интервалов
    iI=1;    while r1>spx(iI), iI=iI+1; end;
    r2=rand;
    xm(ik)=x(iI)+r2*(x(iI+1)-x(iI)); xm2(ik)=x2(iI)+r2*(x2(iI+1)-x2(iI));   % генерация равном.распр.СВ на интевале
end;
a1=get(handles.checkbox1,'value');
a2=get(handles.checkbox2,'value');
if a1==1; hist(xm,n);grid on;
    bar(xm,n, 'r');
end
if a2==1; hist(xm2,n);grid on;
end
if a1*a2==1; hist(xm,n,xm2,n);grid on;
    bar(xm,n, 'r');
end

[y1, x1] = hist(xm,n);
[y2, x2] = hist(xm2,n);
if a1==1; 
    bar(x1,y1, 'r');
    grid on;
end
if a2==1; 
  bar(x2,y2);
  grid on;
end
if a1*a2==1; 
  bar(x1,y1,'r', x2,y2,'b');
end

Error using colstyle
Requires one string argument.
 
Error in bar>parseargs (line 138)
    [l,c,m,tmsg]=colstyle(arg,'plot');
 
Error in bar (line 50)
        [args,pvpairs,msg] = parseargs(args);
 
Error in gavnopachka>pushbutton1_Callback (line 103)
  bar(x1,y1,'r', x2,y2,'b');
 
Error in gui_mainfcn (line 96)
        feval(varargin{:});
 
Error in gavnopachka (line 16)
    gui_mainfcn(gui_State, varargin{:});
 
Error in
@(hObject,eventdata)gavnopachka('pushbutton1_Callback',hObject,eventdata,guidata(hObject))
 
 
Error while evaluating uicontrol Callback

% собственно моделирование СВ, равномерно распределенной на интервале [x(i)...x(i+1)[
for ik=1:kk,
    r1=rand;    % одиночное испытание - попадание в один из интервалов
    iI=1;    while r1>spx(iI), iI=iI+1; end;
    r2=rand;
    xm(ik)=x(iI)+r2*(x(iI+1)-x(iI)); xm2(ik)=x2(iI)+r2*(x2(iI+1)-x2(iI));   % генерация равном.распр.СВ на интевале
end;
a1=get(handles.checkbox1,'value');
a2=get(handles.checkbox2,'value');
[y1, x1] = hist(xm,n);
[y2, x2] = hist(xm2,n);
if a1==1; 
    bar(x1,y1, 'r');
    grid on;
end
if a2==1; 
  bar(x2,y2);
  grid on;
end
if a1*a2==1; 
  bar(x1,y1,'r', x2,y2,'b');
end