%%function thresh=chistplotone(data,binsize,sigma);
%%By Joakim Lindblad 2000-01-25
%%Added n,x JL 2000-06-20

function [thresh,n,x]=chistplotone(data,binsize,sigma);

h=0;
if ~ishold
  h=1;
end;

hplot(data,1,'y');
hold on;
l=chplot(data,binsize,sigma,'b-');
linewidth(l,3);
[l,thresh,n,x]=d2chplot(data,binsize,sigma,'r--');
linewidth(l,3);
relaxy;

if h
  hold off
end;



