File:Meerfelder Maar late glacial pollen diagram ca 14600-10500.svg

From Wikimedia Commons, the free media repository
Jump to navigation Jump to search

Original file(SVG file, nominally 1,401 × 488 pixels, file size: 228 KB)

Captions

Captions

Add a one-line explanation of what this file represents

Summary

[edit]
Description
English: 15 most abundant pollen types of Meerfelder Maar during late glacial time period. Cold Younger Dryas is seen ca 12600-11600 BP.
Date
Source Own work
Author Merikanto
Camera location50° 06′ 00″ N, 6° 45′ 00″ E Kartographer map based on OpenStreetMap.View this and other nearby images on: OpenStreetMapinfo

Source of this data is European pollen database, site MFM6T

Litt, Thomas (2010): Pollen profile MFM6T, Meerfelder Maar, Germany. European Pollen Database (EPD), doi:10.1594/PANGAEA.739535

https://doi.pangaea.de/10.1594/PANGAEA.739535

Complete name : Meerfelder Maar Acronym : MFM6T Country : Germany

Source of the data : Litt Thomas Latitude : 50°6'0" N Longitude : 6°45'0" E Elevation : 336m

http://www.europeanpollendatabase.net/fpd-epd/showData.do?sigle=MFM6T

References :

   Litt, T., and M. Stebich. 1999. Bio- and chronostratigraphy of the lateglacial in the Eifel region, Germany. Quaternary International 61:5-16.
   Stebich, M. 1999. Palynologische Untersuchungen zur Vegetations-geschichte des Weichsel-Spätglazial und Frühholozän an jährlich geschichteten Sedimenten des Meerfelder Maares (Eifel). Dissertationes Botanicae 320, Bornträger, Berlin, Stuttgart.
   Brauer, A., T. Litt, J.F.W. Negendank, and B. Zolitschka. 2001. Lateglacial varve chronology and biostratigraphy of lakes Holzmaar and Meerfelder Maar, Germany. Boreas, Vol. 30:83-88.
   Brauer, A., C. Günter, S.J. Johnsen, and J.F.W. Negendank. 2000. Land-ice teleconnections of cold climatic periods during the last Glacial/Interglacial transition. Climate Dynamics (2000) 16:229-239.



