itgenerate exhumation plots, add total erosion - cosmo - front and backend for Markov-Chain Monte Carlo inversion of cosmogenic nuclide concentrations	Err	mx1.adamsgaard.dk	70
hgit clone git://src.adamsgaard.dk/cosmo	URL:git://src.adamsgaard.dk/cosmo	mx1.adamsgaard.dk	70
1Log	/src/log.gph	mx1.adamsgaard.dk	70
1Files	/src/files.gph	mx1.adamsgaard.dk	70
1Refs	/src/refs.gph	mx1.adamsgaard.dk	70
1README	/src/file/README.md.gph	mx1.adamsgaard.dk	70
1LICENSE	/src/file/LICENSE.gph	mx1.adamsgaard.dk	70
i---	Err	mx1.adamsgaard.dk	70
1commit 98194f5c5298d19b6414db5453a92f5d21b8c241	/src/commit/98194f5c5298d19b6414db5453a92f5d21b8c241.gph	mx1.adamsgaard.dk	70
1parent ab21116125fd5ecfc0dba602e37002956425a25e	/src/commit/ab21116125fd5ecfc0dba602e37002956425a25e.gph	mx1.adamsgaard.dk	70
hAuthor: Anders Damsgaard <anders.damsgaard@geo.au.dk>	URL:mailto:anders.damsgaard@geo.au.dk	mx1.adamsgaard.dk	70
iDate:   Mon, 23 Nov 2015 14:02:22 +0100	Err	mx1.adamsgaard.dk	70
i	Err	mx1.adamsgaard.dk	70
igenerate exhumation plots, add total erosion	Err	mx1.adamsgaard.dk	70
i	Err	mx1.adamsgaard.dk	70
iDiffstat:	Err	mx1.adamsgaard.dk	70
i  M index.php                           |       6 +++---	Err	mx1.adamsgaard.dk	70
i  M matlab/generate_plots.m             |      77 ++++++++++++++++++++++++++++++-	Err	mx1.adamsgaard.dk	70
i	Err	mx1.adamsgaard.dk	70
i2 files changed, 78 insertions(+), 5 deletions(-)	Err	mx1.adamsgaard.dk	70
i---	Err	mx1.adamsgaard.dk	70
1diff --git a/index.php b/index.php	/src/file/index.php.gph	mx1.adamsgaard.dk	70
it@@ -135,9 +135,9 @@ if (isset($_GET['wait_id']) && !empty($_GET['wait_id'])) {	Err	mx1.adamsgaard.dk	70
i                       glacial erosion rate (&epsilon;<sub>gla</sub>), climate	Err	mx1.adamsgaard.dk	70
i                       record threshold value	Err	mx1.adamsgaard.dk	70
i                       (&delta;<sup>18</sup>O<sub>threshold</sub>), and total	Err	mx1.adamsgaard.dk	70
i-                      erosion (E), produced the Markov-Chain Monte-Carlo	Err	mx1.adamsgaard.dk	70
i-                      inversion. Results are displayed per walker and on	Err	mx1.adamsgaard.dk	70
i-                      average. The 50th percentiles (also called second	Err	mx1.adamsgaard.dk	70
i+                      erosion over the last 1 Myr (E), produced the Markov-Chain	Err	mx1.adamsgaard.dk	70
i+                      Monte-Carlo inversion. Results are displayed per walker	Err	mx1.adamsgaard.dk	70
i+                      and on average. The 50th percentiles (also called second	Err	mx1.adamsgaard.dk	70
i                       quartile) denote the median parameter value. The 25th	Err	mx1.adamsgaard.dk	70
i                       percentiles (first quartile) marks the value that splits	Err	mx1.adamsgaard.dk	70
i                       the lowest 25% percent of data from the highest 75%.	Err	mx1.adamsgaard.dk	70
1diff --git a/matlab/generate_plots.m b/matlab/generate_plots.m	/src/file/matlab/generate_plots.m.gph	mx1.adamsgaard.dk	70
it@@ -509,7 +509,80 @@ linkaxes(axh,'x')	Err	mx1.adamsgaard.dk	70
i % stairs(-tStarts,relExpos+2,'r')	Err	mx1.adamsgaard.dk	70
i 	Err	mx1.adamsgaard.dk	70
i 	Err	mx1.adamsgaard.dk	70
i-%% Exhumation history	Err	mx1.adamsgaard.dk	70
i+%% Exhumation history from InspectDepthConcTracks_True_plot.m	Err	mx1.adamsgaard.dk	70
i+for iwalk = 1:Nwalkers	Err	mx1.adamsgaard.dk	70
i+    %for iwalk = 1:4;%Nwalks	Err	mx1.adamsgaard.dk	70
i+    % iwalk=input(['What iwalk?[1..',num2str(length(Ss)),']']),	Err	mx1.adamsgaard.dk	70
i+    %subplot(2,2,iwalk)	Err	mx1.adamsgaard.dk	70
i+    fh = [fh;figure('visible', show_figures)];	Err	mx1.adamsgaard.dk	70
i+    lump_MetHas = Ss{iwalk}.lump_MetHas;	Err	mx1.adamsgaard.dk	70
i+    fixed_stuff = Ss{iwalk}.fs;	Err	mx1.adamsgaard.dk	70
i+    % if ~isempty(lump_MetHas.zsss{1})	Err	mx1.adamsgaard.dk	70
i+    % % % % zsss = lump_MetHas.zsss;	Err	mx1.adamsgaard.dk	70
i+    % % % % tss = lump_MetHas.tss;	Err	mx1.adamsgaard.dk	70
i+    % % % % dtfine = -1000; tfinemax = -20e5; dzfine = 0.1; zfinemax = 20,	Err	mx1.adamsgaard.dk	70
i+    % % % % iz = 1;	Err	mx1.adamsgaard.dk	70
i+    % % % % DepthExposureTimeDens(zsss,tss,dtfine,tfinemax,dzfine,zfinemax,fixed_stuff,iz)	Err	mx1.adamsgaard.dk	70
i+    % % % % title('z(time)')	Err	mx1.adamsgaard.dk	70
i+    % % % % axis ij	Err	mx1.adamsgaard.dk	70
i+    % % % % hold on	Err	mx1.adamsgaard.dk	70
i+    	Err	mx1.adamsgaard.dk	70
i+    %making quantiles to plot ontop of exhumation densities:	Err	mx1.adamsgaard.dk	70
i+    tss = lump_MetHas.tss;	Err	mx1.adamsgaard.dk	70
i+    dtfine = -500; tfinemax = -20e5;	Err	mx1.adamsgaard.dk	70
i+    Xxsss = lump_MetHas.zsss;	Err	mx1.adamsgaard.dk	70
i+    % dXxfine = 0.05; Xxfinemax = 50; iz=1; %Xx may be depth or nucleide concentration or ...	Err	mx1.adamsgaard.dk	70
i+    dXxfine = 0.01; Xxfinemax = 50; iz=1; %Xx may be depth or nucleide concentration or ...	Err	mx1.adamsgaard.dk	70
i+    dzfine = dXxfine; zfinemax = Xxfinemax;	Err	mx1.adamsgaard.dk	70
i+    [smoothgrid,histgrid,tsfine,Xxfine]=XxTimeDens(Xxsss,tss,dtfine,tfinemax,dXxfine,Xxfinemax,fixed_stuff,iz);	Err	mx1.adamsgaard.dk	70
i+    pcolor(-tsfine,Xxfine,sqrt(smoothgrid));	Err	mx1.adamsgaard.dk	70
i+    %pcolor(tsfine,Xxfine,sqrt(histgrid)); %<<<BHJ: v?lge mellem glattet og r? farvel?gning	Err	mx1.adamsgaard.dk	70
i+    hold on	Err	mx1.adamsgaard.dk	70
i+    %plot a selection of depth histories	Err	mx1.adamsgaard.dk	70
i+    for i=1:ceil(length(tss)/50):length(tss)	Err	mx1.adamsgaard.dk	70
i+        %   plot(tss{i},Xxsss{i},'.-c')	Err	mx1.adamsgaard.dk	70
i+    end	Err	mx1.adamsgaard.dk	70
i+    %Compute and plot quantiles	Err	mx1.adamsgaard.dk	70
i+    N = sum(histgrid(:,1));	Err	mx1.adamsgaard.dk	70
i+    fractions = [0.25,0.5,0.75]; %quartiles	Err	mx1.adamsgaard.dk	70
i+    tsfine = 0:dtfine:tfinemax; %bin boundaries	Err	mx1.adamsgaard.dk	70
i+    Ntfine = length(tsfine);	Err	mx1.adamsgaard.dk	70
i+    zsfine = 0:dzfine:zfinemax; %bin boundaries	Err	mx1.adamsgaard.dk	70
i+    % quants{iwalk} = GetHistgridQuantiles(histgrid,N,fractions,tsfine,zsfine);	Err	mx1.adamsgaard.dk	70
i+    % plot(tsfine,quants{iwalk}(1,:),'r','linewidth',3)	Err	mx1.adamsgaard.dk	70
i+    % plot(tsfine,quants{iwalk}(2,:),'k','linewidth',3)	Err	mx1.adamsgaard.dk	70
i+    % plot(tsfine,quants{iwalk}(3,:),'b','linewidth',3)	Err	mx1.adamsgaard.dk	70
i+    quants(:,:,iwalk) = GetHistgridQuantiles(histgrid,N,fractions,tsfine,zsfine);	Err	mx1.adamsgaard.dk	70
i+    quants2(:,:,iwalk) = GetHistgridQuantiles2(histgrid,N,fractions,tsfine,zsfine);	Err	mx1.adamsgaard.dk	70
i+    	Err	mx1.adamsgaard.dk	70
i+    grid on; shading flat; axis tight; set(gca,'fontsize',8); hold on	Err	mx1.adamsgaard.dk	70
i+    % lh(1)=plot(tsfine,quants(1,:,iwalk),'r','linewidth',2)	Err	mx1.adamsgaard.dk	70
i+    % lh(2)=plot(tsfine,quants(2,:,iwalk),'k','linewidth',2)	Err	mx1.adamsgaard.dk	70
i+    % lh(3)=plot(tsfine,quants(3,:,iwalk),'g','linewidth',2)	Err	mx1.adamsgaard.dk	70
i+    lh2(1)=plot(-tsfine,quants2(1,:,iwalk),'r','linewidth',2)	Err	mx1.adamsgaard.dk	70
i+    lh2(2)=plot(-tsfine,quants2(2,:,iwalk),'k','linewidth',2)	Err	mx1.adamsgaard.dk	70
i+    lh2(3)=plot(-tsfine,quants2(3,:,iwalk),'r','linewidth',2)	Err	mx1.adamsgaard.dk	70
i+    %legend(lh2,'25%','median','75%','location','northwest')	Err	mx1.adamsgaard.dk	70
i+    axis ij	Err	mx1.adamsgaard.dk	70
i+    %track_handle=AddTrueModelDepthTrack(Ss{iwalk}.fs,'-m'); %<<< BHJ: added 2014 dec 09	Err	mx1.adamsgaard.dk	70
i+    %set(track_handle,'linewidth',2);	Err	mx1.adamsgaard.dk	70
i+    	Err	mx1.adamsgaard.dk	70
i+    % Save erosion magnitudes over the last 1 Myr	Err	mx1.adamsgaard.dk	70
i+    E_25(iwalk) = quants2(1, 2001, iwalk);	Err	mx1.adamsgaard.dk	70
i+    E_50(iwalk) = quants2(2, 2001, iwalk);	Err	mx1.adamsgaard.dk	70
i+    E_75(iwalk) = quants2(3, 2001, iwalk);	Err	mx1.adamsgaard.dk	70
i+end	Err	mx1.adamsgaard.dk	70
i+colormap(1-copper(15))	Err	mx1.adamsgaard.dk	70
i+%subplot(2,2,1);	Err	mx1.adamsgaard.dk	70
i+title(fn,'interpreter','none')	Err	mx1.adamsgaard.dk	70
i+%axis([-2e6 0 0 40])	Err	mx1.adamsgaard.dk	70
i+axis([0 1e6 0 25])	Err	mx1.adamsgaard.dk	70
i+caxis([0 25])	Err	mx1.adamsgaard.dk	70
i+%colorbar	Err	mx1.adamsgaard.dk	70
i+%set (gca,'xtick',[-2e6:0.2e6:0]);	Err	mx1.adamsgaard.dk	70
i+set (gca,'xtick',[0:0.1e5:1e6]);	Err	mx1.adamsgaard.dk	70
i+set (gca,'ytick',[0:3:12]);	Err	mx1.adamsgaard.dk	70
i+%XTicksAt = ([-2e6:0.2e6:0]);	Err	mx1.adamsgaard.dk	70
i 	Err	mx1.adamsgaard.dk	70
i 	Err	mx1.adamsgaard.dk	70
i 	Err	mx1.adamsgaard.dk	70
it@@ -698,7 +771,7 @@ html = [html, '            <td>',...	Err	mx1.adamsgaard.dk	70
i     num2str(sum(E_25)/Nwalkers,3),'</td>\n'...	Err	mx1.adamsgaard.dk	70
i     '        </tr>\n'...	Err	mx1.adamsgaard.dk	70
i     '        <tr>\n'...	Err	mx1.adamsgaard.dk	70
i-    '            <td align="center">E [m]</td>\n'...	Err	mx1.adamsgaard.dk	70
i+    '            <td align="center">E [m/Myr]</td>\n'...	Err	mx1.adamsgaard.dk	70
i     '            <td align="center">50%%</td>\n'];	Err	mx1.adamsgaard.dk	70
i 	Err	mx1.adamsgaard.dk	70
i for i=1:Nwalkers	Err	mx1.adamsgaard.dk	70
.