diff options
| -rw-r--r-- | challenge-048/kevin-colyer/raku/ch-1.p6 | 58 | ||||
| -rw-r--r-- | challenge-048/kevin-colyer/raku/ch-2.p6 | 22 | ||||
| -rw-r--r-- | stats/pwc-current.json | 501 | ||||
| -rw-r--r-- | stats/pwc-language-breakdown-summary.json | 60 | ||||
| -rw-r--r-- | stats/pwc-language-breakdown.json | 726 | ||||
| -rw-r--r-- | stats/pwc-leaders.json | 406 | ||||
| -rw-r--r-- | stats/pwc-summary-1-30.json | 108 | ||||
| -rw-r--r-- | stats/pwc-summary-121-150.json | 94 | ||||
| -rw-r--r-- | stats/pwc-summary-31-60.json | 96 | ||||
| -rw-r--r-- | stats/pwc-summary-61-90.json | 112 | ||||
| -rw-r--r-- | stats/pwc-summary-91-120.json | 32 | ||||
| -rw-r--r-- | stats/pwc-summary.json | 348 |
12 files changed, 1329 insertions, 1234 deletions
diff --git a/challenge-048/kevin-colyer/raku/ch-1.p6 b/challenge-048/kevin-colyer/raku/ch-1.p6 new file mode 100644 index 0000000000..ed1dc05d32 --- /dev/null +++ b/challenge-048/kevin-colyer/raku/ch-1.p6 @@ -0,0 +1,58 @@ +#!perl6 +# Task 1 Challenge 048 Solution by +# +# Survivor +# +# There are 50 people standing in a circle in position 1 to 50. The person +# standing at position 1 has a sword. He kills the next person i.e. standing +# at position 2 and pass on the sword to the immediate next i.e. person standing +# at position 3. Now the person at position 3 does the same and it goes on +# until only one survives. +# +# Write a script to find out the survivor. +# + +# fill the circle with 50 alive people = 1's +my @circle = 1 xx 50; + +# helper function to loop around the circle looking for the next living person +sub nextAlive($i) { + my $j=$i; + loop { + # choose next person + $j++; + # loop back if reached end of array + $j=0 if $j>= @circle.elems; + # return index if that person is living... + return $j if @circle[$j]==1; + # prevent infinite loop check + die "No-one alive in circle" if $i==$j; + # and loop + } +} + +my $i=0; +my $j=-1; +say "1 has the sword..."; + +loop { + # choose victim + $j=nextAlive($i); + + # kill them + @circle[$j]=0; + say "{$i+1} killed {$j+1}"; + + # pass the sword on + my $k=nextAlive($j); + + # check exit the loop if we have just passed sword to ourselves - we are the only living one left + last if $i == $k; + + # pass the sword on + $i=$k; + say " and gave sword to {$i+1}"; + # and loop +} + +say "So the survivor is {$i+1}"; diff --git a/challenge-048/kevin-colyer/raku/ch-2.p6 b/challenge-048/kevin-colyer/raku/ch-2.p6 new file mode 100644 index 0000000000..b64834b2b1 --- /dev/null +++ b/challenge-048/kevin-colyer/raku/ch-2.p6 @@ -0,0 +1,22 @@ +#!perl6 +# Task 2 Challenge 048 Solution by +# +# Palindrome Dates +# +# Write a script to print all Palindrome Dates between 2000 and 2999. The +# format of date is mmddyyyy. For example, the first one was on October 2, +# 2001 as it is represented as 10022001. +# + +# Set up a custom string formatter to convert the date to the correct us format (see docs) +my $pwcformat= sub ($self) { sprintf "%02d%02d%04d", .month, .day, .year given $self;}; + +# Construct date object using custom formatter +my $date=Date.new(year => 2001,month=>10,day=>2, formatter => $pwcformat); +my $end=Date.new(year => 3000,month=>1,day=>1); + +while $date < $end { + my $d=$date.Str; + say $date.yyyy-mm-dd ~ " is palindrome: $d" if $d eq $d.flip; + $date.=succ; +} diff --git a/stats/pwc-current.json b/stats/pwc-current.json index 67cc4eff67..372d52edfa 100644 --- a/stats/pwc-current.json +++ b/stats/pwc-current.json @@ -1,211 +1,42 @@ { - "series" : [ - { - "data" : [ - { - "y" : 2, - "drilldown" : "Alexander Karelas", - "name" : "Alexander Karelas" - }, - { - "y" : 4, - "drilldown" : "Alicia Bielsa", - "name" : "Alicia Bielsa" - }, - { - "y" : 2, - "drilldown" : "Andrezgz", - "name" : "Andrezgz" - }, - { - "y" : 3, - "name" : "Arne Sommer", - "drilldown" : "Arne Sommer" - }, - { - "y" : 2, - "drilldown" : "Dave Cross", - "name" : "Dave Cross" - }, - { - "drilldown" : "Dave Jacoby", - "name" : "Dave Jacoby", - "y" : 2 - }, - { - "drilldown" : "Duane Powell", - "name" : "Duane Powell", - "y" : 2 - }, - { - "drilldown" : "E. Choroba", - "name" : "E. Choroba", - "y" : 3 - }, - { - "y" : 2, - "drilldown" : "Ian Rifkin", - "name" : "Ian Rifkin" - }, - { - "drilldown" : "Javier Luque", - "name" : "Javier Luque", - "y" : 5 - }, - { - "y" : 2, - "drilldown" : "Jen Guerra", - "name" : "Jen Guerra" - }, - { - "drilldown" : "Jonas Berlin", - "name" : "Jonas Berlin", - "y" : 2 - }, - { - "name" : "Laurent Rosenfeld", - "drilldown" : "Laurent Rosenfeld", - "y" : 5 - }, - { - "y" : 2, - "name" : "Lubos Kolouch", - "drilldown" : "Lubos Kolouch" - }, - { - "y" : 4, - "name" : "Luca Ferrari", - "drilldown" : "Luca Ferrari" - }, - { - "y" : 2, - "drilldown" : "Mark Anderson", - "name" : "Mark Anderson" - }, - { - "drilldown" : "Markus Holzer", - "name" : "Markus Holzer", - "y" : 3 - }, - { - "drilldown" : "Mohammad S Anwar", - "name" : "Mohammad S Anwar", - "y" : 5 - }, - { - "y" : 2, - "drilldown" : "Noud Aldenhoven", - "name" : "Noud Aldenhoven" - }, - { - "y" : 1, - "name" : "Peter Scott", - "drilldown" : "Peter Scott" - }, - { - "drilldown" : "Phillip Harris", - "name" : "Phillip Harris", - "y" : 2 - }, - { - "y" : 4, - "drilldown" : "Roger Bell West", - "name" : "Roger Bell West" - }, - { - "y" : 6, - "drilldown" : "Ryan Thompson", - "name" : "Ryan Thompson" - }, - { - "name" : "Saif Ahmed", - "drilldown" : "Saif Ahmed", - "y" : 2 - }, - { - "drilldown" : "Simon Proctor", - "name" : "Simon Proctor", - "y" : 3 - }, - { - "name" : "Steven Wilson", - "drilldown" : "Steven Wilson", - "y" : 2 - }, - { - "y" : 2, - "drilldown" : "Ulrich Rieke", - "name" : "Ulrich Rieke" - }, - { - "name" : "User Person", - "drilldown" : "User Person", - "y" : 2 - }, - { - "drilldown" : "Walt Mankowski", - "name" : "Walt Mankowski", - "y" : 2 - }, - { - "y" : 2, - "drilldown" : "Wanderdoc", - "name" : "Wanderdoc" - } - ], - "name" : "Perl Weekly Challenge - 048", - "colorByPoint" : 1 - } - ], - "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/>" - }, - "legend" : { - "enabled" : 0 + "xAxis" : { + "type" : "category" }, "chart" : { "type" : "column" }, - "subtitle" : { - "text" : "[Champions: 30] Last updated at 2020-02-23 07:16:48 GMT" - }, - "title" : { - "text" : "Perl Weekly Challenge - 048" - }, - "xAxis" : { - "type" : "category" - }, "plotOptions" : { "series" : { - "borderWidth" : 0, "dataLabels" : { - "enabled" : 1, - "format" : "{point.y}" - } + "format" : "{point.y}", + "enabled" : 1 + }, + "borderWidth" : 0 } }, + "yAxis" : { + "title" : { + "text" : "Total Solutions" + } + }, + "legend" : { + "enabled" : 0 + }, "drilldown" : { "series" : [ { - "id" : "Alexander Karelas", - "name" : "Alexander Karelas", "data" : [ [ "Perl", 2 ] - ] + ], + "name" : "Alexander Karelas", + "id" : "Alexander Karelas" }, { - "id" : "Alicia Bielsa", "name" : "Alicia Bielsa", + "id" : "Alicia Bielsa", "data" : [ [ "Perl", @@ -218,18 +49,16 @@ ] }, { - "name" : "Andrezgz", "data" : [ [ "Perl", 2 ] ], + "name" : "Andrezgz", "id" : "Andrezgz" }, { - "id" : "Arne Sommer", - "name" : "Arne Sommer", "data" : [ [ "Raku", @@ -239,41 +68,41 @@ "Blog", 1 ] - ] + ], + "name" : "Arne Sommer", + "id" : "Arne Sommer" }, { + "name" : "Dave Cross", + "id" : "Dave Cross", "data" : [ [ "Perl", 2 ] - ], - "name" : "Dave Cross", - "id" : "Dave Cross" + ] }, { - "name" : "Dave Jacoby", "data" : [ [ "Perl", 2 ] ], + "name" : "Dave Jacoby", "id" : "Dave Jacoby" }, { - "id" : "Duane Powell", "data" : [ [ "Perl", 2 ] ], - "name" : "Duane Powell" + "name" : "Duane Powell", + "id" : "Duane Powell" }, { - "id" : "E. Choroba", - "name" : "E. Choroba", "data" : [ [ "Perl", @@ -283,11 +112,13 @@ "Blog", 1 ] - ] + ], + "id" : "E. Choroba", + "name" : "E. Choroba" }, { - "id" : "Ian Rifkin", "name" : "Ian Rifkin", + "id" : "Ian Rifkin", "data" : [ [ "Perl", @@ -314,27 +145,38 @@ ] }, { + "name" : "Jen Guerra", + "id" : "Jen Guerra", "data" : [ [ "Perl", 2 ] - ], - "name" : "Jen Guerra", - "id" : "Jen Guerra" + ] }, { - "id" : "Jonas Berlin", "data" : [ [ "Raku", 2 ] ], + "id" : "Jonas Berlin", "name" : "Jonas Berlin" }, { + "name" : "Kevin Colyer", + "id" : "Kevin Colyer", + "data" : [ + [ + "Raku", + 2 + ] + ] + }, + { "id" : "Laurent Rosenfeld", + "name" : "Laurent Rosenfeld", "data" : [ [ "Perl", @@ -348,21 +190,19 @@ "Blog", 1 ] - ], - "name" : "Laurent Rosenfeld" + ] }, { + "id" : "Lubos Kolouch", + "name" : "Lubos Kolouch", "data" : [ [ "Perl", 2 ] - ], - "name" : "Lubos Kolouch", - "id" : "Lubos Kolouch" + ] }, { - "name" : "Luca Ferrari", "data" : [ [ "Raku", @@ -373,11 +213,12 @@ 2 ] ], - "id" : "Luca Ferrari" + "id" : "Luca Ferrari", + "name" : "Luca Ferrari" }, { - "id" : "Mark Anderson", "name" : "Mark Anderson", + "id" : "Mark Anderson", "data" : [ [ "Raku", @@ -386,6 +227,7 @@ ] }, { + "id" : "Markus Holzer", "name" : "Markus Holzer", "data" : [ [ @@ -396,11 +238,9 @@ "Raku", 2 ] - ], - "id" : "Markus Holzer" + ] }, { - "name" : "Mohammad S Anwar", "data" : [ [ "Perl", @@ -415,11 +255,12 @@ 1 ] ], + "name" : "Mohammad S Anwar", "id" : "Mohammad S Anwar" }, { - "id" : "Noud Aldenhoven", "name" : "Noud Aldenhoven", + "id" : "Noud Aldenhoven", "data" : [ [ "Raku", @@ -434,20 +275,21 @@ 1 ] ], - "name" : "Peter Scott", - "id" : "Peter Scott" + "id" : "Peter Scott", + "name" : "Peter Scott" }, { + "name" : "Phillip Harris", "id" : "Phillip Harris", "data" : [ [ "Perl", 2 ] - ], - "name" : "Phillip Harris" + ] }, { + "id" : "Roger Bell West", "name" : "Roger Bell West", "data" : [ [ @@ -458,12 +300,9 @@ "Raku", 2 ] - ], - "id" : "Roger Bell West" + ] }, { - "id" : "Ryan Thompson", - "name" : "Ryan Thompson", "data" : [ [ "Perl", @@ -477,21 +316,21 @@ "Blog", 2 ] - ] + ], + "id" : "Ryan Thompson", + "name" : "Ryan Thompson" }, { + "id" : "Saif Ahmed", + "name" : "Saif Ahmed", "data" : [ [ "Perl", 2 ] - ], - "name" : "Saif Ahmed", - "id" : "Saif Ahmed" + ] }, { - "id" : "Simon Proctor", - "name" : "Simon Proctor", "data" : [ [ "Raku", @@ -501,21 +340,21 @@ "Blog", 1 ] - ] + ], + "name" : "Simon Proctor", + "id" : "Simon Proctor" }, { - "id" : "Steven Wilson", - "name" : "Steven Wilson", "data" : [ [ "Perl", 2 ] - ] + ], + "name" : "Steven Wilson", + "id" : "Steven Wilson" }, { - "id" : "Ulrich Rieke", - "name" : "Ulrich Rieke", "data" : [ [ "Perl", @@ -525,17 +364,19 @@ "Raku", 1 ] - ] + ], + "name" : "Ulrich Rieke", + "id" : "Ulrich Rieke" }, { "name" : "User Person", + "id" : "User Person", "data" : [ [ "Perl", 2 ] - ], - "id" : "User Person" + ] }, { "id" : "Walt Mankowski", @@ -548,15 +389,189 @@ ] }, { + "name" : "Wanderdoc", "id" : "Wanderdoc", "data" : [ [ "Perl", 2 ] - ], - "name" : "Wanderdoc" + ] } ] - } + }, + "tooltip" : { + "followPointer" : 1, + "headerFormat" : "<span style='font-size:11px'>{series.name}</span><br/>", + "pointFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>" + }, + "subtitle" : { + "text" : "[Champions: 31] Last updated at 2020-02-23 07:33:42 GMT" + }, + "title" : { + "text" : "Perl Weekly Challenge - 048" + }, + "series" : [ + { + "name" : "Perl Weekly Challenge - 048", + "colorByPoint" : 1, + "data" : [ + { + "y" : 2, + "name" : "Alexander Karelas", + "drilldown" : "Alexander Karelas" + }, + { + "name" : "Alicia Bielsa", + "drilldown" : "Alicia Bielsa", + "y" : 4 + }, + { + "drilldown" : "Andrezgz", + "name" : "Andrezgz", + "y" : 2 + }, + { + "y" : 3, + "name" : "Arne Sommer", + "drilldown" : "Arne Sommer" + }, + { + "name" : "Dave Cross", + "drilldown" : "Dave Cross", + "y" : 2 + }, + { + "name" : "Dave Jacoby", + "drilldown" : "Dave Jacoby", + "y" : 2 + }, + { + "name" : "Duane Powell", + "drilldown" : "Duane Powell", + "y" : 2 + }, + { + "name" : "E. Choroba", + "drilldown" : "E. Choroba", + "y" : 3 + }, + { + "y" : 2, + "name" : "Ian Rifkin", + "drilldown" : "Ian Rifkin" + }, + { + "name" : "Javier Luque", + "drilldown" : "Javier Luque", + "y" : 5 + }, + { + "name" : "Jen Guerra", + "drilldown" : "Jen Guerra", + "y" : 2 + }, + { + "drilldown" : "Jonas Berlin", + "name" : "Jonas Berlin", + "y" : 2 + }, + { + "drilldown" : "Kevin Colyer", + "name" : "Kevin Colyer", + "y" : 2 + }, + { + "y" : 5, + "drilldown" : "Laurent Rosenfeld", + "name" : "Laurent Rosenfeld" + }, + { + "y" : 2, + "name" : "Lubos Kolouch", + "drilldown" : "Lubos Kolouch" + }, + { + "name" : "Luca Ferrari", + "drilldown" : "Luca Ferrari", + "y" : 4 + }, + { + "name" : "Mark Anderson", + "drilldown" : "Mark Anderson", + "y" : 2 + }, + { + "y" : 3, + "drilldown" : "Markus Holzer", + "name" : "Markus Holzer" + }, + { + "y" : 5, + "name" : "Mohammad S Anwar", + "drilldown" : "Mohammad S Anwar" + }, + { + "name" : "Noud Aldenhoven", + "drilldown" : "Noud Aldenhoven", + "y" : 2 + }, + { + "y" : 1, + "drilldown" : "Peter Scott", + "name" : "Peter Scott" + }, + { + "drilldown" : "Phillip Harris", + "name" : "Phillip Harris", + "y" : 2 + }, + { + "name" : "Roger Bell West", + "drilldown" : "Roger Bell West", + "y" : 4 + }, + { + "name" : "Ryan Thompson", + "drilldown" : "Ryan Thompson", + "y" : 6 + }, + { + "drilldown" : "Saif Ahmed", + "name" : "Saif Ahmed", + "y" : 2 + }, + { + "y" : 3, + "name" : "Simon Proctor", + "drilldown" : "Simon Proctor" + }, + { + "y" : 2, + "drilldown" : "Steven Wilson", + "name" : "Steven Wilson" + }, + { + "y" : 2, + "name" : "Ulrich Rieke", + "drilldown" : "Ulrich Rieke" + }, + { + "y" : 2, + "name" : "User Person", + "drilldown" : "User Person" + }, + { + "name" : "Walt Mankowski", + "drilldown" : "Walt Mankowski", + "y" : 2 + }, + { + "drilldown" : "Wanderdoc", + "name" : "Wanderdoc", + "y" : 2 + } + ] + } + ] } diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json index 743c06166e..1f8fee00db 100644 --- a/stats/pwc-language-breakdown-summary.json +++ b/stats/pwc-language-breakdown-summary.json @@ -1,21 +1,28 @@ { "subtitle" : { - "text" : "Last updated at 2020-02-23 07:16:48 GMT" + "text" : "Last updated at 2020-02-23 07:33:42 GMT" + }, + "tooltip" : { + "pointFormat" : "<b>{point.y:.0f}</b>" }, "title" : { "text" : "Perl Weekly Challenge Contributions [2019 - 2020]" }, - "xAxis" : { - "type" : "category", - "labels" : { - "style" : { - "fontFamily" : "Verdana, sans-serif", - "fontSize" : "13px" - } - } - }, "series" : [ { + "name" : "Contributions", + "dataLabels" : { + "rotation" : -90, + "align" : "right", + "color" : "#FFFFFF", + "enabled" : "true", + "style" : { + "fontSize" : "13px", + "fontFamily" : "Verdana, sans-serif" + }, + "format" : "{point.y:.0f}", + "y" : 10 + }, "data" : [ [ "Blog", @@ -27,37 +34,30 @@ ], [ "Raku", - 1217 + 1219 ] - ], - "name" : "Contributions", - "dataLabels" : { - "style" : { - "fontSize" : "13px", - "fontFamily" : "Verdana, sans-serif" - }, - "enabled" : "true", - "format" : "{point.y:.0f}", - "rotation" : -90, - "y" : 10, - "align" : "right", - "color" : "#FFFFFF" - } + ] } ], "yAxis" : { - "min" : 0, "title" : { "text" : null - } + }, + "min" : 0 }, "legend" : { "enabled" : "false" }, + "xAxis" : { + "type" : "category", + "labels" : { + "style" : { + "fontFamily" : "Verdana, sans-serif", + "fontSize" : "13px" + } + } + }, "chart" : { "type" : "column" - }, - "tooltip" : { - "pointFormat" : "<b>{point.y:.0f}</b>" } } diff --git a/stats/pwc-language-breakdown.json b/stats/pwc-language-breakdown.json index 9321da17e4..f5ddbdef36 100644 --- a/stats/pwc-language-breakdown.json +++ b/stats/pwc-language-breakdown.json @@ -1,25 +1,277 @@ { - "subtitle" : { - "text" : "Click the columns to drilldown the language breakdown. Last updated at 2020-02-23 07:16:48 GMT" - }, - "title" : { - "text" : "Perl Weekly Challenge Language" + "legend" : { + "enabled" : "false" }, "plotOptions" : { "series" : { - "borderWidth" : 0, "dataLabels" : { "format" : "{point.y}", "enabled" : 1 - } + }, + "borderWidth" : 0 } }, - "xAxis" : { - "type" : "category" + "yAxis" : { + "title" : { + "text" : "Total Solutions" + } + }, + "series" : [ + { + "data" : [ + { + "drilldown" : "001", + "name" : "#001", + "y" : 140 + }, + { + "drilldown" : "002", + "name" : "#002", + "y" : 109 + }, + { + "y" : 71, + "drilldown" : "003", + "name" : "#003" + }, + { + "y" : 91, + "name" : "#004", + "drilldown" : "004" + }, + { + "name" : "#005", + "drilldown" : "005", + "y" : 71 + }, + { + "name" : "#006", + "drilldown" : "006", + "y" : 48 + }, + { + "drilldown" : "007", + "name" : "#007", + "y" : 56 + }, + { + "name" : "#008", + "drilldown" : "008", + "y" : 70 + }, + { + "y" : 68, + "drilldown" : "009", + "name" : "#009" + }, + { + "name" : "#010", + "drilldown" : "010", + "y" : 60 + }, + { + "name" : "#011", + "drilldown" : "011", + "y" : 79 + }, + { + "name" : "#012", + "drilldown" : "012", + "y" : 83 + }, + { + "y" : 76, + "name" : "#013", + "drilldown" : "013" + }, + { + "drilldown" : "014", + "name" : "#014", + "y" : 96 + }, + { + "y" : 93, + "drilldown" : "015", + "name" : "#015" + }, + { + "y" : 66, + "name" : "#016", + "drilldown" : "016" + }, + { + "y" : 79, + "drilldown" : "017", + "name" : "#017" + }, + { + "name" : "#018", + "drilldown" : "018", + "y" : 76 + }, + { + "y" : 95, + "drilldown" : "019", + "name" : "#019" + }, + { + "name" : "#020", + "drilldown" : "020", + "y" : 95 + }, + { + "y" : 67, + "drilldown" : "021", + "name" : "#021" + }, + { + "name" : "#022", + "drilldown" : "022", + "y" : 63 + }, + { + "name" : "#023", + "drilldown" : "023", + "y" : 91 + }, + { + "y" : 70, + "name" : "#024", + "drilldown" : "024" + }, + { + "y" : 55, + "name" : "#025", + "drilldown" : "025" + }, + { + "name" : "#026", + "drilldown" : "026", + "y" : 70 + }, + { + "drilldown" : "027", + "name" : "#027", + "y" : 58 + }, + { + "y" : 78, + "name" : "#028", + "drilldown" : "028" + }, + { + "name" : "#029", + "drilldown" : "029", + "y" : 77 + }, + { + "y" : 115, + "drilldown" : "030", + "name" : "#030" + }, + { + "drilldown" : "031", + "name" : "#031", + "y" : 87 + }, + { + "y" : 92, + "name" : "#032", + "drilldown" : "032" + }, + { + "name" : "#033", + "drilldown" : "033", + "y" : 108 + }, + { + "y" : 60, + "drilldown" : "034", + "name" : "#034" + }, + { + "y" : 60, + "drilldown" : "035", + "name" : " |