Processed data to draw this diagram Age_BP;Corylus;Betula;Pinus;Juniperus;Salix;Cyperaceae;Gramineae;Artemisia;Helianthemum;Thalictrum;Filicopsida monolete;Compositae s. Asteroideae;Filipendula;Pediastrum;Potamogeton;Others 10583;395;92;100;0;4;3;12;0;0;1;23;0;5;2;1;23.0 10633;300;177;164;0;10;6;12;3;0;0;16;0;10;0;0;24.0 10684;246;300;116;0;3;4;11;7;0;0;14;0;4;1;0;16.0 10725;207;253;123;0;5;4;12;3;0;0;23;0;2;2;0;26.0 10767;129;272;158;0;2;3;31;4;0;0;6;0;3;1;0;30.0 10815;65;300;192;0;3;7;34;6;0;0;4;0;8;0;0;19.0 10852;38;300;202;1;4;7;36;8;0;0;11;0;8;2;0;20.0 10884;53;300;205;0;7;5;26;0;0;0;14;1;4;2;0;39.0 10922;11;300;169;0;8;5;28;5;0;0;4;1;10;1;3;25.0 10957;19;300;254;0;23;11;19;8;0;0;12;0;7;3;0;23.0 10988;2;350;253;4;24;5;26;4;0;1;13;2;5;7;3;24.0 11020;3;300;255;3;20;6;34;3;1;1;23;0;15;5;0;28.0 11050;0;199;300;1;10;11;31;5;0;0;37;1;9;4;3;34.0 11080;0;300;204;0;13;7;44;3;0;0;16;0;7;2;0;32.0 11110;0;377;138;1;24;4;32;9;0;0;7;0;7;1;3;24.0 11145;1;386;150;0;6;9;32;5;0;1;11;0;4;4;0;26.0 11180;0;300;217;0;22;12;48;6;0;1;20;2;5;17;5;31.0 11210;1;215;240;1;33;9;61;6;0;0;16;0;7;15;7;30.0 11240;1;225;267;1;11;18;38;5;0;2;7;0;5;11;2;33.0 11280;0;250;238;0;27;7;37;6;0;1;6;0;11;9;0;26.0 11325;0;242;300;3;21;13;31;7;0;2;2;3;6;10;1;36.0 11375;0;181;375;2;11;4;35;6;0;1;2;0;4;5;1;24.0 11410;0;149;300;3;17;10;46;8;0;0;2;1;13;2;1;28.0 11450;0;200;300;0;21;12;89;10;0;2;2;2;13;15;3;38.0 11480;0;186;253;3;31;24;95;23;0;2;1;1;18;35;3;46.0 11520;0;200;246;7;13;14;116;16;0;1;1;1;18;9;1;33.0 11550;0;284;169;12;7;18;82;8;0;0;1;0;17;8;3;31.0 11580;1;300;168;21;10;32;73;13;0;1;0;2;36;26;2;37.0 11600;0;108;168;64;6;29;134;13;0;1;0;2;26;57;2;27.0 11620;1;158;150;49;15;29;141;17;0;3;0;5;20;34;9;21.0 11640;0;131;174;90;7;31;130;19;1;2;0;2;10;104;49;32.0 11660;1;186;113;51;20;42;105;25;2;0;0;5;5;27;21;45.0 11680;0;206;107;72;13;45;146;55;0;7;0;7;3;52;30;67.0 11700;0;172;137;50;10;30;150;35;2;3;0;2;11;39;12;32.0 11720;2;171;100;40;19;44;118;21;1;6;0;7;7;23;9;63.0 11740;2;188;150;43;12;45;119;57;2;2;2;7;10;46;6;54.0 11760;0;155;117;30;10;29;122;42;1;12;0;9;6;47;45;43.0 11780;0;139;90;28;8;55;165;28;1;3;0;15;5;11;9;52.0 11810;0;235;86;17;24;48;132;33;3;5;0;4;7;28;34;45.0 11840;0;109;106;29;30;58;150;32;0;8;1;7;3;34;19;51.0 11865;0;142;128;27;15;83;150;37;4;10;2;13;7;13;4;46.0 11895;0;161;150;21;15;65;155;73;7;8;0;9;4;11;3;51.0 11920;0;150;97;17;10;49;116;47;3;3;0;5;3;15;6;54.0 11950;1;106;119;12;11;65;186;36;1;7;1;10;8;11;1;47.0 11980;0;93;150;19;8;56;143;50;5;7;1;6;3;20;6;50.0 12000;1;150;131;22;18;39;160;50;2;2;0;6;1;17;10;57.0 12030;0;105;150;21;10;42;150;39;5;4;2;11;5;14;1;47.0 12060;0;139;114;15;7;54;189;61;4;8;1;7;3;15;0;66.0 12080;1;111;63;16;17;59;200;69;4;10;1;9;2;11;3;63.0 12100;0;50;80;14;19;58;210;60;5;4;3;12;0;7;7;73.0 12125;0;97;113;15;7;39;203;103;2;13;2;7;3;11;6;82.0 12150;0;109;160;17;11;31;150;54;0;3;0;8;1;39;6;52.0 12170;0;150;98;16;12;39;126;57;1;6;1;3;6;39;8;70.0 12190;0;104;150;9;4;78;214;67;4;7;0;10;4;42;2;74.0 12210;0;53;100;8;14;57;226;51;4;2;2;9;4;43;5;63.0 12230;0;109;140;12;8;37;160;59;2;8;1;4;5;32;7;45.0 12240;1;135;120;22;18;88;149;53;4;7;0;7;5;126;17;58.0 12260;0;110;85;22;23;56;137;62;2;8;0;6;7;63;10;42.0 12280;0;113;101;9;15;52;150;71;1;0;0;3;2;61;16;61.0 12300;0;141;150;14;34;49;153;85;3;10;0;8;5;168;61;54.0 12320;0;97;115;12;24;57;150;71;4;8;0;6;3;314;32;50.0 12340;0;121;107;12;17;60;127;49;1;11;0;4;5;243;41;59.0 12360;0;122;150;11;33;74;170;66;2;7;1;7;4;182;26;47.0 12380;0;154;118;9;30;41;144;81;3;4;1;3;2;213;75;60.0 12400;0;127;150;25;31;48;139;53;1;5;0;5;4;274;31;56.0 12415;0;111;163;25;31;50;128;62;3;6;0;7;6;157;32;54.0 12430;0;86;96;7;24;71;150;51;0;5;0;4;3;236;27;43.0 12450;0;119;133;10;32;43;126;67;3;6;1;6;3;144;42;42.0 12470;0;78;98;7;33;62;150;62;2;5;0;5;2;82;7;34.0 12490;1;149;150;10;39;70;165;73;0;9;0;7;4;134;33;65.0 12510;0;101;93;2;49;62;150;68;2;9;0;5;1;85;11;51.0 12530;0;81;89;8;44;68;138;64;1;6;0;3;0;183;19;46.0 12550;0;55;99;3;51;54;204;71;1;4;1;8;3;47;17;63.0 12570;0;118;150;1;56;27;158;46;2;3;0;7;7;102;22;53.0 12590;0;89;150;3;24;65;128;41;0;6;0;7;4;50;15;52.0 12610;0;119;186;1;28;65;100;22;2;3;0;3;6;20;6;44.0 12630;0;93;153;0;22;119;172;36;4;1;1;3;9;42;19;53.0 12650;0;90;131;2;10;102;157;34;0;4;1;7;13;13;39;66.0 12660;0;74;145;0;16;49;131;31;0;1;1;3;5;35;41;65.0 12670;0;101;204;1;5;55;128;33;0;5;0;6;13;9;3;63.0 12680;0;132;171;0;9;61;120;28;1;6;0;2;10;39;5;47.0 12690;0;155;180;0;6;56;125;21;1;2;0;1;13;8;1;34.0 12720;0;220;225;2;16;49;110;32;0;4;1;2;10;13;4;43.0 12750;0;178;245;1;10;17;100;36;1;2;0;3;9;4;0;20.0 12780;0;319;225;3;27;21;78;30;1;5;1;0;5;11;3;17.0 12820;0;326;120;3;9;24;59;13;0;1;1;0;7;6;0;9.0 12840;0;300;147;4;18;21;72;20;0;1;0;2;12;5;2;23.0 12870;0;189;114;1;4;25;101;30;1;1;2;3;18;13;3;30.0 12915;0;250;158;5;13;40;132;22;1;3;0;0;12;51;2;24.0 12950;0;231;170;4;19;53;178;44;4;1;1;3;23;22;7;48.0 12990;0;300;142;3;12;46;117;41;0;6;0;3;21;46;1;52.0 13025;0;210;152;1;18;44;131;34;1;5;4;3;14;32;4;42.0 13080;0;341;104;10;61;19;65;19;2;1;0;0;16;48;4;33.0 13110;1;317;90;4;29;24;96;11;1;3;0;2;13;44;1;35.0 13165;0;345;150;4;32;49;98;33;2;5;0;0;11;39;1;33.0 13190;0;376;84;5;17;22;77;16;1;4;0;3;9;16;0;24.0 13220;0;355;92;4;17;23;74;14;3;0;1;2;8;8;1;21.0 13255;0;350;63;7;30;29;70;25;0;6;1;3;6;13;0;23.0 13290;0;214;82;15;25;58;100;28;3;8;2;2;7;21;0;50.0 13315;0;229;46;17;46;35;130;30;1;2;0;7;8;12;4;34.0 13340;0;320;42;11;31;34;95;36;0;3;2;6;7;19;3;37.0 13360;0;300;31;18;26;41;91;49;2;7;0;4;5;23;3;33.0 13380;0;194;46;8;20;68;131;53;2;6;0;4;6;21;2;70.0 13395;0;300;32;18;23;46;129;54;2;8;0;2;11;18;0;59.0 13420;0;196;31;16;38;33;149;95;3;8;0;6;6;4;0;51.0 13440;0;345;28;7;12;29;102;43;3;3;0;5;3;8;0;40.0 13455;0;218;29;8;16;26;150;60;1;3;0;5;7;10;3;46.0 13470;0;300;21;15;19;12;114;84;2;8;0;2;5;16;1;42.0 13490;0;212;23;14;46;42;104;61;3;10;0;2;7;37;2;25.0 13510;0;300;29;31;35;33;108;94;1;5;0;2;2;19;5;39.0 13530;0;255;11;17;29;24;125;64;8;8;0;4;4;8;0;39.0 13534;0;232;28;16;61;49;111;71;5;11;0;3;4;46;0;51.0 13536;0;362;12;8;26;22;86;26;2;3;0;2;2;8;0;33.0 13550;0;266;33;26;34;26;165;39;3;9;0;4;3;16;0;41.0 13570;0;300;17;11;39;24;124;41;3;8;0;5;2;21;0;51.0 13590;0;375;5;18;44;10;78;55;2;5;0;2;2;5;1;12.0 13600;0;252;14;12;62;14;130;61;2;15;0;7;0;9;0;33.0 13610;0;192;19;7;39;18;166;38;7;12;1;5;2;14;3;62.0 13625;0;225;7;17;46;15;98;52;1;4;0;5;1;26;1;54.0 13640;0;233;7;27;29;29;171;62;6;12;0;6;2;34;1;43.0 13660;0;350;7;32;28;17;78;49;3;10;0;3;0;27;1;24.0 13680;0;218;15;48;51;27;151;84;2;16;0;7;3;50;0;45.0 13700;0;196;13;39;35;31;168;98;5;14;0;16;2;23;3;59.0 13720;0;125;8;28;16;33;164;136;7;10;0;9;1;10;7;75.0 13730;0;192;8;22;19;20;140;68;3;10;0;10;0;3;3;81.0 13739;0;49;12;43;14;45;210;56;4;15;1;13;3;8;5;90.0 13741;0;37;18;18;18;40;212;101;3;34;0;11;1;8;10;110.0 13750;0;96;10;25;26;40;228;113;5;25;0;6;0;5;16;112.0 13770;1;45;8;10;26;31;205;87;5;5;2;10;0;60;17;114.0 13775;0;87;9;18;48;21;300;100;5;15;0;9;2;7;1;86.0 13790;0;97;8;69;55;42;200;110;2;16;1;2;1;28;3;73.0 13810;0;178;13;25;48;22;200;108;4;16;1;7;1;45;0;48.0 13830;0;207;4;22;139;17;140;75;4;10;0;5;0;41;0;40.0 13850;0;190;5;16;160;11;111;97;7;21;0;6;0;80;4;58.0 13870;0;151;9;44;150;30;128;96;2;21;1;5;1;55;3;52.0 13885;0;173;4;47;166;27;102;73;3;20;1;6;0;91;2;41.0 13890;0;153;9;34;206;33;127;131;0;38;0;7;2;86;2;62.0 13900;0;78;3;49;150;11;164;94;5;15;0;9;2;13;1;71.0 13910;0;143;5;42;121;31;129;101;5;14;1;6;2;61;1;34.0 13930;0;206;5;72;197;24;126;88;12;19;0;8;1;26;1;69.0 13940;0;111;8;42;122;36;172;93;8;20;0;7;0;30;0;78.0 13960;0;110;6;42;98;23;155;115;1;20;1;6;0;21;0;55.0 13970;1;63;4;42;118;27;165;100;6;21;0;8;0;25;2;50.0 13990;0;105;6;60;150;37;133;83;2;16;0;5;0;16;5;44.0 14000;0;93;3;29;106;29;200;114;12;28;0;6;2;16;2;58.0 14020;0;70;1;10;74;31;132;172;2;28;0;4;1;6;0;77.0 14028;0;60;14;68;110;23;202;115;2;20;0;6;1;9;5;72.0 14038;1;85;3;58;92;31;225;95;10;22;0;6;1;15;5;71.0 14048;0;71;10;28;65;38;175;98;3;17;1;8;2;7;2;53.0 14058;1;79;10;47;89;45;232;102;3;10;0;6;1;1;0;71.0 14068;0;81;7;65;98;46;300;77;6;15;0;3;0;7;3;86.0 14078;0;74;5;38;117;32;224;94;5;16;0;9;0;17;5;102.0 14088;2;120;6;88;99;26;180;70;4;22;0;7;0;34;5;92.0 14098;0;95;6;40;140;43;162;88;2;7;0;14;2;39;3;97.0 14108;0;37;9;40;58;29;253;47;13;27;2;15;0;52;0;80.0 14118;1;36;7;41;57;40;300;41;7;32;0;14;1;40;10;99.0 14128;1;57;7;23;50;39;253;38;10;29;0;14;0;57;4;118.0 14138;1;57;4;49;31;45;248;46;6;28;3;8;0;56;11;105.0 14148;0;68;9;35;39;56;250;39;9;37;0;15;1;94;14;108.0 14158;0;42;6;42;32;45;300;52;9;19;0;14;1;44;18;120.0 14168;0;73;4;23;33;38;300;32;13;17;0;6;0;61;2;94.0 14178;1;114;10;55;54;61;217;31;18;22;0;4;0;192;3;78.0 14188;0;83;15;46;64;64;259;41;13;43;1;2;1;341;9;104.0 14198;0;76;8;3;32;38;251;35;12;20;0;15;0;130;5;92.0 14208;0;56;7;29;28;46;300;17;3;6;0;16;0;62;3;95.0 14218;1;59;13;34;35;49;282;27;7;6;0;10;0;78;2;101.0 14228;1;63;9;23;50;56;300;23;5;10;0;18;0;67;5;88.0 14238;1;44;9;11;39;59;250;26;3;7;0;21;0;66;4;109.0 14248;0;42;7;14;36;54;267;27;9;7;0;36;0;41;0;96.0 14258;0;36;3;23;26;57;300;20;2;8;1;11;0;133;6;91.0 14268;1;61;10;24;53;57;300;58;15;13;1;10;2;123;9;80.0 14278;1;66;5;18;28;39;300;27;14;16;0;4;1;165;2;64.0 14288;0;70;8;28;32;59;300;30;21;6;0;9;0;146;9;57.0 14298;0;65;6;10;30;36;318;25;20;7;0;9;2;116;19;68.0 14308;0;64;23;14;57;62;300;18;4;7;0;8;0;254;13;65.0 14343;0;90;10;8;42;36;300;38;23;12;0;6;0;148;5;67.0 14353;0;107;13;11;28;30;295;68;11;7;0;7;0;74;12;81.0 14363;0;61;9;10;11;46;320;36;8;6;2;11;1;9;10;51.0 14373;0;84;14;3;17;37;285;38;10;8;1;7;0;9;11;54.0 14383;0;59;19;18;12;51;300;38;12;8;1;12;0;5;24;81.0 14393;0;53;12;7;8;36;350;32;23;4;1;8;0;2;6;63.0 14403;0;42;34;12;14;77;250;28;30;4;0;7;1;13;11;64.0 14413;0;82;24;8;11;64;300;14;11;7;2;15;0;5;6;59.0 14422;1;29;31;5;10;53;280;56;19;8;0;17;0;12;0;61.0 14428;0;56;40;11;10;78;300;28;21;3;0;3;0;1;1;68.0 14434;1;46;38;0;5;64;300;28;21;3;1;8;1;4;0;60.0 14440;0;39;44;1;7;87;223;17;5;6;3;3;0;8;0;39.0 14446;1;15;11;0;4;23;187;31;11;1;1;1;0;2;0;21.0 14464;0;10;23;0;4;35;95;15;4;2;0;0;0;4;0;44.0 14482;7;34;73;0;1;82;224;39;19;5;0;4;0;3;0;72.0 14488;0;29;41;1;3;83;284;28;14;5;0;10;0;4;0;57.0 14500;2;31;41;1;3;68;208;41;20;11;3;12;0;3;0;57.0 14506;2;18;40;0;6;92;259;32;31;5;1;6;0;2;0;46.0 14512;5;30;34;0;6;110;239;39;30;7;3;5;0;8;0;54.0 14518;0;30;50;2;9;83;210;66;35;10;1;9;0;5;0;56.0 14524;4;27;45;1;7;80;246;54;36;5;0;9;0;2;0;52.0 14530;9;23;43;0;5;55;195;54;47;2;0;12;0;6;0;64.0 14536;1;26;43;1;4;60;260;32;23;4;2;4;0;2;0;67.0 14542;1;20;45;0;5;54;157;17;19;1;2;3;0;6;0;50.0 14548;1;15;62;1;10;102;215;21;27;1;1;3;0;4;0;49.0 14560;10;17;18;1;4;54;171;20;22;7;1;7;1;8;0;48.0 14566;5;29;42;2;6;76;246;34;18;4;0;4;1;4;0;57.0 14572;3;32;61;0;12;113;194;35;17;6;0;9;0;13;0;59.0 14578;1;18;45;1;2;80;220;38;33;2;0;3;0;3;0;49.0 14584;3;27;41;4;5;69;252;50;31;2;2;7;0;7;0;72.0 14590;0;27;70;0;10;76;234;26;25;5;1;3;0;3;0;63.0 14596;3;10;67;1;11;87;178;23;22;6;0;6;0;4;0;55.0 14602;2;15;55;0;9;69;178;22;14;2;0;5;0;5;1;56.0 14608;1;10;85;1;5;59;163;13;17;3;2;12;0;14;0;61.0 14614;2;15;98;0;5;90;196;35;26;12;2;14;2;9;0;76.0 14620;2;14;78;0;2;111;222;17;58;4;6;6;2;10;0;43.0 14626;3;11;61;0;3;83;163;15;30;3;1;4;2;6;0;53.0 14632;1;16;80;1;4;77;232;15;20;5;5;5;1;13;0;64.0 14638;1;24;70;0;5;88;246;39;20;9;0;4;0;3;0;47.0 14644;3;23;72;0;7;150;250;48;16;9;0;4;0;12;0;51.0 14650;0;11;51;2;5;146;232;39;20;4;1;7;0;10;0;50.0



