%Create bad data mask
function mask = createDataMask(input)

    ntimes = length(input(:,1));
    nbins = length(input(1,:));
    mask = ones(ntimes, nbins);
    
    %Set bins bad
    mask(:,2) = NaN;
    mask(:,3) = NaN;
    mask(:,4) = NaN;
    mask(:,8) = NaN;
    mask(:,9) = NaN;
    mask(:,11) = NaN;
    mask(:,12) = NaN;
    mask(:,13) = NaN;
    mask(:,16) = NaN;
	mask(:,17) = NaN;
    mask(:,23) = NaN;
    mask(:,24) = NaN;

    %Through Dec 27 Remove 6.51, 7.26
    mask(1:1822,4) = NaN;

    %
    mask(1:1822, 5) = NaN;
    mask(1:1822, 10) = NaN;
    
    %mask(1:1774, 10) = NaN;
end