| @@ 807-852 (lines=46) @@ | ||
| 804 | case '4': |
|
| 805 | echo $stats->chartDistribution([Filter::get('chart_shows'), 'marriage_distribution_chart']); |
|
| 806 | break; |
|
| 807 | case '11': |
|
| 808 | $monthdata = []; |
|
| 809 | for ($i = 0; $i < 12; ++$i) { |
|
| 810 | $monthdata[$i] = GregorianDate::monthNameNominativeCase($i + 1, false); |
|
| 811 | } |
|
| 812 | $xgiven = true; |
|
| 813 | $zgiven = false; |
|
| 814 | $title = I18N::translate('Month of birth'); |
|
| 815 | $xtitle = I18N::translate('Month'); |
|
| 816 | $ytitle = I18N::translate('numbers'); |
|
| 817 | $boundaries_z_axis = Filter::get('z-axis-boundaries-periods', null, '0'); |
|
| 818 | $xdata = $monthdata; |
|
| 819 | $xmax = 12; |
|
| 820 | if ($z_axis !== 300 && $z_axis !== 301) { |
|
| 821 | calculate_legend($boundaries_z_axis); |
|
| 822 | } |
|
| 823 | $percentage = false; |
|
| 824 | if ($y_axis === 201) { |
|
| 825 | $percentage = false; |
|
| 826 | $ytitle = I18N::translate('Individuals'); |
|
| 827 | } elseif ($y_axis === 202) { |
|
| 828 | $percentage = true; |
|
| 829 | $ytitle = I18N::translate('percentage'); |
|
| 830 | } |
|
| 831 | $male_female = false; |
|
| 832 | if ($z_axis === 300) { |
|
| 833 | $zgiven = false; |
|
| 834 | $legend[0] = 'all'; |
|
| 835 | $zmax = 1; |
|
| 836 | $z_boundaries[0] = 100000; |
|
| 837 | } elseif ($z_axis === 301) { |
|
| 838 | $male_female = true; |
|
| 839 | $zgiven = true; |
|
| 840 | $legend[0] = I18N::translate('Male'); |
|
| 841 | $legend[1] = I18N::translate('Female'); |
|
| 842 | $zmax = 2; |
|
| 843 | } |
|
| 844 | //-- reset the data array |
|
| 845 | for ($i = 0; $i < $zmax; $i++) { |
|
| 846 | for ($j = 0; $j < $xmax; $j++) { |
|
| 847 | $ydata[$i][$j] = 0; |
|
| 848 | } |
|
| 849 | } |
|
| 850 | $total = month_of_birth($z_axis, $z_boundaries, $stats); |
|
| 851 | my_plot($title, $xdata, $xtitle, $ydata, $ytitle, $legend); |
|
| 852 | break; |
|
| 853 | case '12': |
|
| 854 | $monthdata = []; |
|
| 855 | for ($i = 0; $i < 12; ++$i) { |
|
| @@ 853-898 (lines=46) @@ | ||
| 850 | $total = month_of_birth($z_axis, $z_boundaries, $stats); |
|
| 851 | my_plot($title, $xdata, $xtitle, $ydata, $ytitle, $legend); |
|
| 852 | break; |
|
| 853 | case '12': |
|
| 854 | $monthdata = []; |
|
| 855 | for ($i = 0; $i < 12; ++$i) { |
|
| 856 | $monthdata[$i] = GregorianDate::monthNameNominativeCase($i + 1, false); |
|
| 857 | } |
|
| 858 | $xgiven = true; |
|
| 859 | $zgiven = false; |
|
| 860 | $title = I18N::translate('Month of death'); |
|
| 861 | $xtitle = I18N::translate('Month'); |
|
| 862 | $ytitle = I18N::translate('numbers'); |
|
| 863 | $boundaries_z_axis = Filter::get('z-axis-boundaries-periods', null, '0'); |
|
| 864 | $xdata = $monthdata; |
|
| 865 | $xmax = 12; |
|
| 866 | if ($z_axis !== 300 && $z_axis !== 301) { |
|
| 867 | calculate_legend($boundaries_z_axis); |
|
| 868 | } |
|
| 869 | $percentage = false; |
|
| 870 | if ($y_axis === 201) { |
|
| 871 | $percentage = false; |
|
| 872 | $ytitle = I18N::translate('Individuals'); |
|
| 873 | } elseif ($y_axis === 202) { |
|
| 874 | $percentage = true; |
|
| 875 | $ytitle = I18N::translate('percentage'); |
|
| 876 | } |
|
| 877 | $male_female = false; |
|
| 878 | if ($z_axis === 300) { |
|
| 879 | $zgiven = false; |
|
| 880 | $legend[0] = 'all'; |
|
| 881 | $zmax = 1; |
|
| 882 | $z_boundaries[0] = 100000; |
|
| 883 | } elseif ($z_axis === 301) { |
|
| 884 | $male_female = true; |
|
| 885 | $zgiven = true; |
|
| 886 | $legend[0] = I18N::translate('Male'); |
|
| 887 | $legend[1] = I18N::translate('Female'); |
|
| 888 | $zmax = 2; |
|
| 889 | } |
|
| 890 | //-- reset the data array |
|
| 891 | for ($i = 0; $i < $zmax; $i++) { |
|
| 892 | for ($j = 0; $j < $xmax; $j++) { |
|
| 893 | $ydata[$i][$j] = 0; |
|
| 894 | } |
|
| 895 | } |
|
| 896 | $total = month_of_death($z_axis, $z_boundaries, $stats); |
|
| 897 | my_plot($title, $xdata, $xtitle, $ydata, $ytitle, $legend); |
|
| 898 | break; |
|
| 899 | case '13': |
|
| 900 | $monthdata = []; |
|
| 901 | for ($i = 0; $i < 12; ++$i) { |
|
| @@ 949-994 (lines=46) @@ | ||
| 946 | $total = month_of_marriage($z_axis, $z_boundaries, $stats); |
|
| 947 | my_plot($title, $xdata, $xtitle, $ydata, $ytitle, $legend); |
|
| 948 | break; |
|
| 949 | case '14': |
|
| 950 | $monthdata = []; |
|
| 951 | for ($i = 0; $i < 12; ++$i) { |
|
| 952 | $monthdata[$i] = GregorianDate::monthNameNominativeCase($i + 1, false); |
|
| 953 | } |
|
| 954 | $xgiven = true; |
|
| 955 | $zgiven = false; |
|
| 956 | $title = I18N::translate('Month of birth of first child in a relation'); |
|
| 957 | $xtitle = I18N::translate('Month'); |
|
| 958 | $ytitle = I18N::translate('numbers'); |
|
| 959 | $boundaries_z_axis = Filter::get('z-axis-boundaries-periods', null, '0'); |
|
| 960 | $xdata = $monthdata; |
|
| 961 | $xmax = 12; |
|
| 962 | if ($z_axis !== 300 && $z_axis !== 301) { |
|
| 963 | calculate_legend($boundaries_z_axis); |
|
| 964 | } |
|
| 965 | $percentage = false; |
|
| 966 | if ($y_axis === 201) { |
|
| 967 | $percentage = false; |
|
| 968 | $ytitle = I18N::translate('Children'); |
|
| 969 | } elseif ($y_axis === 202) { |
|
| 970 | $percentage = true; |
|
| 971 | $ytitle = I18N::translate('percentage'); |
|
| 972 | } |
|
| 973 | $male_female = false; |
|
| 974 | if ($z_axis === 300) { |
|
| 975 | $zgiven = false; |
|
| 976 | $legend[0] = 'all'; |
|
| 977 | $zmax = 1; |
|
| 978 | $z_boundaries[0] = 100000; |
|
| 979 | } elseif ($z_axis === 301) { |
|
| 980 | $male_female = true; |
|
| 981 | $zgiven = true; |
|
| 982 | $legend[0] = I18N::translate('Male'); |
|
| 983 | $legend[1] = I18N::translate('Female'); |
|
| 984 | $zmax = 2; |
|
| 985 | } |
|
| 986 | //-- reset the data array |
|
| 987 | for ($i = 0; $i < $zmax; $i++) { |
|
| 988 | for ($j = 0; $j < $xmax; $j++) { |
|
| 989 | $ydata[$i][$j] = 0; |
|
| 990 | } |
|
| 991 | } |
|
| 992 | $total = month_of_birth_of_first_child($z_axis, $z_boundaries, $stats); |
|
| 993 | my_plot($title, $xdata, $xtitle, $ydata, $ytitle, $legend); |
|
| 994 | break; |
|
| 995 | case '15': |
|
| 996 | $monthdata = []; |
|
| 997 | for ($i = 0; $i < 12; ++$i) { |
|