Python code to draw this diagram run code with python pollen1.py -i meerfelder_maar.csv -c Meerfelder_Maar -p maar_pal.txt -tb 9500 -te 14700 -ts 500

Palette:

palette

  1. 339933
  2. 336633
  3. 008000
  4. 00F000
  5. 00a000
  6. 8F8F00
  7. ffff00
  8. 804000
  9. FF8080
  10. 8000F0

red orange yellow

  1. 7777ff

blue violet grey darkred

  1. 00007F
  2. 336633
  3. 008000
  4. 00F000
  5. FFFF00
  6. FFFF80
  7. 800000
  8. 8000F0


Code:

  1. Python 3 pollen data stacked percent plot, 15 taxa
    1. sample usage:
  2. python pollen1.py -i meerfelder_maar.csv -c Meerfelder_Maar -p maar_pal.txt -tb 9500 -te 14700 -ts 500
    1. python3 matplotlib ; separated csv pollen 15 taxas area diagram plot
    1. 2021.12.06. v 0008.0000


import numpy as np import scipy as sp import pandas as pd

import matplotlib.pyplot as plt import matplotlib.patches as mpatches from matplotlib.ticker import (MultipleLocator, AutoMinorLocator)

from matplotlib import colors

from scipy.interpolate import UnivariateSpline from scipy.interpolate import pchip

  1. from astropy.modeling import models, fitting

