198 lines
12 KiB
HTML
198 lines
12 KiB
HTML
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
|
|
"http://www.w3.org/TR/REC-html40/loose.dtd">
|
|
<html>
|
|
<head>
|
|
<title>Description of MakeAllFigures</title>
|
|
<meta name="keywords" content="MakeAllFigures">
|
|
<meta name="description" content="stephane.adjemian@cepremap.cnrs.fr [02-04-2005]">
|
|
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
|
|
<meta name="generator" content="m2html © 2003 Guillaume Flandin">
|
|
<meta name="robots" content="index, follow">
|
|
<link type="text/css" rel="stylesheet" href="../m2html.css">
|
|
</head>
|
|
<body>
|
|
<a name="_top"></a>
|
|
<div><a href="../index.html">Home</a> > <a href="index.html">.</a> > MakeAllFigures.m</div>
|
|
|
|
<!--<table width="100%"><tr><td align="left"><a href="../index.html"><img alt="<" border="0" src="../left.png"> Master index</a></td>
|
|
<td align="right"><a href="index.html">Index for . <img alt=">" border="0" src="../right.png"></a></td></tr></table>-->
|
|
|
|
<h1>MakeAllFigures
|
|
</h1>
|
|
|
|
<h2><a name="_name"></a>PURPOSE <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2>
|
|
<div class="box"><strong>stephane.adjemian@cepremap.cnrs.fr [02-04-2005]</strong></div>
|
|
|
|
<h2><a name="_synopsis"></a>SYNOPSIS <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2>
|
|
<div class="box"><strong>function MakeAllFigures(NumberOfPlots,Caption,FigureProperties,Info) </strong></div>
|
|
|
|
<h2><a name="_description"></a>DESCRIPTION <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2>
|
|
<div class="fragment"><pre class="comment"> stephane.adjemian@cepremap.cnrs.fr [02-04-2005]</pre></div>
|
|
|
|
<!-- crossreference -->
|
|
<h2><a name="_cross"></a>CROSS-REFERENCE INFORMATION <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2>
|
|
This function calls:
|
|
<ul style="list-style-image:url(../matlabicon.gif)">
|
|
</ul>
|
|
This function is called by:
|
|
<ul style="list-style-image:url(../matlabicon.gif)">
|
|
</ul>
|
|
<!-- crossreference -->
|
|
|
|
|
|
<h2><a name="_source"></a>SOURCE CODE <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2>
|
|
<div class="fragment"><pre>0001 <a name="_sub0" href="#_subfunctions" class="code">function MakeAllFigures(NumberOfPlots,Caption,FigureProperties,Info)</a>
|
|
0002 <span class="comment">% stephane.adjemian@cepremap.cnrs.fr [02-04-2005]</span>
|
|
0003 <span class="keyword">global</span> M_ options_
|
|
0004
|
|
0005 FigHandle = figure(<span class="string">'Name'</span>,FigureProperties.Name);
|
|
0006
|
|
0007 NAMES = cell(NumberOfPlots,1);
|
|
0008 <span class="keyword">if</span> options_.TeX
|
|
0009 TeXNAMES = cell(NumberOfPlots,1);
|
|
0010 <span class="keyword">end</span>
|
|
0011
|
|
0012 <span class="keyword">if</span> NumberOfPlots == 9
|
|
0013 nr = 3;
|
|
0014 nc = 3;
|
|
0015 <span class="keyword">elseif</span> NumberOfPlots == 8
|
|
0016 nr = 3;
|
|
0017 nc = 3;
|
|
0018 <span class="keyword">elseif</span> NumberOfPlots == 7
|
|
0019 nr = 3;
|
|
0020 nc = 3;
|
|
0021 <span class="keyword">elseif</span> NumberOfPlots == 6
|
|
0022 nr = 2;
|
|
0023 nc = 3;
|
|
0024 <span class="keyword">elseif</span> NumberOfPlots == 5
|
|
0025 nr = 3;
|
|
0026 nc = 2;
|
|
0027 <span class="keyword">elseif</span> NumberOfPlots == 4
|
|
0028 nr = 2;
|
|
0029 nc = 2;
|
|
0030 <span class="keyword">elseif</span> NumberOfPlots == 3
|
|
0031 nr = 2;
|
|
0032 nc = 2;
|
|
0033 <span class="keyword">elseif</span> NumberOfPlots == 2
|
|
0034 nr = 1;
|
|
0035 nc = 2;
|
|
0036 <span class="keyword">elseif</span> NumberOfPlots == 1
|
|
0037 nr = 1;
|
|
0038 nc = 1;
|
|
0039 <span class="keyword">end</span>
|
|
0040
|
|
0041 <span class="keyword">for</span> plt = 1:NumberOfPlots
|
|
0042 eval([<span class="string">'NumberOfCurves = Info.Box'</span> int2str(plt) <span class="string">'.Number;'</span>])
|
|
0043 NumberOfObservations = zeros(2,1);
|
|
0044 x = cell(NumberOfCurves,1);
|
|
0045 y = cell(NumberOfCurves,1);
|
|
0046 PltType = cell(NumberofCurves,1);
|
|
0047 top = NaN(NumberOfCurves,1);
|
|
0048 bottom = NaN(NumberOfCurves,1);
|
|
0049 binf = NaN(NumberOfCurves,1);
|
|
0050 bsup = NaN(NumberOfCurves,1);
|
|
0051 <span class="keyword">for</span> curve = 1:NumberOfCurves
|
|
0052 eval([<span class="string">'x{'</span> curve <span class="string">'} = Info.Box'</span> int2str(plt) <span class="string">'.Curve'</span> int2str(curve) <span class="string">'.xdata;'</span>])
|
|
0053 eval([<span class="string">'y{'</span> curve <span class="string">'} = Info.Box'</span> int2str(plt) <span class="string">'.Curve'</span> int2str(curve) <span class="string">'.ydata;'</span>])
|
|
0054 eval([<span class="string">'name = Info.Box'</span> int2str(plt) <span class="string">'.Curve'</span> int2str(curve) <span class="string">'.variablename;'</span>])
|
|
0055 eval([<span class="string">'PltType{'</span> curve <span class="string">'} = Info.Box'</span> int2str(plt) <span class="string">'.Curve'</span> int2str(curve) <span class="string">'.type'</span>]);
|
|
0056 <span class="keyword">if</span> length(x{curve})-length(y{curve})
|
|
0057 disp(<span class="string">'MakeFigure :: The number of observations in x doesn''t match with '</span>)
|
|
0058 disp([<span class="string">'the number of observation in y for '</span> name ])
|
|
0059 <span class="keyword">return</span>
|
|
0060 <span class="keyword">end</span>
|
|
0061 <span class="keyword">if</span> Info.PlotProperties.CutTop
|
|
0062 top(curve) = max(y{curve});
|
|
0063 <span class="keyword">else</span> Info.PlotProperties.CutBottom
|
|
0064 bottom(curve) = min(y{curve});
|
|
0065 <span class="keyword">end</span>
|
|
0066 binf(curve) = min(x{curve});
|
|
0067 bsup(curve) = max(x{curve});
|
|
0068 <span class="keyword">end</span>
|
|
0069 ymax = max(top);
|
|
0070 ymin = min(bottom);
|
|
0071 xmin = min(binf);
|
|
0072 xmax = max(bsup);
|
|
0073 <span class="keyword">if</span> isnan(ymin(plt))
|
|
0074 ymin = 0;
|
|
0075 <span class="keyword">end</span>
|
|
0076 eval([<span class="string">'NAMES{'</span> int2str(plt) <span class="string">'} = Info.Box'</span> int2str(plt) <span class="string">'.name;'</span>])
|
|
0077 <span class="keyword">if</span> options_.TeX
|
|
0078 eval([<span class="string">'TeXNAMES{'</span> int2str(plt) <span class="string">'} = Info.Box'</span> int2str(plt) <span class="string">'.texname;'</span>])
|
|
0079 <span class="keyword">end</span>
|
|
0080 subplot(nr,nc,plt)
|
|
0081 hold on
|
|
0082 <span class="keyword">for</span> curve = 1:NumberOfCurves
|
|
0083 hh = plot(x{curve},y{curve});
|
|
0084 <span class="keyword">if</span> strcmpi(PltType{curve},<span class="string">'PriorDensity'</span>)
|
|
0085 set(hh,<span class="string">'Color'</span>,[0.7 0.7 0.7],<span class="string">'LineStyle'</span>,<span class="string">'-'</span>,<span class="string">'LineWidth'</span>,2)
|
|
0086 <span class="comment">%</span>
|
|
0087 <span class="comment">%</span>
|
|
0088 <span class="keyword">elseif</span> strcmpi(PltType{curve},<span class="string">'DensityEstimate'</span>)
|
|
0089 set(hh,<span class="string">'Color'</span>,<span class="string">'k'</span>,<span class="string">'LineStyle'</span>,<span class="string">'-'</span>,<span class="string">'LineWidth'</span>,2)
|
|
0090 <span class="comment">%</span>
|
|
0091 <span class="comment">%</span>
|
|
0092 <span class="keyword">elseif</span> strcmpi(PltType{curve},<span class="string">'ModeEstimate'</span>)
|
|
0093 set(hh,<span class="string">'Color'</span>,<span class="string">'g'</span>,<span class="string">'LineStyle'</span>,<span class="string">'--'</span>,<span class="string">'LineWidth'</span>,2)
|
|
0094 <span class="comment">%</span>
|
|
0095 <span class="comment">%</span>
|
|
0096 <span class="keyword">elseif</span> strcmpi(PltType{curve},<span class="string">'SmoothVariable'</span>)
|
|
0097 set(hh,<span class="string">'Color'</span>,<span class="string">'k'</span>,<span class="string">'LineStyle'</span>,<span class="string">'-'</span>,<span class="string">'LineWidth'</span>,2)
|
|
0098 <span class="comment">%</span>
|
|
0099 <span class="comment">%</span>
|
|
0100 <span class="keyword">elseif</span> strcmpi(PltType{curve},<span class="string">'Deciles'</span>)
|
|
0101 set(hh,<span class="string">'Color'</span>,<span class="string">'g'</span>,<span class="string">'LineStyle'</span>,<span class="string">'-'</span>,<span class="string">'LineWidth'</span>,1)
|
|
0102 <span class="comment">%</span>
|
|
0103 <span class="comment">%</span>
|
|
0104 <span class="keyword">elseif</span> strcmpi(PltType{curve},<span class="string">'Forecasts'</span>)
|
|
0105 set(hh,<span class="string">'Color'</span>,<span class="string">''</span>,<span class="string">'LineStyle'</span>,<span class="string">'-'</span>,<span class="string">'LineWidth'</span>,2)
|
|
0106 <span class="comment">%</span>
|
|
0107 <span class="comment">%</span>
|
|
0108 <span class="keyword">elseif</span> strcmpi(PltType{curve},<span class="string">'ForecastsHPD'</span>)
|
|
0109 set(hh,<span class="string">'Color'</span>,<span class="string">'k'</span>,<span class="string">'LineStyle'</span>,<span class="string">'-'</span>,<span class="string">'LineWidth'</span>,1)
|
|
0110 <span class="comment">%</span>
|
|
0111 <span class="comment">%</span>
|
|
0112 <span class="keyword">elseif</span> strcmpi(PltType{curve},<span class="string">'ForecastsDeciles'</span>)
|
|
0113 set(hh,<span class="string">'Color'</span>,<span class="string">'g'</span>,<span class="string">'LineStyle'</span>,<span class="string">'-'</span>,<span class="string">'LineWidth'</span>,1)
|
|
0114 <span class="comment">%</span>
|
|
0115 <span class="comment">%</span>
|
|
0116 <span class="keyword">elseif</span> strcmpi(PltType{curve},<span class="string">'DiagnosticWithin'</span>)
|
|
0117 set(hh,<span class="string">'Color'</span>,<span class="string">'b'</span>,<span class="string">'LineStyle'</span>,<span class="string">'-'</span>,<span class="string">'LineWidth'</span>,2)
|
|
0118 <span class="comment">%</span>
|
|
0119 <span class="comment">%</span>
|
|
0120 <span class="keyword">elseif</span> strcmpi(PltType{curve},<span class="string">'DiagnosticPooled'</span>)
|
|
0121 set(hh,<span class="string">'Color'</span>,<span class="string">'r'</span>,<span class="string">'LineStyle'</span>,<span class="string">'-'</span>,<span class="string">'LineWidth'</span>,2)
|
|
0122 <span class="comment">%</span>
|
|
0123 <span class="comment">%</span>
|
|
0124 <span class="keyword">end</span>
|
|
0125 <span class="keyword">end</span>
|
|
0126 axis([xmin xmax ymin ymax])
|
|
0127 title(NAMES{plt})
|
|
0128 drawnow
|
|
0129 hold off
|
|
0130 <span class="keyword">end</span>
|
|
0131
|
|
0132 <span class="keyword">if</span> Info.SaveFormat.Eps
|
|
0133 <span class="keyword">if</span> isempty(Info.SaveFormat.Name)
|
|
0134 eval([<span class="string">'print -depsc2 '</span> M_.fname Info.SaveFormat.GenericName int2str(Info.SaveFormat.Number)]);
|
|
0135 <span class="keyword">else</span>
|
|
0136 eval([<span class="string">'print -depsc2 '</span> M_.fname Info.SaveFormat.GenericName Info.SaveFormat.Name]);
|
|
0137 <span class="keyword">end</span>
|
|
0138 <span class="keyword">end</span>
|
|
0139 <span class="keyword">if</span> Info.SaveFormat.Pdf
|
|
0140 <span class="keyword">if</span> isempty(Info.SaveFormat.Name)
|
|
0141 eval([<span class="string">'print -dpdf '</span> M_.fname Info.SaveFormat.GenericName int2str(Info.SaveFormat.Number)]);
|
|
0142 <span class="keyword">else</span>
|
|
0143 eval([<span class="string">'print -dpdf '</span> M_.fname Info.SaveFormat.GenericName Info.SaveFormat.Name]);
|
|
0144 <span class="keyword">end</span>
|
|
0145 <span class="keyword">end</span>
|
|
0146 <span class="keyword">if</span> Info.SaveFormat.Fig
|
|
0147 <span class="keyword">if</span> isempty(Info.SaveFormat.Name)
|
|
0148 saveas(FigHandle,[M_.fname Info.SaveFormat.GenericName int2str(Info.SaveFormat.Number) <span class="string">'.fig'</span>]);
|
|
0149 <span class="keyword">else</span>
|
|
0150 saveas(FigHandle,[M_.fname Info.SaveFormat.GenericName Info.SaveFormat.Name <span class="string">'.fig'</span>]);
|
|
0151 <span class="keyword">end</span>
|
|
0152 <span class="keyword">end</span></pre></div>
|
|
<hr><address>Generated on Fri 16-Jun-2006 09:09:06 by <strong><a href="http://www.artefact.tk/software/matlab/m2html/">m2html</a></strong> © 2003</address>
|
|
</body>
|
|
</html> |