close all
clear all


 disp('Neuronfires QQPLOTS')
 lw = 2.5; 
 set(0, 'DefaultAxesFontSize', 16);
 fs = 15;
 msize = 10;

load 'C:\BESTAT\Estim\Estimdat\neuronfires.mat'
x = diff(Y);

% We argued E are exponential
p =0.5/988:1/988:1  %
figure(1)
subplot(221)
plot( expinv(p, 1), sort(x),'*' )
subplot(222)
plot( chi2inv(p, 10), sort(x),'*' )
subplot(223)
plot( norminv(p), sort(x),'*' )
subplot(224)
plot( betainv(p, 0.2, 1), sort(x),'*' )

figure(2)
qqplot(expinv(p,1),x)



