%% loading datasets for the three King's County Beaches
load Madison.csv

load Madrona.csv

load Meydenbauer.csv

%% Data variables
dayMadison = Madison(:,1); % info from column one
eColiMadison = Madison(:,2);
coliformMadison = Madison(:,3);

%% plot the bacteria for madison park beach

figure
hold on
plot(dayMadison,eColiMadison);
plot(dayMadison,coliformMadison,'-ok');
hold off
xlabel('Days');
ylabel('Bacteria Count');
Title('Bacteria in Madison Park Beach');
legend({'Ecoli','Fecal Coliform'});
set(gca,'XTick',[3,20,34,50,64,81,95]);
set(gca,'XTickLabel',{'5/15','6/1','6/15','7/1','7/15','8/1','8/15'});

%% defining temperature variable

tempMadison = Madison(:,4);
%% compare bacteria counts and water temperature at Madison Park Beach

figure
ax= plotyy(dayMadison,eColiMadison,dayMadison,tempMadison);
xlabel(ax(1),'Days');
ylabel(ax(1),'Ecoli Bacteria Count');
ylabel(ax(2),'Temperature C^o');
Title('Bacteria in Madison Park Beach');
legend({'Ecoli','Fecal Coliform'});
%set
%set
%%

daysMadrona = Madrona(:,1);
daysMeydenbaur = Meydenbaur(:,1);
eColiMadrona = Madrona(:,2);
eColiMeydenbaur = Meydenbaur(:,2);

%%

figure
hold on
plot