import sys, getopt import math from unidecode import unidecode

    1. attempt to autoresize window

automatik=0

    1. default palette ...

pallette=['#339999','#336633','#008000','#00F000', '#00a000',

'#8F8F00','#ffff00',
'#804000','#FF8080', '#8000F0',
'red', 'orange','yellow','#7777ff',
'blue', 'violet', 'grey', 'darkred',
'#00007F','#336633','#008000','#00F000', 
'#FFFF00','#FFFF80','#800000', '#8000F0',
'red', 'orange','yellow','green',
'blue', 'violet', 'grey', 'darkred']


def stackplot_spline_drawer(outfilename, x, yorig, legs, caption, xlabel, ylabel, alkut, lopput, tstep, drawstyle):

global pallette
global automatik


captionfontsize=22
xlabelfontsize=16
ylabelfontsize=16
tickfontsize=15
# color palette, only 15 items

colorado=pallette
print(colorado)
print (type(colorado[2]))
#quit(-1)

pitu=len(yorig[0])
mara=len(yorig)
summat=[]
for j in range(0,pitu):
   summa=0
   for i in range(0,mara):
       summa=summa+yorig[i][j]
   summat.append(summa)
prosentit=[]
for i in range(0,mara):
   for j in range(0,pitu):
       luku=yorig[i][j]
       prosentti=(luku*100)/summat[j]
       #print j, luku, prosentti
       prosentit.append(prosentti)
   #prosentit.append(105)


