Skip to content

Commit 8147f01

Browse files
committed
add figure routines
1 parent 5e9e001 commit 8147f01

11 files changed

+775
-0
lines changed
Lines changed: 89 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,89 @@
1+
% This script generates the plots for the analyses of the paper "Benchmark
2+
% Problems for Dynamic Modeling of Intracellular Processes".
3+
4+
% Load results for the checks of convexity in linear and log scale.
5+
load('Benchmark_paper_convex.mat','Convex_analysis');
6+
7+
% Load fitting results of all models
8+
loadOptimizationAnalysis
9+
10+
% Load table with all the characteristics of the
11+
% models including number of data points, observables, parameters, etc.
12+
load('Benchmark_paper_modelcharacteristics.mat','modelcharacteristics');
13+
14+
%% Comparison of performance criterion linlog vs. log for different thresholds to consider a start as converged
15+
chi2_threshold = 1e-1;
16+
plot_Benchmark('convergence-linloglog',chi2_threshold)
17+
set(gcf, 'PaperUnits','centimeters', 'PaperPosition',[0 0 8 8])
18+
% if ~(exist('Manuscript_figures'))
19+
% mkdir('Manuscript_figures')
20+
% end
21+
% print('-depsc',['Manuscript_figures/Fig2A'])
22+
23+
chi2_threshold = 10;
24+
plot_Benchmark('convergence-linloglog',chi2_threshold)
25+
title(['threshold = ' num2str(chi2_threshold)],'FontSize',7)
26+
set(gcf, 'PaperUnits','centimeters', 'PaperPosition',[0 0 8 8])
27+
%print('-depsc',['Supplement_figures/linlog_threshold10'])
28+
29+
chi2_threshold = 50;
30+
plot_Benchmark('convergence-linloglog',chi2_threshold)
31+
title(['threshold = ' num2str(chi2_threshold)],'FontSize',7)
32+
set(gcf, 'PaperUnits','centimeters', 'PaperPosition',[0 0 8 8])
33+
% if ~(exist('Supplement_figures'))
34+
% mkdir('Supplement_figures')
35+
% end
36+
%print('-depsc',['Supplement_figures/linlog_threshold50'])
37+
38+
%% Comparison of convexity between different sampling and parameter transformation strategies
39+
plot_Benchmark('convex')
40+
set(gcf, 'PaperUnits','centimeters', 'PaperPosition',[0 0 5 6.5])
41+
%print('-depsc',['Manuscript_figures/Fig2C'])
42+
43+
%% Interior-point vs. trust-region-reflective performance metrics for different thresholds
44+
chi2_threshold = 1e-1;
45+
plot_Benchmark('trust-ip',chi2_threshold)
46+
set(gcf, 'PaperUnits','centimeters', 'PaperPosition',[0 0 8 8])
47+
%print('-depsc',['Manuscript_figures/Fig3'])
48+
49+
chi2_threshold = 0.5;
50+
plot_Benchmark('trust-ip',chi2_threshold)
51+
title(['threshold = ' num2str(chi2_threshold)],'FontSize',7)
52+
set(gcf, 'PaperUnits','centimeters', 'PaperPosition',[0 0 8 8])
53+
%print('-depsc',['Supplement_figures/ip_trust_threshold0_5'])
54+
55+
chi2_threshold = 1;
56+
plot_Benchmark('trust-ip',chi2_threshold)
57+
title(['threshold = ' num2str(chi2_threshold)],'FontSize',7)
58+
set(gcf, 'PaperUnits','centimeters', 'PaperPosition',[0 0 8 8])
59+
%print('-depsc',['Supplement_figures/ip_trust_threshold1'])
60+
61+
chi2_threshold = 10;
62+
plot_Benchmark('trust-ip',chi2_threshold)
63+
title(['threshold = ' num2str(chi2_threshold)],'FontSize',7)
64+
set(gcf, 'PaperUnits','centimeters', 'PaperPosition',[0 0 8 8])
65+
%print('-depsc',['Supplement_figures/ip_trust_threshold10'])
66+
67+
chi2_threshold = 50;
68+
plot_Benchmark('trust-ip',chi2_threshold)
69+
title(['threshold = ' num2str(chi2_threshold)],'FontSize',7)
70+
set(gcf, 'PaperUnits','centimeters', 'PaperPosition',[0 0 8 8])
71+
%print('-depsc',['Supplement_figures/ip_trust_threshold50'])
72+
73+
%% Iterations needed in optimization vs. parameter number
74+
plot_Iterations(0,modelcharacteristics,6)
75+
set(gcf, 'PaperUnits','centimeters', 'PaperPosition',[0 0 8 8])
76+
%print('-depsc',['Manuscript_figures/Fig4A'])
77+
78+
%% Time needed for optimization vs. parameter number
79+
plot_Iterations(1,modelcharacteristics,6)
80+
set(gcf, 'PaperUnits','centimeters', 'PaperPosition',[0 0 8 8])
81+
%print('-depsc',['Manuscript_figures/Fig4B'])
82+
83+
%% Waterfall plots for the Supplementary Information
84+
plot_WaterfallScatter
85+
86+
%% Convexity plots for the Supplementary Information
87+
plot_Convexity_suppl
88+
set(gcf, 'PaperUnits','centimeters', 'PaperPosition',[0 0 16 15])
89+
%print('-depsc',['Supplement_figures/convexity'])
86.7 MB
Binary file not shown.
1.47 KB
Binary file not shown.
58.2 MB
Binary file not shown.
49.6 MB
Binary file not shown.

Matlab_figures/loadModelColors.m

Lines changed: 28 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,28 @@
1+
% Colors for the benchmark models
2+
colors = [
3+
245,184,255; % Bachmann
4+
0,139,228; % Becker
5+
172,82,0; % Beer
6+
96,21,111; % Boehm
7+
0,109,64; % Brannmark
8+
42,212,90; % Bruno
9+
172,22,0; % Chen
10+
255,214,170; % Crauste
11+
163,252,195; % Fiedler
12+
162,141,0; % Fujita
13+
255,179,0; % Hass
14+
173,211,0; % Isensee
15+
0,168,161; % Lucarelli
16+
208,41,155; % Merkle
17+
0,70,148; % Raia
18+
255,186,200; % Schwen
19+
255,38,16; % Sobotta
20+
107,243,246; % Swameye
21+
255,245,0; % Weber
22+
138,56,255]./255; % Zheng
23+
24+
% Colors for the convexity plots
25+
colors_convexity = [17,122,218;
26+
157,77,203;
27+
238,48,117;
28+
255,117,16]./255;
Lines changed: 14 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,14 @@
1+
% Load and merge results of optimization analysis
2+
3+
load('Benchmark_paper_optimization_1.mat','Optimization_analysis_part1');
4+
load('Benchmark_paper_optimization_2.mat','Optimization_analysis_part2');
5+
6+
global Optimization_analysis
7+
8+
fn1=fieldnames(Optimization_analysis_part1);
9+
fn2=fieldnames(Optimization_analysis_part2);
10+
11+
for i = 1:10
12+
Optimization_analysis.(fn1{i}) = Optimization_analysis_part1.(fn1{i});
13+
Optimization_analysis.(fn2{i}) = Optimization_analysis_part2.(fn2{i});
14+
end

0 commit comments

Comments
 (0)