aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMohammad S Anwar <mohammad.anwar@yahoo.com>2020-07-06 03:17:26 +0100
committerMohammad S Anwar <mohammad.anwar@yahoo.com>2020-07-06 03:17:26 +0100
commit614d2465fc4eac0cf954bee787ec72527138194d (patch)
treeee5213d2c947a9947917a4cbb9bb639b6108fd9d
parent547c2df06e540d00a81f2667b60a2ef10e18c872 (diff)
downloadperlweeklychallenge-club-614d2465fc4eac0cf954bee787ec72527138194d.tar.gz
perlweeklychallenge-club-614d2465fc4eac0cf954bee787ec72527138194d.tar.bz2
perlweeklychallenge-club-614d2465fc4eac0cf954bee787ec72527138194d.zip
- Added solutions by Colin Crain.
-rw-r--r--challenge-067/colin-crain/blog.txt1
-rw-r--r--challenge-067/colin-crain/perl/ch-1.pl62
-rw-r--r--challenge-067/colin-crain/perl/ch-2.pl72
-rw-r--r--challenge-067/colin-crain/raku/ch-1.p629
-rw-r--r--challenge-067/colin-crain/raku/ch-2.p665
-rw-r--r--stats/pwc-current.json485
-rw-r--r--stats/pwc-language-breakdown-summary.json52
-rw-r--r--stats/pwc-language-breakdown.json546
-rw-r--r--stats/pwc-leaders.json372
-rw-r--r--stats/pwc-summary-1-30.json112
-rw-r--r--stats/pwc-summary-121-150.json40
-rw-r--r--stats/pwc-summary-151-180.json76
-rw-r--r--stats/pwc-summary-31-60.json38
-rw-r--r--stats/pwc-summary-61-90.json50
-rw-r--r--stats/pwc-summary-91-120.json130
-rw-r--r--stats/pwc-summary.json48
16 files changed, 1215 insertions, 963 deletions
diff --git a/challenge-067/colin-crain/blog.txt b/challenge-067/colin-crain/blog.txt
new file mode 100644
index 0000000000..089611788d
--- /dev/null
+++ b/challenge-067/colin-crain/blog.txt
@@ -0,0 +1 @@
+https://colincrain.wordpress.com/2020/07/06/combos-convos-and-cellphones/
diff --git a/challenge-067/colin-crain/perl/ch-1.pl b/challenge-067/colin-crain/perl/ch-1.pl
new file mode 100644
index 0000000000..81a8714697
--- /dev/null
+++ b/challenge-067/colin-crain/perl/ch-1.pl
@@ -0,0 +1,62 @@
+#! /opt/local/bin/perl
+#
+# number_combo_convo.pl
+#
+# TASK #1 › Number Combinations
+# Submitted by: Mohammad S Anwar
+#
+# You are given two integers $max and $elems. Write a script print all
+# possible combinations of $elems numbers from the list 1 2 3 … $max.
+#
+# Every combination should be sorted i.e. [2,3] is valid
+# combination but [3,2] is not.
+#
+# Example:
+# Input: $max = 5, $elems = 2
+#
+# Output: [ [1,2], [1,3], [1,4], [1,5], [2,3], [2,4], [2,5], [3,4], [3,5], [4,5] ]
+#
+#
+# 2020 colin crain
+## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ##
+
+
+
+use warnings;
+use strict;
+use feature ":5.26";
+
+## ## ## ## ## MAIN:
+
+my ($max, $elems) = @ARGV;
+
+($elems > $max or @ARGV < 2) and do {
+ say "Usage: ./number_combos.pl max elements
+ max cannot be less than # of elements";
+ exit };
+
+my @list = add_elements( $max, $elems, [[]] )->@*;
+
+say ( "[" . (join ', ', map { "[". (join ',', $_->@*) . "]" } @list) . "]");
+
+
+## ## ## ## ## SUBS:
+
+sub add_elements {
+ my ($max, $elems, $list) = @_;
+ return $list if $list->[0]->@* == $elems;
+
+ my @newlist = ();
+
+ my $pos = $list->[0]->@* + 1; ## this position, elems of prev list + 1
+
+ for my $combo ( $list->@* ) {
+ my $prev = $combo->[-1] // 0;
+ my $start = $prev + 1; ## value of last elem in list + 1
+ my $end = $max - $elems + $pos; ## max - length + position
+ for ($start .. $end ) {
+ push @newlist, [ $combo->@*, $_ ]
+ }
+ }
+ return add_elements( $max, $elems, \@newlist);
+}
diff --git a/challenge-067/colin-crain/perl/ch-2.pl b/challenge-067/colin-crain/perl/ch-2.pl
new file mode 100644
index 0000000000..fc902fcfd0
--- /dev/null
+++ b/challenge-067/colin-crain/perl/ch-2.pl
@@ -0,0 +1,72 @@
+#! /opt/local/bin/perl
+#
+# hooked_on_phonics.pl
+#
+# TASK #2 › Letter Phone
+# Submitted by: Mohammad S Anwar
+#
+# You are given a digit string $S. Write a script to print all
+# possible letter combinations that the given digit string could
+# represent.
+#
+# Letter Phone
+# 2 --> ABC
+# 3 --> DEF
+# 4 --> GHI
+# 5 --> JKL
+# 6 --> MNO
+# 7 --> PQRS
+# 8 --> TUV
+# 9 --> WXYZ
+#
+#
+# Example:
+# Input: $S = '35'
+#
+# Output: ["dj", "dk", "dl", "ej", "ek", "el", "fj", "fk", "fl"].
+#
+# 2020 colin crain
+## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ##
+
+
+use warnings;
+use strict;
+use feature ":5.26";
+
+## ## ## ## ## MAIN:
+
+my $input = $ARGV[0] // '5273';
+$input =~ s/\W//g; ## tolerate phone number formats, strip punct chars
+($input =~ /[^2-9]/) and
+ die "only numbers between 2 through 9 can be alphabetized\n";
+
+my @digits = split //, $input;
+
+my %encode = ( 2 => ["a", "b", "c"],
+ 3 => ["d", "e", "f"],
+ 4 => ["g", "h", "i"],
+ 5 => ["j", "k", "l"],
+ 6 => ["m", "n", "o"],
+ 7 => ["p", "q", "r", "s"],
+ 8 => ["t", "u", "v"],
+ 9 => ["w", "x", "y", "z"] );
+my $list = $encode{(shift @digits)};
+
+my @list = make_strings(\%encode, \@digits, $list)->@*;
+say $_ for @list;
+
+## ## ## ## ## SUBS:
+
+sub make_strings {
+ my ($encode, $digits, $list) = @_;
+ return $list unless $digits->@*;
+
+ my @newlist = ();
+ my $digit = shift $digits->@*;
+ for my $str ( $list->@* ) {
+ for ( $encode->{$digit}->@* ) {
+ push @newlist, $str . $_;
+ }
+ }
+ return make_strings( $encode, $digits, \@newlist);
+}
diff --git a/challenge-067/colin-crain/raku/ch-1.p6 b/challenge-067/colin-crain/raku/ch-1.p6
new file mode 100644
index 0000000000..b73604d82c
--- /dev/null
+++ b/challenge-067/colin-crain/raku/ch-1.p6
@@ -0,0 +1,29 @@
+#!/usr/bin/env perl6
+#
+#
+# number_combo_convo.raku
+#
+# TASK #1 › Number Combinations
+# Submitted by: Mohammad S Anwar
+#
+# You are given two integers $max and $elems. Write a script print all
+# possible combinations of $elems numbers from the list 1 2 3 … $max.
+#
+# Every combination should be sorted i.e. [2,3] is valid
+# combination but [3,2] is not.
+#
+# Example:
+# Input: $max = 5, $elems = 2
+#
+# Output: [ [1,2], [1,3], [1,4], [1,5], [2,3], [2,4], [2,5], [3,4], [3,5], [4,5] ]
+#
+#
+# 2020 colin crain
+## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ##
+
+
+
+sub MAIN ( Int $max = 5, Int $elems = 3 ) {
+
+ .say for (1..$max).combinations: $elems;
+}
diff --git a/challenge-067/colin-crain/raku/ch-2.p6 b/challenge-067/colin-crain/raku/ch-2.p6
new file mode 100644
index 0000000000..d102b4e96f
--- /dev/null
+++ b/challenge-067/colin-crain/raku/ch-2.p6
@@ -0,0 +1,65 @@
+#!/usr/bin/env perl6
+#
+#
+# hooked_on_phonics.raku
+#
+# TASK #2 › Letter Phone
+# Submitted by: Mohammad S Anwar
+#
+# You are given a digit string $S. Write a script to print all
+# possible letter combinations that the given digit string could
+# represent.
+#
+# Letter Phone
+# 2 --> ABC
+# 3 --> DEF
+# 4 --> GHI
+# 5 --> JKL
+# 6 --> MNO
+# 7 --> PQRS
+# 8 --> TUV
+# 9 --> WXYZ
+#
+#
+# Example:
+# Input: $S = '35'
+#
+# Output: ["dj", "dk", "dl", "ej", "ek", "el", "fj", "fk", "fl"].
+#
+# 2020 colin crain
+#
+# # # # # # # # # # # # # # # # # # #
+
+
+sub MAIN ( Int $input = 527 ) {
+
+ my @digits = $input.comb;
+
+ my %encode = ( 2 => ("a", "b", "c"),
+ 3 => ("d", "e", "f"),
+ 4 => ("g", "h", "i"),
+ 5 => ("j", "k", "l"),
+ 6 => ("m", "n", "o"),
+ 7 => ("p", "q", "r", "s"),
+ 8 => ("t", "u", "v"),
+ 9 => ("w", "x", "y", "z") );
+
+ my @list = |%encode{@digits.shift};
+
+ @list = make_strings(%encode, @digits, @list);
+ .say for @list;
+
+}
+
+sub make_strings (%encode, @digits, @list) {
+ return @list unless @digits.elems > 0;
+
+ my @newlist;
+ my $digit = @digits.shift;
+ for @list -> $str {
+ for ( %encode{$digit}.list ) {
+ @newlist.push: $str ~ $_;
+ }
+ }
+ return make_strings( %encode, @digits, @newlist);
+}
diff --git a/stats/pwc-current.json b/stats/pwc-current.json
index 0c40beea92..cf80cf10a3 100644
--- a/stats/pwc-current.json
+++ b/stats/pwc-current.json
@@ -1,11 +1,182 @@
{
- "legend" : {
- "enabled" : 0
+ "subtitle" : {
+ "text" : "[Champions: 29] Last updated at 2020-07-06 02:17:08 GMT"
+ },
+ "tooltip" : {
+ "followPointer" : 1,
+ "pointFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>",
+ "headerFormat" : "<span style='font-size:11px'>{series.name}</span><br/>"
+ },
+ "title" : {
+ "text" : "Perl Weekly Challenge - 067"
+ },
+ "xAxis" : {
+ "type" : "category"
+ },
+ "chart" : {
+ "type" : "column"
+ },
+ "series" : [
+ {
+ "colorByPoint" : 1,
+ "data" : [
+ {
+ "drilldown" : "Andrew Shitov",
+ "y" : 3,
+ "name" : "Andrew Shitov"
+ },
+ {
+ "drilldown" : "Arne Sommer",
+ "name" : "Arne Sommer",
+ "y" : 5
+ },
+ {
+ "name" : "Athanasius",
+ "y" : 4,
+ "drilldown" : "Athanasius"
+ },
+ {
+ "y" : 2,
+ "name" : "Chenyf",
+ "drilldown" : "Chenyf"
+ },
+ {
+ "drilldown" : "Cheok-Yin Fung",
+ "y" : 3,
+ "name" : "Cheok-Yin Fung"
+ },
+ {
+ "name" : "Colin Crain",
+ "y" : 5,
+ "drilldown" : "Colin Crain"
+ },
+ {
+ "drilldown" : "Dave Jacoby",
+ "y" : 2,
+ "name" : "Dave Jacoby"
+ },
+ {
+ "drilldown" : "Donald Hunter",
+ "y" : 3,
+ "name" : "Donald Hunter"
+ },
+ {
+ "drilldown" : "Duncan C. White",
+ "y" : 2,
+ "name" : "Duncan C. White"
+ },
+ {
+ "y" : 2,
+ "name" : "E. Choroba",
+ "drilldown" : "E. Choroba"
+ },
+ {
+ "y" : 5,
+ "name" : "Jaldhar H. Vyas",
+ "drilldown" : "Jaldhar H. Vyas"
+ },
+ {
+ "y" : 5,
+ "name" : "Javier Luque",
+ "drilldown" : "Javier Luque"
+ },
+ {
+ "y" : 2,
+ "name" : "Jorg Sommrey",
+ "drilldown" : "Jorg Sommrey"
+ },
+ {
+ "y" : 5,
+ "name" : "Laurent Rosenfeld",
+ "drilldown" : "Laurent Rosenfeld"
+ },
+ {
+ "name" : "Leo Manfredi",
+ "y" : 1,
+ "drilldown" : "Leo Manfredi"
+ },
+ {
+ "name" : "Luca Ferrari",
+ "y" : 4,
+ "drilldown" : "Luca Ferrari"
+ },
+ {
+ "name" : "Mark Anderson",
+ "y" : 2,
+ "drilldown" : "Mark Anderson"
+ },
+ {
+ "y" : 7,
+ "name" : "Mohammad S Anwar",
+ "drilldown" : "Mohammad S Anwar"
+ },
+ {
+ "drilldown" : "Niels van Dijke",
+ "name" : "Niels van Dijke",
+ "y" : 2
+ },
+ {
+ "name" : "Noud Aldenhoven",
+ "y" : 2,
+ "drilldown" : "Noud Aldenhoven"
+ },
+ {
+ "drilldown" : "Richard Park",
+ "name" : "Richard Park",
+ "y" : 1
+ },
+ {
+ "y" : 3,
+ "name" : "Roger Bell_West",
+ "drilldown" : "Roger Bell_West"
+ },
+ {
+ "drilldown" : "Shahed Nooshmand",
+ "y" : 3,
+ "name" : "Shahed Nooshmand"
+ },
+ {
+ "drilldown" : "Simon Miner",
+ "y" : 2,
+ "name" : "Simon Miner"
+ },
+ {
+ "y" : 2,
+ "name" : "Simon Proctor",
+ "drilldown" : "Simon Proctor"
+ },
+ {
+ "name" : "Ulrich Rieke",
+ "y" : 3,
+ "drilldown" : "Ulrich Rieke"
+ },
+ {
+ "drilldown" : "Walt Mankowski",
+ "y" : 2,
+ "name" : "Walt Mankowski"
+ },
+ {
+ "y" : 2,
+ "name" : "Wanderdoc",
+ "drilldown" : "Wanderdoc"
+ },
+ {
+ "y" : 2,
+ "name" : "Yet Ebreo",
+ "drilldown" : "Yet Ebreo"
+ }
+ ],
+ "name" : "Perl Weekly Challenge - 067"
+ }
+ ],
+ "yAxis" : {
+ "title" : {
+ "text" : "Total Solutions"
+ }
},
"drilldown" : {
"series" : [
{
- "id" : "Andrew Shitov",
"name" : "Andrew Shitov",
"data" : [
[
@@ -16,9 +187,11 @@
"Blog",
1
]
- ]
+ ],
+ "id" : "Andrew Shitov"
},
{
+ "name" : "Arne Sommer",
"data" : [
[
"Perl",
@@ -33,12 +206,9 @@
1
]
],
- "id" : "Arne Sommer",
- "name" : "Arne Sommer"
+ "id" : "Arne Sommer"
},
{
- "name" : "Athanasius",
- "id" : "Athanasius",
"data" : [
[
"Perl",
@@ -48,45 +218,63 @@
"Raku",
2
]
- ]
+ ],
+ "name" : "Athanasius",
+ "id" : "Athanasius"
},
{
"id" : "Chenyf",
- "name" : "Chenyf",
"data" : [
[
"Raku",
2
]
- ]
+ ],
+ "name" : "Chenyf"
+ },
+ {
+ "id" : "Cheok-Yin Fung",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ],
+ [
+ "Blog",
+ 1
+ ]
+ ],
+ "name" : "Cheok-Yin Fung"
},
{
+ "id" : "Colin Crain",
"data" : [
[
"Perl",
2
],
[
+ "Raku",
+ 2
+ ],
+ [
"Blog",
1
]
],
- "name" : "Cheok-Yin Fung",
- "id" : "Cheok-Yin Fung"
+ "name" : "Colin Crain"
},
{
- "id" : "Dave Jacoby",
"name" : "Dave Jacoby",
"data" : [
[
"Perl",
2
]
- ]
+ ],
+ "id" : "Dave Jacoby"
},
{
- "name" : "Donald Hunter",
- "id" : "Donald Hunter",
"data" : [
[
"Raku",
@@ -96,17 +284,19 @@
"Blog",
1
]
- ]
+ ],
+ "name" : "Donald Hunter",
+ "id" : "Donald Hunter"
},
{
+ "id" : "Duncan C. White",
+ "name" : "Duncan C. White",
"data" : [
[
"Perl",
2
]
- ],
- "id" : "Duncan C. White",
- "name" : "Duncan C. White"
+ ]
},
{
"data" : [
@@ -119,6 +309,8 @@
"id" : "E. Choroba"
},
{
+ "id" : "Jaldhar H. Vyas",
+ "name" : "Jaldhar H. Vyas",
"data" : [
[
"Perl",
@@ -132,13 +324,11 @@
"Blog",
1
]
- ],
- "name" : "Jaldhar H. Vyas",
- "id" : "Jaldhar H. Vyas"
+ ]
},
{
- "name" : "Javier Luque",
"id" : "Javier Luque",
+ "name" : "Javier Luque",
"data" : [
[
"Perl",
@@ -155,18 +345,17 @@
]
},
{
- "name" : "Jorg Sommrey",
- "id" : "Jorg Sommrey",
"data" : [
[
"Perl",
2
]
- ]
+ ],
+ "name" : "Jorg Sommrey",
+ "id" : "Jorg Sommrey"
},
{
"id" : "Laurent Rosenfeld",
- "name" : "Laurent Rosenfeld",
"data" : [
[
"Perl",
@@ -180,19 +369,21 @@
"Blog",
1
]
- ]
+ ],
+ "name" : "Laurent Rosenfeld"
},
{
"name" : "Leo Manfredi",
- "id" : "Leo Manfredi",
"data" : [
[
"Perl",
1
]
- ]
+ ],
+ "id" : "Leo Manfredi"
},
{
+ "id" : "Luca Ferrari",
"data" : [
[
"Raku",
@@ -203,20 +394,20 @@
2
]
],
- "id" : "Luca Ferrari",
"name" : "Luca Ferrari"
},
{
"name" : "Mark Anderson",
- "id" : "Mark Anderson",
"data" : [
[
"Raku",
2
]
- ]
+ ],
+ "id" : "Mark Anderson"
},
{
+ "name" : "Mohammad S Anwar",
"data" : [
[
"Perl",
@@ -231,28 +422,27 @@
3
]
],
- "name" : "Mohammad S Anwar",
"id" : "Mohammad S Anwar"
},
{
+ "id" : "Niels van Dijke",
"data" : [
[
"Perl",
2
]
],
- "name" : "Niels van Dijke",
- "id" : "Niels van Dijke"
+ "name" : "Niels van Dijke"
},
{
+ "id" : "Noud Aldenhoven",
+ "name" : "Noud Aldenhoven",
"data" : [
[
"Raku",
2
]
- ],
- "name" : "Noud Aldenhoven",
- "id" : "Noud Aldenhoven"
+ ]
},
{
"data" : [
@@ -265,7 +455,6 @@
"id" : "Richard Park"
},
{
- "id" : "Roger Bell_West",
"name" : "Roger Bell_West",
"data" : [
[
@@ -276,7 +465,8 @@
"Blog",
1
]
- ]
+ ],
+ "id" : "Roger Bell_West"
},
{
"data" : [
@@ -289,18 +479,18 @@
1
]
],
- "id" : "Shahed Nooshmand",
- "name" : "Shahed Nooshmand"
+ "name" : "Shahed Nooshmand",
+ "id" : "Shahed Nooshmand"
},
{
+ "id" : "Simon Miner",
"data" : [
[
"Perl",
2
]
],
- "name" : "Simon Miner",
- "id" : "Simon Miner"
+ "name" : "Simon Miner"
},
{
"data" : [
@@ -309,11 +499,10 @@
2
]
],
- "id" : "Simon Proctor",
- "name" : "Simon Proctor"
+ "name" : "Simon Proctor",
+ "id" : "Simon Proctor"
},
{
- "name" : "Ulrich Rieke",
"id" : "Ulrich Rieke",
"data" : [
[
@@ -324,217 +513,51 @@
"Raku",
2
]
- ]
+ ],
+ "name" : "Ulrich Rieke"
},
{
+ "name" : "Walt Mankowski",
"data" : [
[
"Perl",
2
]
],
- "id" : "Walt Mankowski",
- "name" : "Walt Mankowski"
+ "id" : "Walt Mankowski"
},
{
"name" : "Wanderdoc",
- "id" : "Wanderdoc",
"data" : [
[
"Perl",
2
]
- ]
+ ],
+ "id" : "Wanderdoc"
},
{
+ "id" : "Yet Ebreo",
"data" : [
[
"Perl",
2
]
],
- "name" : "Yet Ebreo",
- "id" : "Yet Ebreo"
+ "name" : "Yet Ebreo"
}
]
},
- "title" : {
- "text" : "Perl Weekly Challenge - 067"
- },
- "series" : [
- {
- "data" : [
- {
- "name" : "Andrew Shitov",
- "drilldown" : "Andrew Shitov",
- "y" : 3
- },
- {
- "y" : 5,
- "drilldown" : "Arne Sommer",
- "name" : "Arne Sommer"
- },
- {
- "y" : 4,
- "name" : "Athanasius",
- "drilldown" : "Athanasius"
- },
- {
- "y" : 2,
- "name" : "Chenyf",
- "drilldown" : "Chenyf"
- },
- {
- "drilldown" : "Cheok-Yin Fung",
- "name" : "Cheok-Yin Fung",
- "y" : 3
- },
- {
- "name" : "Dave Jacoby",
- "drilldown" : "Dave Jacoby",
- "y" : 2
- },
- {
- "name" : "Donald Hunter",
- "drilldown" : "Donald Hunter",
- "y" : 3
- },
- {
- "name" : "Duncan C. White",
- "drilldown" : "Duncan C. White",
- "y" : 2
- },
- {
- "y" : 2,
- "drilldown" : "E. Choroba",
- "name" : "E. Choroba"
- },
- {
- "name" : "Jaldhar H. Vyas",
- "drilldown" : "Jaldhar H. Vyas",
- "y" : 5
- },
- {
- "y" : 5,
- "drilldown" : "Javier Luque",
- "name" : "Javier Luque"
- },
- {
- "y" : 2,
- "name" : "Jorg Sommrey",
- "drilldown" : "Jorg Sommrey"
- },
- {
- "drilldown" : "Laurent Rosenfeld",
- "name" : "Laurent Rosenfeld",
- "y" : 5
- },
- {
- "drilldown" : "Leo Manfredi",
- "name" : "Leo Manfredi",
- "y" : 1
- },
- {
- "y" : 4,
- "name" : "Luca Ferrari",
- "drilldown" : "Luca Ferrari"
- },
- {
- "drilldown" : "Mark Anderson",
- "name" : "Mark Anderson",
- "y" : 2
- },
- {
- "name" : "Mohammad S Anwar",
- "drilldown" : "Mohammad S Anwar",
- "y" : 7
- },
- {
- "name" : "Niels van Dijke",
- "drilldown" : "Niels van Dijke",
- "y" : 2
- },
- {
- "name" : "Noud Aldenhoven",
- "drilldown" : "Noud Aldenhoven",
- "y" : 2
- },
- {
- "drilldown" : "Richard Park",
- "name" : "Richard Park",
- "y" : 1
- },
- {
- "name" : "Roger Bell_West",
- "drilldown" : "Roger Bell_West",
- "y" : 3
- },
- {
- "y" : 3,
- "name" : "Shahed Nooshmand",
- "drilldown" : "Shahed Nooshmand"
- },
- {
- "name" : "Simon Miner",
- "drilldown" : "Simon Miner",
- "y" : 2
- },
- {
- "name" : "Simon Proctor",
- "drilldown" : "Simon Proctor",
- "y" : 2
- },
- {
- "drilldown" : "Ulrich Rieke",
- "name" : "Ulrich Rieke",
- "y" : 3
- },
- {
- "drilldown" : "Walt Mankowski",
- "name" : "Walt Mankowski",
- "y" : 2
- },
- {
- "y" : 2,
- "name" : "Wanderdoc",
- "drilldown" : "Wanderdoc"
- },
- {
- "y" : 2,
- "name" : "Yet Ebreo",
- "drilldown" : "Yet Ebreo"
- }
- ],
- "colorByPoint" : 1,
- "name" : "Perl Weekly Challenge - 067"
- }
- ],
- "subtitle" : {
- "text" : "[Champions: 28] Last updated at 2020-07-06 00:47:58 GMT"
- },
- "xAxis" : {
- "type" : "category"
- },
- "chart" : {
- "type" : "column"
- },
- "tooltip" : {
- "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/>",
- "followPointer" : 1
- },
- "yAxis" : {
- "title" : {
- "text" : "Total Solutions"
- }
- },
"plotOptions" : {
"series" : {
+ "borderWidth" : 0,
"dataLabels" : {
- "enabled" : 1,
- "format" : "{point.y}"
- },
- "borderWidth" : 0
+ "format" : "{point.y}",
+ "enabled" : 1
+ }
}
+ },
+ "legend" : {
+ "enabled" : 0
}
}
diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json
index 3dd27280a2..5ae3944090 100644
--- a/stats/pwc-language-breakdown-summary.json
+++ b/stats/pwc-language-breakdown-summary.json
@@ -1,37 +1,43 @@
{
+ "chart" : {
+ "type" : "column"
+ },
"series" : [
{
"data" : [
[
"Blog",
- 790
+ 791
],
[
"Perl",
- 2787
+ 2789
],
[
"Raku",
- 1781
+ 1783
]
],
+ "name" : "Contributions",
"dataLabels" : {
- "format" : "{point.y:.0f}",
"rotation" : -90,
- "align" : "right",
"y" : 10,
- "enabled" : "true",
- "color" : "#FFFFFF",
"style" : {
- "fontSize" : "13px",
- "fontFamily" : "Verdana, sans-serif"
- }
- },
- "name" : "Contributions"
+ "fontFamily" : "Verdana, sans-serif",
+ "fontSize" : "13px"
+ },
+ "format" : "{point.y:.0f}",
+ "align" : "right",
+ "enabled" : "true",
+ "color" : "#FFFFFF"
+ }
}
],
- "title" : {
- "text" : "Perl Weekly Challenge Contributions [2019 - 2020]"
+ "yAxis" : {
+ "min" : 0,
+ "title" : {
+ "text" : null
+ }
},
"legend" : {
"enabled" : "false"
@@ -39,25 +45,19 @@
"t