%%function histplot(filename,sigma,binsize=0.1);
%%By Joakim Lindblad 2000-01-25
%% 
%% Plots histogram of a data file.
%%
%% filename is name of data file
%% binsize is resolution of histograms
%%
%% Using an array of binsizes values gives subplots

function histplot(filename,binsize);

data=load(filename)';
count=length(binsize);
cols=ceil(sqrt(count));
rows=ceil(count/cols);

for i=1:count
  if (count>1)
    subplot(cols,rows,i);
  end;

  scale_height(0.9); %%make space for title
  hplot(data,binsize(i),'b');
  title(sprintf('Binsize=%.2f',binsize(i)));
end;

if (count>1)
  subplot;
end;