prosentit2=np.reshape(prosentit, (mara, -1)) 
y=[]
for i in range(0,mara):
  #y.append(yorig[i])
  y.append(prosentit2[i])


varjy=[]
legs2=[]
for i in range(0,len(legs)):
    varjy.append(mpatches.Patch(color=colorado[i]) )
    legs2.append(legs[i])
uusix=np.linspace(x[0],x[len(x)-1],500);


#for i in range(0,1):
#    print(y[i])


moky=[]
for i in range(0,mara):
    spl = pchip(x, y[i])
    #g_init = models.Gaussian1D(amplitude=1., mean=0, stddev=1.)
    #fit_g = fitting.LevMarLSQFitter()
    #spl = fit_g(g_init, x, y[i])
    moky.append(spl(uusix))


#fig, ax = plt.subplots()
#fig= plt.figure(figsize=(12, 10))
fig, ax = plt.subplots()
fig = plt.gcf()
if(automatik==1):
	fig.set_size_inches(13, 5.3)
	fig.set_dpi(80)
## dpi=80
#ax.patch.set_facecolor('#3f3f3f')
ax.patch.set_facecolor('darkred')
handles, labels = ax.get_legend_handles_labels()
  1. ax.legend(varjy, legs2,loc='center left', bbox_to_anchor=(1.05, 0.5), fontsize=16)
  2. ax.legend(varjy, legs2,loc='center right')
