在官网上,下载FY-3E的WRAD数据时,发现即使全部勾选,网站后端依然会有遗漏下载的数据,
% 调用函数检查不同波段和方向的数据完整性
for bi = 1:length(yeardoy)
file_names = {hdf5_files.name};
%cellfun()对每个cell应用函数,contains()检查是否包括特定字母
cabandlist = file_names(cellfun(@(x) contains(x, 'WRADC') && contains(x, num2str(yeardoy(bi))) && contains(x, 'ORBA'), file_names));
cdbandlist = file_names(cellfun(@(x) contains(x, 'WRADC') && contains(x, num2str(yeardoy(bi))) && contains(x, 'ORBD'), file_names));
kuabandlist = file_names(cellfun(@(x) contains(x, 'WRADK') && contains(x, num2str(yeardoy(bi))) && contains(x, 'ORBA'), file_names));
kudbandlist = file_names(cellfun(@(x) contains(x, 'WRADK') && contains(x, num2str(yeardoy(bi))) && contains(x, 'ORBD'), file_names));
checkDataCompleteness(cabandlist, 'WRADC', '升', yeardoy(bi));
checkDataCompleteness(cdbandlist, 'WRADC', '降', yeardoy(bi));
checkDataCompleteness(kuabandlist, 'WRADK', '升', yeardoy(bi));
checkDataCompleteness(kudbandlist, 'WRADK ', '降', yeardoy(bi));
end
% 定义一个函数来检查列表长度并输出相应信息
function checkDataCompleteness(dataList, bandType, direction, yearDay)
comptid = fopen('uncompletedata.txt','a');
yearday_str = num2str(yearDay);
% 提取年、月和日
year = yearday_str(1:4);
month = yearday_str(5:6);
day = yearday_str(7:8);
% 检查数据列表长度是否小于14
if length(dataList) < 14
count = length(dataList);
fprintf(comptid,'%s/%s/%s的%s波段%s轨数量为:%d\n ', year,month,day, bandType, direction, count);
% 使用循环逐个输出
for i = 1:length(dataList)
fprintf(comptid,'%s\n', dataList{i});
end
end
fclose(comptid);
end