function [ h ] = barh_colored(phi,cmin,cmax,loglinear)
nbars2 = 64;
if cmax ~= -1
xbars=cmin:(cmax-cmin)/(nbars2-1):cmax;
[counts,x] = hist(phi, xbars);
else
[counts,x] = hist(phi, nbars2);
end
if strcmp(loglinear,'log')
h = barh(x,log10(counts),1);
else
h = barh(x,counts,1);
end
set(gca,'YAxisLocation','right');
ch = get(h,'Children');
fvd = get(ch,'Faces');
fvcd = get(ch,'FaceVertexCData');
cmap=get(gcf,'Colormap');
colormap(cmap);
for i=1:nbars2
fvcd(fvd(i,:))=i;
end
set(ch,'FaceVertexCData',fvcd)
if cmax ~= -1
ylim([cmin cmax]);
end
end
0 Comments
Sign in to comment.