ax.legend(varjy, legs,loc='right')
plt.title(caption,  fontsize=captionfontsize)
ax.set_xlabel(xlabel, fontsize=xlabelfontsize)
ax.set_ylabel(ylabel, color='#004000', fontsize=ylabelfontsize)

# We change the fontsize of minor ticks label 
ax.tick_params(axis='both', which='major', labelsize=tickfontsize)
ax.tick_params(axis='both', which='minor', labelsize=tickfontsize)
  1. ax.yaxis.set_ticks(np.arange(0, 100, 10))


if(drawstyle==0):
   ax.stackplot(x, prosentit2, colors=colorado)
if(drawstyle==1):   
   ax.stackplot(uusix, moky, colors=colorado)
ax.set_ylim([0,100])
print("XLIM",alkut)
ax.set_xlim([alkut, lopput])
start, end = ax.get_xlim()
ax.xaxis.set_ticks(np.arange(start, end, tstep))

ax.xaxis.set_minor_locator(AutoMinorLocator())
plt.gca().invert_xaxis()
#fig.patch.set_facecolor('black')
plt.show()
fig.savefig(outfilename, format='svg', dpi=80)
return


def draw_pollen_plot(infiili, outfiili, caption, xlabel, ylabel, alkut, lopput, tstep, drawstyle):

