% Plot of raw data for carousel tows

n=9
for i=6:n
    s=int2str(i)
eval(['load Car_0',s,'.txt'])
eval(['A=Car_0',s,'(:,6)/100000;']);

figure(1); fig_portrait
subplot(n,1,i)
bar(A)
axis([0 50 0 20])
if i==3
ylabel('GC Area x 10^{-5}')
end
text(5, 15, ['Tow ',s])
if i==1
    title('Carousel Data')
end
end

