% fish price data
cd('~/Current/Courses/Probcourse/SomeData/DataSets/');
% this is where I keep the file, but you may have it somewhere else
[num, txt, raw]=xlsread('fishdata.xls');
prices70=num(:, 1); % these are prices in 1970
prices80=num(:, 2); % these are prices in 1980
bins=[0, 50, 100, 150, 200, 250, 300, 350]+25;
figure(1); hist(prices70, 5); axis([0 400 0 12]); figure(1)
print -depsc2 fish705bin.eps
figure(2); hist(prices80, 5); axis([0 400 0 12]); figure(2)  
print -depsc2 fish805bin.eps
figure(1); hist(prices70, bins); axis([0 400 0 12]); figure(1)  
print -depsc2 fish70binvec.eps
figure(2); hist(prices80, bins); axis([0 400 0 12]); figure(2)  
print -depsc2 fish80binvec.eps
%%
figure(3); 
clf
hold on
flag=-1;
for i=1:size(num, 1)
    plot([1970, 1980], num(i, :));
    if flag==-1
        text(1980, num(i, 2), txt(i, 1));
    else
        text(1970, num(i, 1), txt(i, 1), 'HorizontalAlignment', 'Right');
    end
    flag=flag*-1;
end
axis([1960 1990 0 400])
print -depsc2 fishlines.eps