global automatik
#infiili="berelekh2_p15.txt"
indata = np.genfromtxt(infiili, delimiter=';', dtype=None)
muoto=np.shape(indata)
rowis=muoto[0]
colis=muoto[1]

data=np.zeros((rowis, colis))
data2=np.zeros((rowis-1, colis-1))
agezi=np.zeros(rowis-1)
for i in range(1,rowis):
     for j in range(0,colis):
           data[i-1][j]=np.float(indata[i][j])


ii=0
for i in range(0,rowis-1):
     for j in range(1,colis):
           data2[ii][j-1]= data[i][j]
     ii=ii+1


for i in range(0,rowis-1):
     agezi[i]=data[i][0]
#print data2[0]
#print agezi
rowis=rowis-1
pdata=data.transpose()
pdata[0][rowis]=pdata[0][rowis-1]
pdata[1][rowis]=pdata[1][rowis-1]
takki=[]
plants=[]
#varjy=[]
for i in range(1,colis):
    takki.append(pdata[i])
    lant0=indata[0][i]
    # filter accented e out
    #lant2=lant.replace(b'\x0e','e')
    lant1=str(lant0)
    lant2=lant1[1:]
    lant3=lant2.replace("'","")
    lant4=lant3.replace('"',"")
    plants.append(lant4)
    #varjy.append(mpatches.Patch(color=colorado[i-1]) )


##################
## adjust auto
agemin=99999999999999
agemax=-99999999999990
for i in range(1,rowis):
    if(agemin>agezi[i]):
        agemin=agezi[i]
    if(agemax<agezi[i]):
        agemax=agezi[i]


maara=agemax-agemin
loki1=math.floor(math.log10(maara))
loki2=loki1-1
jaos1=math.pow(10, loki1)
k1=int(agemin/jaos1)*jaos1
k2=int(agemax/jaos1)*jaos1+jaos1
aikaalku=int(k1)
  1. aikaloppu=int(k2)
aikaloppu=agemax
askel=int(jaos1)
#for t in range(aikaalku, aikaloppu, askel):
if (alkut==0):
  if (lopput==0):
    if (tstep==0):
       alkut=aikaalku
       lopput=aikaloppu
       tstep=askel


if (alkut==0):
  if (lopput==0):
    if (tstep!=0):
       alkut=aikaalku
       lopput=aikaloppu
       #tstep=askel
# jn debug warning
print("IS")
print(automatik)
if(automatik==1):
	print("AUTOMATIK")
	minit=int(maara/1000)
	minit2=minit*250
	alkut=alkut-minit2
	print(alkut)
#print alkut, lopput, tstep
    1. print agemin
    2. print agemax
#print (plants)


kounts=data2.T;
#caption="Killeak"
#drawstyle=1
stackplot_spline_drawer(outfiili, agezi, kounts, plants, caption, xlabel, ylabel, alkut, lopput, tstep, drawstyle)
return


def usage():

  print ("Sample usage python pypol1 -i berelekh_p15.txt -o berelekh_pollen_diagram.csv -c \"Pollen diagram of Berelekh\" ");
  print ("All options:");
  print ("-i inpuffile");
  print ("-o outputfile");
  print ("-c \"Caption\"");
  print ("-xl \"Xlabel\"");
  print ( "-yl \"Ylabel\"");
  print ( "-tb begintime");
  print ( "-te endtime ");
  print ( "-ts timestep ");
  print ( "-p palettefile UNDER DEV ");
  print ( "-h  this help ");
  print ( "-ds drawstyle 0 normal, 1 spline");
  return(0)


