diff options
| author | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2020-04-30 17:01:47 +0100 |
|---|---|---|
| committer | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2020-04-30 17:01:47 +0100 |
| commit | 01e8da91dc70a152c0001b96cffaff4f596e811e (patch) | |
| tree | 27081be16ce7dc5ef26186513de16527a37fe1fa | |
| parent | fe37613a7bb2c8eb6dc234d2931212692048be18 (diff) | |
| download | perlweeklychallenge-club-01e8da91dc70a152c0001b96cffaff4f596e811e.tar.gz perlweeklychallenge-club-01e8da91dc70a152c0001b96cffaff4f596e811e.tar.bz2 perlweeklychallenge-club-01e8da91dc70a152c0001b96cffaff4f596e811e.zip | |
- Added Raku solutions to the Ordered Lineup task.
| -rw-r--r-- | challenge-058/mohammad-anwar/raku/ch-2.p6 | 41 | ||||
| -rw-r--r-- | challenge-058/mohammad-anwar/raku/ch-2a.p6 | 39 | ||||
| -rw-r--r-- | stats/pwc-current.json | 126 | ||||
| -rw-r--r-- | stats/pwc-language-breakdown-summary.json | 72 | ||||
| -rw-r--r-- | stats/pwc-language-breakdown.json | 420 | ||||
| -rw-r--r-- | stats/pwc-leaders.json | 364 | ||||
| -rw-r--r-- | stats/pwc-summary-1-30.json | 42 | ||||
| -rw-r--r-- | stats/pwc-summary-121-150.json | 98 | ||||
| -rw-r--r-- | stats/pwc-summary-151-180.json | 36 | ||||
| -rw-r--r-- | stats/pwc-summary-31-60.json | 106 | ||||
| -rw-r--r-- | stats/pwc-summary-61-90.json | 112 | ||||
| -rw-r--r-- | stats/pwc-summary-91-120.json | 38 | ||||
| -rw-r--r-- | stats/pwc-summary.json | 40 |
13 files changed, 807 insertions, 727 deletions
diff --git a/challenge-058/mohammad-anwar/raku/ch-2.p6 b/challenge-058/mohammad-anwar/raku/ch-2.p6 new file mode 100644 index 0000000000..a2ee081ba0 --- /dev/null +++ b/challenge-058/mohammad-anwar/raku/ch-2.p6 @@ -0,0 +1,41 @@ +#!/usr/bin/env perl6 + +use v6.d; + +sub MAIN() { + my $H = [2, 6, 4, 5, 1, 3]; + my $T = [1, 0, 2, 0, 1, 2]; + my $O = order-lineup({ H => $H, T => $T }); + + say sprintf("\@H = (%s)", $H.join(", ")); + say sprintf("\@T = (%s)", $T.join(", ")); + say sprintf("\@O = (%s)", $O.join(", ")); +} + +sub order-lineup($args) { + + my @H = $args.{'H'}.<>; + my @T = $args.{'T'}.<>; + + my %H-T = (); + for 0 .. @H.elems-1 -> $i { + %H-T{@H[$i]} = @T[$i]; + } + + my $O = []; + for %H-T.sort(*.keys).reverse -> $r { + my $h = $r.kv[0]; + my $t = $r.kv[1]; + + my $i = 0; + my $j = 0; + while $t > $j { + $j++ if $O.[$i] > $h; + $i++; + } + + $O.splice: $i, 0, $h.Int; + } + + return $O; +} diff --git a/challenge-058/mohammad-anwar/raku/ch-2a.p6 b/challenge-058/mohammad-anwar/raku/ch-2a.p6 new file mode 100644 index 0000000000..0c220c0a8c --- /dev/null +++ b/challenge-058/mohammad-anwar/raku/ch-2a.p6 @@ -0,0 +1,39 @@ +#!/usr/bin/env perl6 + +use Test; + +my $H = [2, 6, 4, 5, 1, 3]; +my $T = [1, 0, 2, 0, 1, 2]; +my $E = [5, 1, 2, 6, 3, 4]; + +is order-lineup({ H => $H, T => $T }), $E; + +done-testing; + +sub order-lineup($args) { + + my @H = $args.{'H'}.<>; + my @T = $args.{'T'}.<>; + + my %H-T = (); + for 0 .. @H.elems-1 -> $i { + %H-T{@H[$i]} = @T[$i]; + } + + my $O = []; + for %H-T.sort(*.keys).reverse -> $r { + my $h = $r.kv[0]; + my $t = $r.kv[1]; + + my $i = 0; + my $j = 0; + while $t > $j { + $j++ if $O.[$i] > $h; + $i++; + } + + $O.splice: $i, 0, $h.Int; + } + + return $O; +} diff --git a/stats/pwc-current.json b/stats/pwc-current.json index 6f2ebb3a05..1f6e5fe04a 100644 --- a/stats/pwc-current.json +++ b/stats/pwc-current.json @@ -1,30 +1,31 @@ { - "subtitle" : { - "text" : "[Champions: 11] Last updated at 2020-04-30 07:31:27 GMT" + "legend" : { + "enabled" : 0 }, "drilldown" : { "series" : [ { - "id" : "Cheok-Yin Fung", + "name" : "Cheok-Yin Fung", "data" : [ [ "Perl", 1 ] ], - "name" : "Cheok-Yin Fung" + "id" : "Cheok-Yin Fung" }, { + "name" : "E. Choroba", "data" : [ [ "Perl", 2 ] ], - "id" : "E. Choroba", - "name" : "E. Choroba" + "id" : "E. Choroba" }, { + "id" : "Javier Luque", "data" : [ [ "Perl", @@ -39,7 +40,6 @@ 1 ] ], - "id" : "Javier Luque", "name" : "Javier Luque" }, { @@ -67,16 +67,17 @@ "name" : "Luca Ferrari" }, { - "id" : "Mark Anderson", + "name" : "Mark Anderson", "data" : [ [ "Raku", 2 ] ], - "name" : "Mark Anderson" + "id" : "Mark Anderson" }, { + "name" : "Mohammad S Anwar", "id" : "Mohammad S Anwar", "data" : [ [ @@ -85,40 +86,39 @@ ], [ "Raku", - 1 + 2 ] - ], - "name" : "Mohammad S Anwar" + ] }, { "name" : "Roger Bell_West", + "id" : "Roger Bell_West", "data" : [ [ "Perl", 2 ] - ], - "id" : "Roger Bell_West" + ] }, { + "id" : "Simon Proctor", "data" : [ [ "Raku", 1 ] ], - "id" : "Simon Proctor", "name" : "Simon Proctor" }, { + "name" : "Wanderdoc", + "id" : "Wanderdoc", "data" : [ [ "Perl", 2 ] - ], - "id" : "Wanderdoc", - "name" : "Wanderdoc" + ] }, { "id" : "Yet Ebreo", @@ -132,98 +132,98 @@ } ] }, - "chart" : { - "type" : "column" - }, - "title" : { - "text" : "Perl Weekly Challenge - 058" - }, - "legend" : { - "enabled" : 0 - }, "yAxis" : { "title" : { "text" : "Total Solutions" } }, - "tooltip" : { - "pointFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>", - "followPointer" : 1, - "headerFormat" : "<span style='font-size:11px'>{series.name}</span><br/>" - }, - "plotOptions" : { - "series" : { - "dataLabels" : { - "format" : "{point.y}", - "enabled" : 1 - }, - "borderWidth" : 0 - } - }, "series" : [ { + "name" : "Perl Weekly Challenge - 058", + "colorByPoint" : 1, "data" : [ { - "y" : 1, "drilldown" : "Cheok-Yin Fung", - "name" : "Cheok-Yin Fung" + "name" : "Cheok-Yin Fung", + "y" : 1 }, { + "name" : "E. Choroba", "y" : 2, - "drilldown" : "E. Choroba", - "name" : "E. Choroba" + "drilldown" : "E. Choroba" }, { + "name" : "Javier Luque", "y" : 5, - "drilldown" : "Javier Luque", - "name" : "Javier Luque" + "drilldown" : "Javier Luque" }, { - "name" : "Jorg Sommrey", "drilldown" : "Jorg Sommrey", + "name" : "Jorg Sommrey", "y" : 1 }, { + "drilldown" : "Luca Ferrari", "y" : 4, - "name" : "Luca Ferrari", - "drilldown" : "Luca Ferrari" + "name" : "Luca Ferrari" }, { + "drilldown" : "Mark Anderson", "y" : 2, - "name" : "Mark Anderson", - "drilldown" : "Mark Anderson" + "name" : "Mark Anderson" }, { - "y" : 3, - "drilldown" : "Mohammad S Anwar", - "name" : "Mohammad S Anwar" + "name" : "Mohammad S Anwar", + "y" : 4, + "drilldown" : "Mohammad S Anwar" }, { - "y" : 2, + "drilldown" : "Roger Bell_West", "name" : "Roger Bell_West", - "drilldown" : "Roger Bell_West" + "y" : 2 }, { - "y" : 1, "drilldown" : "Simon Proctor", + "y" : 1, "name" : "Simon Proctor" }, { "y" : 2, - "drilldown" : "Wanderdoc", - "name" : "Wanderdoc" + "name" : "Wanderdoc", + "drilldown" : "Wanderdoc" }, { "y" : 2, "name" : "Yet Ebreo", "drilldown" : "Yet Ebreo" } - ], - "name" : "Perl Weekly Challenge - 058", - "colorByPoint" : 1 + ] } ], "xAxis" : { "type" : "category" + }, + "chart" : { + "type" : "column" + }, + "plotOptions" : { + "series" : { + "borderWidth" : 0, + "dataLabels" : { + "format" : "{point.y}", + "enabled" : 1 + } + } + }, + "title" : { + "text" : "Perl Weekly Challenge - 058" + }, + "subtitle" : { + "text" : "[Champions: 11] Last updated at 2020-04-30 16:01:23 GMT" + }, + "tooltip" : { + "headerFormat" : "<span style='font-size:11px'>{series.name}</span><br/>", + "followPointer" : 1, + "pointFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>" } } diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json index 150a0a8dca..30cb1fe448 100644 --- a/stats/pwc-language-breakdown-summary.json +++ b/stats/pwc-language-breakdown-summary.json @@ -1,27 +1,19 @@ { - "chart" : { - "type" : "column" - }, - "subtitle" : { - "text" : "Last updated at 2020-04-30 07:31:27 GMT" - }, - "tooltip" : { - "pointFormat" : "<b>{point.y:.0f}</b>" - }, - "legend" : { - "enabled" : "false" - }, - "yAxis" : { - "min" : 0, - "title" : { - "text" : null - } - }, - "title" : { - "text" : "Perl Weekly Challenge Contributions [2019 - 2020]" - }, "series" : [ { + "dataLabels" : { + "y" : 10, + "color" : "#FFFFFF", + "style" : { + "fontSize" : "13px", + "fontFamily" : "Verdana, sans-serif" + }, + "format" : "{point.y:.0f}", + "align" : "right", + "enabled" : "true", + "rotation" : -90 + }, + "name" : "Contributions", "data" : [ [ "Blog", @@ -33,24 +25,17 @@ ], [ "Raku", - 1529 + 1530 ] - ], - "dataLabels" : { - "enabled" : "true", - "color" : "#FFFFFF", - "y" : 10, - "align" : "right", - "format" : "{point.y:.0f}", - "rotation" : -90, - "style" : { - "fontSize" : "13px", - "fontFamily" : "Verdana, sans-serif" - } - }, - "name" : "Contributions" + ] } ], + "yAxis" : { + "title" : { + "text" : null + }, + "min" : 0 + }, "xAxis" : { "type" : "category", "labels" : { @@ -59,5 +44,20 @@ "fontFamily" : "Verdana, sans-serif" } } + }, + "chart" : { + "type" : "column" + }, + "legend" : { + "enabled" : "false" + }, + "tooltip" : { + "pointFormat" : "<b>{point.y:.0f}</b>" + }, + "title" : { + "text" : "Perl Weekly Challenge Contributions [2019 - 2020]" + }, + "subtitle" : { + "text" : "Last updated at 2020-04-30 16:01:23 GMT" } } diff --git a/stats/pwc-language-breakdown.json b/stats/pwc-language-breakdown.json index 1c0679b64e..ee98826d26 100644 --- a/stats/pwc-language-breakdown.json +++ b/stats/pwc-language-breakdown.json @@ -1,72 +1,93 @@ { - "xAxis" : { - "type" : "category" + "tooltip" : { + "headerFormat" : "<span style=\"font-size:11px\"></span>", + "pointFormat" : "<span style=\"color:{point.color}\">Challenge {point.name}</span>: <b>{point.y:f}</b><br/>", + "followPointer" : "true" + }, + "title" : { + "text" : "Perl Weekly Challenge Language" + }, + "subtitle" : { + "text" : "Click the columns to drilldown the language breakdown. Last updated at 2020-04-30 16:01:23 GMT" }, "plotOptions" : { "series" : { + "borderWidth" : 0, "dataLabels" : { - "enabled" : 1, - "format" : "{point.y}" - }, - "borderWidth" : 0 + "format" : "{point.y}", + "enabled" : 1 + } + } + }, + "chart" : { + "type" : "column" + }, + "xAxis" : { + "type" : "category" + }, + "yAxis" : { + "title" : { + "text" : "Total Solutions" } }, "series" : [ { + "name" : "Perl Weekly Challenge Languages", + "colorByPoint" : "true", "data" : [ { + "name" : "#001", "y" : 140, - "drilldown" : "001", - "name" : "#001" + "drilldown" : "001" }, { - "y" : 109, "drilldown" : "002", - "name" : "#002" + "name" : "#002", + "y" : 109 }, { "name" : "#003", - "drilldown" : "003", - "y" : 71 + "y" : 71, + "drilldown" : "003" }, { - "y" : 91, "drilldown" : "004", + "y" : 91, "name" : "#004" }, { - "y" : 71, "name" : "#005", + "y" : 71, "drilldown" : "005" }, { - "name" : "#006", "drilldown" : "006", - "y" : 52 + "y" : 52, + "name" : "#006" }, { - "y" : 58, "drilldown" : "007", - "name" : "#007" + "name" : "#007", + "y" : 58 }, { + "name" : "#008", "y" : 70, - "drilldown" : "008", - "name" : "#008" + "drilldown" : "008" }, { + "y" : 68, "name" : "#009", - "drilldown" : "009", - "y" : 68 + "drilldown" : "009" }, { - "drilldown" : "010", "name" : "#010", - "y" : 60 + "y" : 60, + "drilldown" : "010" }, { - "y" : 79, "drilldown" : "011", + "y" : 79, "name" : "#011" }, { @@ -76,33 +97,33 @@ }, { "drilldown" : "013", - "name" : "#013", - "y" : 76 + "y" : 76, + "name" : "#013" }, { + "drilldown" : "014", "y" : 96, - "name" : "#014", - "drilldown" : "014" + "name" : "#014" }, { - "drilldown" : "015", "name" : "#015", - "y" : 93 + "y" : 93, + "drilldown" : "015" }, { + "drilldown" : "016", "y" : 66, - "name" : "#016", - "drilldown" : "016" + "name" : "#016" }, { - "drilldown" : "017", "name" : "#017", - "y" : 79 + "y" : 79, + "drilldown" : "017" }, { - "y" : 76, + "drilldown" : "018", "name" : "#018", - "drilldown" : "018" + "y" : 76 }, { "drilldown" : "019", @@ -110,14 +131,14 @@ "y" : 97 }, { - "name" : "#020", "drilldown" : "020", - "y" : 95 + "y" : 95, + "name" : "#020" }, { "name" : "#021", - "drilldown" : "021", - "y" : 67 + "y" : 67, + "drilldown" : "021" }, { "drilldown" : "022", @@ -126,8 +147,8 @@ }, { "name" : "#023", - "drilldown" : "023", - "y" : 91 + "y" : 91, + "drilldown" : "023" }, { "y" : 70, @@ -136,8 +157,8 @@ }, { "drilldown" : "025", - "name" : "#025", - "y" : 55 + "y" : 55, + "name" : "#025" }, { "drilldown" : "026", @@ -145,14 +166,14 @@ "y" : 70 }, { + "name" : "#027", "y" : 58, - "drilldown" : "027", - "name" : "#027" + "drilldown" : "027" }, { "name" : "#028", - "drilldown" : "028", - "y" : 78 + "y" : 78, + "drilldown" : "028" }, { "y" : 77, @@ -160,34 +181,34 @@ "drilldown" : "029" }, { - "name" : "#030", "drilldown" : "030", - "y" : 115 + "y" : 115, + "name" : "#030" }, { - "y" : 87, + "drilldown" : "031", "name" : "#031", - "drilldown" : "031" + "y" : 87 }, { "drilldown" : "032", - "name" : "#032", - "y" : 92 + "y" : 92, + "name" : "#032" }, { - "drilldown" : "033", "name" : "#033", - "y" : 108 + "y" : 108, + "drilldown" : "033" }, { - "drilldown" : "034", "name" : "#034", - "y" : 62 + "y" : 62, + "drilldown" : "034" }, { + "y" : 62, "name" : "#035", - "drilldown" : "035", - "y" : 62 + "drilldown" : "035" }, { "drilldown" : "036", @@ -196,33 +217,33 @@ }, { "drilldown" : "037", - "name" : "#037", - "y" : 63 + "y" : 63, + "name" : "#037" }, { - "name" : "#038", "drilldown" : "038", + "name" : "#038", "y" : 65 }, { - "y" : 60, "drilldown" : "039", - "name" : "#039" + "name" : "#039", + "y" : 60 }, { "y" : 71, - "drilldown" : "040", - "name" : "#040" + "name" : "#040", + "drilldown" : "040" }, { - "y" : 74, "name" : "#041", + "y" : 74, "drilldown" : "041" }, { "drilldown" : "042", - "name" : "#042", - "y" : 88 + "y" : 88, + "name" : "#042" }, { "drilldown" : "043", @@ -230,14 +251,14 @@ "y" : 65 }, { - "y" : 81, "drilldown" : "044", - "name" : "#044" + "name" : "#044", + "y" : 81 }, { "drilldown" : "045", - "name" : "#045", - "y" : 94 + "y" : 94, + "name" : "#045" }, { "drilldown" : "046", @@ -245,19 +266,19 @@ "y" : 85 }, { - "drilldown" : "047", + "y" : 82, "name" : "#047", - "y" : 82 + "drilldown" : "047" }, { + "drilldown" : "048", "y" : 106, - "name" : "#048", - "drilldown" : "048" + "name" : "#048" }, { - "y" : 85, + "drilldown" : "049", "name" : "#049", - "drilldown" : "049" + "y" : 85 }, { "y" : 96, @@ -265,69 +286,52 @@ "drilldown" : "050" }, { + "drilldown" : "051", "y" : 87, - "name" : "#051", - "drilldown" : "051" + "name" : "#051" }, { "y" : 89, - "drilldown" : "052", - "name" : "#052" + "name" : "#052", + "drilldown" : "052" }, { "name" : "#053", - "drilldown" : "053", - "y" : 99 + "y" : 99, + "drilldown" : "053" }, { - "y" : 97, + "drilldown" : "054", "name" : "#054", - "drilldown" : "054" + "y" : 97 }, { - "name" : "#055", "drilldown" : "055", - "y" : 86 + "y" : 86, + "name" : "#055" }, { - "y" : 92, "drilldown" : "056", - "name" : "#056" + "name" : "#056", + "y" : 92 }, { + "y" : 75, "name" : "#057", - "drilldown" : "057", - "y" : 75 + "drilldown" : "057" }, { - "drilldown" : "058", "name" : "#058", - "y" : 25 + "y" : 26, + "drilldown" : "058" } - ], - "colorByPoint" : "true", - "name" : "Perl Weekly Challenge Languages" + ] } ], - "legend" : { - "enabled" : "false" - }, - "yAxis" : { - "title" : { - "text" : "Total Solutions" - } - }, - "tooltip" : { - "followPointer" : "true", - "pointFormat" : "<span style=\"color:{point.color}\">Challenge {point.name}</span>: <b>{point.y:f}</b><br/>", - "headerFormat" : "<span style=\"font-size:11px\"></span>" - }, - "title" : { - "text" : "Perl Weekly Challenge Language" - }, "drilldown" : { "series" : [ { + "id" : "001", "data" : [ [ "Perl", @@ -342,11 +346,9 @@ 11 ] ], - "id" : "001", "name" : "001" }, { - "id" : "002", "data" : [ [ "Perl", @@ -361,11 +363,11 @@ 10 ] ], + "id" : "002", "name" : "002" }, { "name" : "003", - "id" : "003", "data" : [ [ "Perl", @@ -379,10 +381,11 @@ "Blog", 9 ] - ] + ], + "id" : "003" }, { - "id" : "004", + "name" : "004", "data" : [ [ "Perl", @@ -397,9 +400,10 @@ 10 ] ], - "name" : "004" + "id" : "004" }, { + "name" : "005", "id" : "005", "data" : [ [ @@ -414,11 +418,9 @@ "Blog", 12 ] - ], - "name" : "005" + ] }, { - "name" : "006", "id" : "006", "data" : [ [ @@ -433,9 +435,11 @@ "Blog", 7 ] - ] + ], + "name" : "006" }, { + "id" : "007", "data" : [ [ "Perl", @@ -450,10 +454,10 @@ 10 ] ], - "id" : "007", "name" : "007" }, { + "name" : "008", "id" : "008", "data" : [ [ @@ -468,10 +472,11 @@ "Blog", 12 ] - ], - "name" : "008" + ] }, { + "name" : "009", + "id" : "009", "data" : [ [ "Perl", @@ -485,9 +490,7 @@ "Blog", 13 ] - ], - "id" : "009", - "name" : "009" + ] }, { "name" : "010", @@ -508,7 +511,6 @@ ] }, { - "name" : "011", "data" : [ [ "Perl", @@ -523,10 +525,10 @@ 10 ] ], - "id" : "011" + "id" : "011", + "name" : "011" }, { - "name" : "012", "id" : "012", "data" : [ [ @@ -541,9 +543,12 @@ "Blog", 11 ] - ] + ], + "name" : "012" }, { + "name" : "013", + "id" : "013", "data" : [ [ "Perl", @@ -557,11 +562,10 @@ "Blog", 13 ] - ], - "id" : "013", - "name" : "013" + ] }, { + "name" : "014", "id" : "014", "data" : [ [ @@ -576,11 +580,9 @@ "Blog", 15 ] - ], - "name" : "014" + ] }, { - "id" : "015", "data" : [ [ "Perl", @@ -595,9 +597,12 @@ 15 ] ], + "id" : "015", "name" : "015" }, { + "name" : "016", + "id" : "016", "data" : [ [ "Perl", @@ -611,12 +616,11 @@ "Blog", 12 ] - ], - "id" : "016", - "name" : "016" + ] }, { "name" : "017", + "id" : "017", "data" : [ [ "Perl", @@ -630,8 +634,7 @@ "Blog", 12 ] - ], - "id" : "017" + ] }, { "id" : "018", @@ -671,7 +674,6 @ |
