0001
0002
0003
0004
0005
0006
0007
0008
0009
0010 close all;
0011
0012
0013 FIG_SIZE = [0 0 1200 600];
0014 lineWidth = 3;
0015 markerSize = 10;
0016 markerScaleL = 1.5;
0017 markerScaleS = 1.2;
0018
0019
0020 cfit.CE = fitGompertz(0:(MAX_LEVEL - 1), ceNetwork.HorzProp);
0021 cfit.RingDist = fitGompertz(0:(MAX_LEVEL - 1), meanRingDistNet.HorzProp);
0022 cfit.Ring = fitGompertz(0:(MAX_LEVEL - 1), meanRingNet.HorzProp);
0023 cfit.RandIoCE = fitGompertz(0:(MAX_LEVEL - 1), meanRandIoCeNet.HorzProp);
0024 cfit.SepIoCE = fitGompertz(0:(MAX_LEVEL - 1), meanSepIoCeNet.HorzProp);
0025 cfit.RevIoCe = fitGompertz(0:(MAX_LEVEL - 1), revIoCeNet.HorzProp);
0026
0027
0028 ceNetwork.cfitHorzProp = cfit.CE;
0029 meanRingDistNet.cfitHorzProp = cfit.RingDist;
0030 meanRingNet.cfitHorzProp = cfit.Ring;
0031 meanRandIoCeNet.cfitHorzProp = cfit.RandIoCE;
0032 meanSepIoCeNet.cfitHorzProp = cfit.SepIoCE;
0033 revIoCeNet.cfitHorzProp = cfit.RevIoCe;
0034
0035
0036 figure('name', 'Horizontal Propagation', 'outerPosition', FIG_SIZE, 'color', 'w');
0037 hold on;
0038 tmpP = linspace(0, MAX_LEVEL - 1, 100);
0039 plot(0:(MAX_LEVEL - 1), ceNetwork.HorzProp, 'Marker', netMarker('CE'), ...
0040 'Color', netColor('CE'), 'MarkerSize', markerSize, ...
0041 'MarkerFaceColor', netMarkerFace('CE'), ...
0042 'LineWidth', lineWidth, 'LineStyle', 'none');
0043 errorbar(0:(MAX_LEVEL - 1), meanRandIoCeNet.HorzProp, ...
0044 stdRandIoCeNet.HorzProp, 'Marker', netMarker('RandIoCE'), ...
0045 'Color', netColor('RandIoCE'), 'MarkerSize', markerSize * markerScaleS, ...
0046 'MarkerFaceColor', netMarkerFace('RandIoCE'), ...
0047 'LineWidth', lineWidth, 'LineStyle', 'none');
0048 errorbar(0:(MAX_LEVEL - 1), meanSepIoCeNet.HorzProp, ...
0049 stdSepIoCeNet.HorzProp, 'Marker', netMarker('SepIoCE'), ...
0050 'Color', netColor('SepIoCE'), 'MarkerSize', markerSize * markerScaleL, ...
0051 'MarkerFaceColor', netMarkerFace('SepIoCE'), ...
0052 'LineWidth', lineWidth, 'LineStyle', 'none');
0053 plot(0:(MAX_LEVEL - 1), revIoCeNet.HorzProp, ...
0054 'Marker', netMarker('RevIoCE'), 'Color', netColor('RevIoCE'), ...
0055 'MarkerSize', markerSize * markerScaleS, ...
0056 'MarkerFaceColor', netMarkerFace('RevIoCE'), ...
0057 'LineWidth', lineWidth, 'LineStyle', 'none');
0058 errorbar(0:(MAX_LEVEL - 1), meanRingNet.HorzProp, stdRingNet.HorzProp, ...
0059 'Marker', netMarker('SW'), 'Color', netColor('SW'), ...
0060 'MarkerSize', markerSize, 'MarkerFaceColor', netMarkerFace('SW'), ...
0061 'LineWidth', lineWidth, 'LineStyle', 'none');
0062 errorbar(0:(MAX_LEVEL - 1), meanRingDistNet.HorzProp, ...
0063 stdRingDistNet.HorzProp, 'Marker', netMarker('DistSW'), ...
0064 'Color', netColor('DistSW'), 'MarkerSize', markerSize, ...
0065 'MarkerFaceColor', netMarkerFace('DistSW'), 'LineWidth', lineWidth, ...
0066 'LineStyle', 'none');
0067
0068
0069 plot(tmpP, cfit.CE(tmpP), 'Color', netColor('CE'), 'LineWidth', 4);
0070 plot(tmpP, cfit.RandIoCE(tmpP), 'Color', netColor('RandIoCE'), 'LineWidth', 4);
0071 plot(tmpP, cfit.SepIoCE(tmpP), 'Color', netColor('SepIoCE'), 'LineWidth', 4);
0072 plot(tmpP, cfit.RevIoCe(tmpP), 'Color', netColor('RevIoCE'), 'LineWidth', 4);
0073 plot(tmpP, cfit.Ring(tmpP), 'Color', netColor('SW'), 'LineWidth', 4);
0074 plot(tmpP, cfit.RingDist(tmpP), 'Color', netColor('DistSW'), 'LineWidth', 4);
0075 plot([2 2], [0 ceNetwork.cfitHorzProp(2)], '--k', 'lineWidth', 3);
0076 set(gca, 'FontSize', 18, 'lineWidth', 4, 'FontWeight', 'bold');
0077
0078 xlim([0 4]);
0079 ylim([0 1.1]);
0080 xlabel('Propagation level');
0081 ylabel('Horizontal propagation');
0082 set(gca, 'xTick', [0 1 2 3 4], 'yTick', [0 0.4 0.8 1]);
0083 box off;