function out = flyY120StatusSummary( data )
% Reads in the N x 15 cell array of individual fly Y-maze data, returns a
% summary and plots of the number of flies run per line, etc.

strainCol=7;
numFlies=size(data,1);
strainList=[{0} {0}];

for i=1:numFlies
    temp=data{i,strainCol};
    if strcmp(class(temp),'char')
        strainList(i,1)={strtrim(temp)};
    elseif strcmp(class(temp),'cell')
        strainList(i,1)=temp;
    else
        strainList{i,1}=num2cell(temp);
    end
end

[strainList , ~, Bind]=unique(strainList(:,1));

strainTable=cell(size(strainList,1),2);
strainTable(:,1)=strainList;

for i=1:size(strainList,1)
    strainTable{i,2}=sum(Bind==i);
    counts(i)=sum(Bind==i);
end

ranksTemp=[1:size(strainList,1);counts]';
ranksTemp=sortrows(ranksTemp,2);

hist(counts,1:10:200);
xlim([0 200])

out=strainTable(ranksTemp(:,1),:);

% for i=2:numFlies
%     hitBool=0;
%     if class(data{i,strainCol})=='cell'
%         targetStrain=cell2mat(data{i,strainCol});
%     else
%         targetStrain=data{i,strainCol};
%     end
%     for j=1:size(strainList,1)
%         if isequal(strtrim(targetStrain),strtrim(strainList{j}) )
%             hitBool=1;
%         end
%     end
%     if hitBool==0
%         strainList=[strainList;targetStrain {0}];
%         wb=waitbar(i/numFlies,wb,'Generating List of Strains');
%     end
% end
% 
% strainList
% 
% wb=waitbar(0,'Counting Flies per Strain');
% 
% for i=1:numFlies
%     if class(data{i,strainCol})=='cell'
%         targetStrain=cell2mat(data{i,strainCol});
%     else
%         targetStrain=data{i,strainCol};
%     end
%     whereStrain=where(strainList{:,1}==targetStrain)
% end