function historical_histogram(input_data)

clr=colormap(jet(length(input_data)));
binz=zeros(1,max(input_data));

for i=1:length(input_data)
    left=floor(input_data(i));
    rectangle('position',[left binz(left) 1 1],'facecolor',clr(i,:),'edgecolor',clr(i,:))
    binz(left)=binz(left)+1;
    hold on
end