Commit 150d5cae authored by Simone Liuzzo's avatar Simone Liuzzo

large figure option

parent 20939f96
function [dkk,stdf,meanf]=qcheck(k,k0,ax)
function [dkk,stdf,meanf]=qcheck(k,k0,ax,largefig)
%QCHECK Analyzes quadrupole strength errors
%
%DKK=QCHECK(KL,KL0)
......@@ -11,11 +11,30 @@ labels=ebs.qpname(1:17);
k0l=k0(:,ones(1,nm));
dkk=(k-k0l)./k0l;
bar(ax,[dkk]);
%title(ax,'Gradient errors');
ylabel(ax,'\DeltaK/K');
grid(ax,'on');
set(ax,'Xlim',[0 nfamq+1],'FontSize',6);
if largefig
figure; extfigax = gca;
bar(extfigax,[dkk]);
%title(ax,'Gradient errors');
ylabel(extfigax,'\DeltaK/K');
grid(extfigax,'on');
set(extfigax,'Xlim',[0 nfamq+1],'FontSize',6);
else
Nc = length(dkk);
extracor = mod(Nc,32);
cor_per_cell_mean = squeeze(mean(reshape(dkk((1+extracor/2):(Nc-extracor/2)),32,[]),2));
cor_per_cell_std = squeeze(std(reshape(dkk((1+extracor/2):(Nc-extracor/2)),32,[]),1,2));
bar(ax,[cor_per_cell_mean,cor_per_cell_std],'EdgeColor','none');
ylabel(ax,'\DeltaK/K');
legend(ax,'mean','std');
grid(ax,'on');
set(ax,'Xlim',[0 32],'FontSize',6);
end
return
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment