FigDataExtract.asv

if(~isdeployed)
  cd(fileparts(which(mfilename)));
end
DataPath = '.\';
AvailableFiles = dir((fullfile(DataPath, '*.fig'))); % list available data files

%   for idx = 1: size(AvailableFiles,1)
%    OpenFileName = AvailableFiles(idx).name;
%    fig = openfig(OpenFileName);
%    Ozone = fig.Children.Children.ZData;
%      
%    Name = strsplit(OpenFileName,'.');
%   writematrix(Ozone, strcat(Name{1},'.csv'))
%   close all
%  end

OpenFileName = AvailableFiles(1).name;
fig = openfig(OpenFileName);
lat = fig.Children.Children.XData;
lon = fig.Children.Children.YData;
    
    
writematrix(lat,'Lat.csv')
writematrix(lon,'Lon.csv')

%loop through pictures
 for idx = 1: size(AvailableFiles,25)
   OpenFileName = AvailableFiles(25).name;
   fig = openfig(OpenFileName);
   ozone_array = fig.Children.Children.ZData;  
   lt_array = fig.Children.Children.XData;
   lg_array =  fig.Children.Children.YData;    
   %writematrix(Ozone, strcat(Name{1},'.csv'))
   close all
 end