%ajitter_rsdiff

subplot(411)
h=plot([min(data.dday) max(data.dday)]', [0 0]','k');
set(h, 'linewidth', 3, 'color', .9*[1 1 1]);
hold on
plot(data.dday, data.clmps, 'g', 'linewidth', 2);hold on
plot(data.dday, data.smmps, 'k', 'linewidth', 1);


subplot(412)
plot(data.dday, clsmdiff,'r', 'linewidth', .5);
hold on
h=plot(data.dday, uvdiff, 'go');ms(h,3)
h=plot(data.dday(closei_raw), uvdiff(closei_raw), 'bo');ms(h,3)
yl(0 ,10)


subplot(413)
h=plot([min(data.dday) max(data.dday)]', [0 0]','k');
set(h, 'linewidth', 3, 'color', .9*[1 1 1]);
hold on
plot(data.dday, data.uabs_refl_g, 'm', 'linewidth', 1);hold on
plot(data.dday(osi), data.uabs_refl_g(osi), 'r.')
plot(data.dday, data.vabs_refl_g, 'g', 'linewidth', 1);hold on
plot(data.dday(osi), data.vabs_refl_g(osi), 'b.')
text(mean(data.dday), 40, 'u_refl_g', 'fontweight', 'bold', 'color','r')
text(mean(data.dday), 20, 'v_refl_g', 'fontweight', 'bold', 'color','b')
yl(-50,50)


subplot(414)
plot(data.dday, uvdiff - cleaneruvdiff,'r')
hold on
h=plot(data.dday(closei_raw), uvdiff(closei_raw) - cleaneruvdiff(closei_raw),'go');
ms(h,4)
h=plot(data.dday(closei_diff), uvdiff(closei_diff) - cleaneruvdiff(closei_diff),'k*');
ms(h,4)
yy = uvdiff(closei) - cleaneruvdiff(closei);
h=plot([data.dday(closei)',  data.dday(closei)']', [yy'+1 yy'-1]','b');lw(h,2)
yy = uvdiff(closetimei) - cleaneruvdiff(closetimei);
h=plot([data.dday(closetimei)',  data.dday(closetimei)']', [yy'+.5 yy'-.5]','c');
lw(h,1)

yl(-5,5)
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