def optiot(argut): global pallette global automatik inputfile="in.txt" outputfile="out.svg" caption="Pollen diagram" xlabel="Age BP" ylabel="Percent of pollen count" timebegin=0 timeend=0 timestep=0 drawstyle=0 automatik=0 palettefilename="palette.csv"

pitu=len(argut) if(pitu==0): print ("No args.") usage() return(-1)

if(pitu>0): parametri=argut[0] #print parametri inputfile=parametri; ifi= inputfile.split('.', 1 ) outputfile=ifi[0]+".svg" ifi2= inputfile.split('_', 1 ) caption0=ifi2[0] caption1=caption0[0].upper() caption2=caption0[1:] caption=caption1+caption2 #return(0)

for n in range(0, pitu-1): optio=argut[n] parametri=argut[n+1] if(optio=="-h"): usage() if(optio=="--help"): usage() if(optio=="-i"): inputfile=parametri; ifi= inputfile.split('.', 1 ) outputfile=ifi[0]+".svg" ifi2= inputfile.split('_', 1 ) caption0=ifi2[0] caption1=caption0[0].upper() caption2=caption0[1:] caption=caption1+caption2 caption=caption.replace('_',' ')

if(optio=="-o"): outputfile=parametri; if(optio=="-c"): caption=parametri; caption=caption.replace('_',' ') print(caption) if(optio=="-xl"): xlabel=parametri; if(optio=="-yl"): ylabel=parametri; if(optio=="-tb"): timebegin=int(parametri); timestep=2000 if(optio=="-te"): timeend=int(parametri); timestep=math.pow(10, (int(math.floor(math.log10(timeend-timebegin)))) )/2

if(optio=="-ts"): timestep=int(parametri); if(optio=="-ds"): drawstyle=int(parametri);

if(optio=="-p"): palettefilename=parametri print("Reading palette : ",palettefilename) palette00=pd.read_csv(palettefilename) #print(palette) #pallette=palette.astype(str).values.tolist() palette1=palette00.astype(str).values.tolist() palette2=np.array(palette1).ravel() palette3=palette2.astype(str).tolist() pallette=palette3 #print(palette2) #quit(-1) if(optio=="-a"): print("Set auto") automatik=int(parametri);

print ("Options:") print (inputfile) print (outputfile) print (caption) print (xlabel) print (ylabel) print (timebegin) print (timeend) print (timestep) print (drawstyle) print (palettefilename)

#quit(-1)

draw_pollen_plot(inputfile, outputfile, caption, xlabel, ylabel, timebegin, timeend, timestep, drawstyle)

return 0


    1. programmi entry point


if __name__ == "__main__":

  optiot(sys.argv[1:])




Licensing

[edit]
I, the copyright holder of this work, hereby publish it under the following license:
w:en:Creative Commons
attribution share alike
This file is licensed under the Creative Commons Attribution-Share Alike 4.0 International license.
You are free:
  • to share – to copy, distribute and transmit the work
  • to remix – to adapt the work
Under the following conditions:
  • attribution – You must give appropriate credit, provide a link to the license, and indicate if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use.
  • share alike – If you remix, transform, or build upon the material, you must distribute your contributions under the same or compatible license as the original.

File history

Click on a date/time to view the file as it appeared at that time.

Date/TimeThumbnailDimensionsUserComment
current10:35, 6 December 2021Thumbnail for version as of 10:35, 6 December 20211,401 × 488 (228 KB)Merikanto (talk | contribs)code
18:40, 4 December 2021Thumbnail for version as of 18:40, 4 December 20211,410 × 432 (218 KB)Merikanto (talk | contribs)Update
15:21, 3 December 2021Thumbnail for version as of 15:21, 3 December 20211,055 × 432 (218 KB)Merikanto (talk | contribs)Update
15:07, 3 December 2021Thumbnail for version as of 15:07, 3 December 20211,145 × 432 (202 KB)Merikanto (talk | contribs)update of layout code
19:50, 16 February 2017Thumbnail for version as of 19:50, 16 February 20171,339 × 595 (436 KB)Merikanto (talk | contribs)Correction of data
19:37, 16 February 2017Thumbnail for version as of 19:37, 16 February 2017948 × 463 (434 KB)Merikanto (talk | contribs)User created page with UploadWizard

There are no pages that use this file.

File usage on other wikis

The following other wikis use this file:

Metadata