From 96602a860bf1744e423f0d41222ff82d70812c0f Mon Sep 17 00:00:00 2001 From: Walt Mankowski Date: Mon, 21 Sep 2020 20:43:20 -0400 Subject: perl code for challenge 79 task 1 --- challenge-079/walt-mankowski/perl/ch-1.pl | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 challenge-079/walt-mankowski/perl/ch-1.pl diff --git a/challenge-079/walt-mankowski/perl/ch-1.pl b/challenge-079/walt-mankowski/perl/ch-1.pl new file mode 100644 index 0000000000..10bc99650f --- /dev/null +++ b/challenge-079/walt-mankowski/perl/ch-1.pl @@ -0,0 +1,23 @@ +#!/usr/bin/env perl +use strict; +use warnings; +use feature qw(:5.32); +use experimental qw(signatures); + +# You are given a positive number $N. + +# Write a script to count the total numbrer of set bits of the binary +# representations of all numbers from 1 to $N and return +# $total_count_set_bit % 1000000007. + +sub bits_set($x) { + my $bin = sprintf "%b", $x; + return $bin =~ tr/1//; +} + +my $MOD = 1000000007; +my $n = $ARGV[0]; +my $sum = 0; +$sum += bits_set($_) for 1..$n; + +say $sum, " ", $sum % $MOD; -- cgit From b503151a14318f0a18b4d27d561612537eca3ae4 Mon Sep 17 00:00:00 2001 From: Walt Mankowski Date: Mon, 21 Sep 2020 21:05:05 -0400 Subject: perl code for challenge 79 task 2 --- challenge-079/walt-mankowski/perl/ch-2.pl | 54 +++++++++++++++++++++++++++++++ 1 file changed, 54 insertions(+) create mode 100644 challenge-079/walt-mankowski/perl/ch-2.pl diff --git a/challenge-079/walt-mankowski/perl/ch-2.pl b/challenge-079/walt-mankowski/perl/ch-2.pl new file mode 100644 index 0000000000..5a58052c37 --- /dev/null +++ b/challenge-079/walt-mankowski/perl/ch-2.pl @@ -0,0 +1,54 @@ +#!/usr/bin/env perl +use strict; +use warnings; +use feature qw(:5.32); +use experimental qw(signatures); +use List::Util qw(max); + +# TASK #2 › Trapped Rain Water +# Submitted by: Mohammad S Anwar +# +# You are given an array of positive numbers @N. +# +# Write a script to represent it as Histogram Chart and find out how +# much water it can trap. + +my @a = @ARGV; + +# build the histogram +my $rows = max(@a); +my $cols = @a; +my @hist; +for my $col (0..$#a) { + for my $row (0..$rows-1) { + $hist[$row][$col] = $row < $a[$col] ? 1 : 0; + } +} + +my $units = 0; +for my $row (1..$rows-1) { + for my $col (1..$cols-1) { + $units++ if trapped($row, $col, $cols, @hist); + } +} + +say $units; + +sub trapped($row, $col, $max_col, @hist) { + # check if we're at a wall + return 0 if $hist[$row][$col]; + + # look for left wall + my $left = 0; + for (my $c = $col-1; $c >= 0 && !$left; $c--) { + $left = 1 if $hist[$row][$c]; + } + + # look for right wall + my $right = 0; + for (my $c = $col+1; $c < $max_col && !$right; $c++) { + $right = 1 if $hist[$row][$c]; + } + + return $left && $right; +} -- cgit From d55984d5e2507ead06af6924087bb15338094171 Mon Sep 17 00:00:00 2001 From: Andrew Shitov Date: Tue, 22 Sep 2020 15:52:47 +0200 Subject: ash: 079-1 in C++ --- challenge-079/ash/cpp/ch-1.cpp | 43 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 43 insertions(+) create mode 100644 challenge-079/ash/cpp/ch-1.cpp diff --git a/challenge-079/ash/cpp/ch-1.cpp b/challenge-079/ash/cpp/ch-1.cpp new file mode 100644 index 0000000000..27596b8967 --- /dev/null +++ b/challenge-079/ash/cpp/ch-1.cpp @@ -0,0 +1,43 @@ +/* + Task 1 from + https://perlweeklychallenge.org/blog/perl-weekly-challenge-079/ +*/ + +#include +#include + +using namespace std; + +int main(int argc, char** argv) { + if (argc != 2) { + cerr << "Usage: ./a.out 42" << endl; + return 1; + } + + stringstream input(argv[1]); + + int n; + input >> n; + + int total_bits = 0; + int scale = 1; + n++; + while (scale <= n) { + int scale2 = scale << 1; + + int fill_full = n / scale2; + int fill_frac = n % scale2; + + int bits_full = fill_full * scale; + int bits_frac = 0; + if (fill_frac > scale) { + bits_frac = fill_frac - scale; + } + + total_bits += bits_full + bits_frac; + + scale = scale2; + } + + cout << "There are " << total_bits << " set bits in the sequence from 1 to " << n << endl; +} -- cgit From 48bce165371e39ab23aee7b7b6c1cbd4c9575dbe Mon Sep 17 00:00:00 2001 From: Abigail Date: Tue, 22 Sep 2020 19:07:16 +0200 Subject: Allow testing bc solutions. We're assuming that bc program contain a function called "main", which should be called with the input, and which return the answer. --- challenge-079/abigail/test.pl | 30 ++++++++++++++++++++++++++---- 1 file changed, 26 insertions(+), 4 deletions(-) diff --git a/challenge-079/abigail/test.pl b/challenge-079/abigail/test.pl index 222475a99b..10eb19dc37 100755 --- a/challenge-079/abigail/test.pl +++ b/challenge-079/abigail/test.pl @@ -17,24 +17,46 @@ use experimental 'signatures'; use Test::More; + my %languages = ( - Perl => ["/opt/perl/bin/perl" => 'pl', 'perl'], - JavaScript => ["/usr/local/bin/node" => 'js', 'node'], + Perl => { + exe => "/opt/perl/bin/perl", + ext => "pl", + }, + JavaScript => { + exe => "/usr/local/bin/node", + ext => "js", + dir => "node", + }, + bc => { + exe => "/usr/bin/bc", + ext => "bc", + filter => 's/.*/main($&)/', + }, ); +my $perl_exe = $languages {Perl} {exe}; foreach my $challenge (1, 2) { my @inputs = or next; subtest "Challenge $challenge" => sub { foreach my $language (sort keys %languages) { - my ($exe, $ext, $dir) = @{$languages {$language}}; + my $info = $languages {$language}; + my $exe = $$info {exe}; + my $ext = $$info {ext}; + my $dir = $$info {dir} // lc $language; + my $filter = $$info {filter} // ''; my $solution = "$dir/ch-$challenge.$ext"; next unless -r $solution; + subtest $language => sub { foreach my $input (@inputs) { my $output_exp = ($input =~ s/input/output/r) . ".exp"; my $exp = `cat $output_exp`; - my $got = `$exe ./$solution < $input`; + + my $got = `$perl_exe -ple '$filter' $input |\ + $exe ./$solution`; + s/\h+$//gm for $exp, $got; is $got, $exp, $input; } -- cgit From 2810b0198d250e761bd59b12ae4756e608a0af36 Mon Sep 17 00:00:00 2001 From: Abigail Date: Tue, 22 Sep 2020 19:10:12 +0200 Subject: bc solution for week-079, part 1 --- challenge-079/abigail/bc/ch-1.bc | 37 +++++++++++++++++++++++++++++++++++++ 1 file changed, 37 insertions(+) create mode 100644 challenge-079/abigail/bc/ch-1.bc diff --git a/challenge-079/abigail/bc/ch-1.bc b/challenge-079/abigail/bc/ch-1.bc new file mode 100644 index 0000000000..bd708a7df8 --- /dev/null +++ b/challenge-079/abigail/bc/ch-1.bc @@ -0,0 +1,37 @@ +# +# Challenge: +# +# You are given a positive number $N. +# +# Write a script to count the total numbrer of set bits of the binary +# representations of all numbers from 1 to $N and return +# $total_count_set_bit % 1000000007. +# +# https://perlweeklychallenge.org/blog/perl-weekly-challenge-079/ +# + +# +# This is A000778 (https://oeis.org/A000788). There's a recursive formala +# for the number of bits in the binary representation of 0 .. $N: +# +# bits (0) = 0 +# bits (2 * N) = bits (N) + bits (N - 1) + N +# bits (2 * N + 1) = 2 * bits (N) + N + 1 +# + +bignum = 1000000007; + +define f(nn) { + auto n; + if (nn == 0) {return (0);} + if (nn % 2 == 1) { + n = (nn - 1) / 2; + return 2 * f(n) + n + 1; + } + n = nn / 2; + return f(n) + f(n - 1) + n; +} + +define main(n) { + return f(n) % bignum; +} -- cgit From 656b809b747b8b8081b4f5a9a8d93d3c6703a6d0 Mon Sep 17 00:00:00 2001 From: Niels van Dijke Date: Tue, 22 Sep 2020 17:41:47 +0000 Subject: Task 1 & 2 --- challenge-079/perlboy1967/perl/ch-1.pl | 39 +++++++++++ challenge-079/perlboy1967/perl/ch-2.pl | 117 +++++++++++++++++++++++++++++++++ 2 files changed, 156 insertions(+) create mode 100755 challenge-079/perlboy1967/perl/ch-1.pl create mode 100755 challenge-079/perlboy1967/perl/ch-2.pl diff --git a/challenge-079/perlboy1967/perl/ch-1.pl b/challenge-079/perlboy1967/perl/ch-1.pl new file mode 100755 index 0000000000..911cda875d --- /dev/null +++ b/challenge-079/perlboy1967/perl/ch-1.pl @@ -0,0 +1,39 @@ +#!/usr/bin/perl + +# Perl Weekly Challenge - 079 +# - https://perlweeklychallenge.org/blog/perl-weekly-challenge-079/ +# +# Task 1 - Count Set Bits +# +# Author: Niels 'PerlBoy' van Dijke + +use strict; +use warnings; + +use constant SOME_VALUE => 1000000007; + +my ($N) = @ARGV; + +die "N must be positive integer value" + unless (defined $N and $N =~ m#^[1-9][0-9]*$#); + +my $bits = countBits($N); + +printf "Input: %d\n", $N; +printf "Output: %d %% %d = %d\n", + $bits, + SOME_VALUE(), + $bits % SOME_VALUE(); + +sub countBits { + my ($n) = @_; + + my $b = 0; + + map { + # Some 'unpack/pack' black magic + $b += unpack('%32b*', pack('I', $_)); + } (1 .. $n); + + return $b; +} diff --git a/challenge-079/perlboy1967/perl/ch-2.pl b/challenge-079/perlboy1967/perl/ch-2.pl new file mode 100755 index 0000000000..04f6c69762 --- /dev/null +++ b/challenge-079/perlboy1967/perl/ch-2.pl @@ -0,0 +1,117 @@ +#!/usr/bin/perl + +# Perl Weekly Challenge - 079 +# - https://perlweeklychallenge.org/blog/perl-weekly-challenge-079/ +# +# Task 2 - Trapped Rain Water +# +# Author: Niels 'PerlBoy' van Dijke + +use strict; +use warnings; + +use List::Util qw(min max); +use List::MoreUtils qw(uniq indexes); + + +my (@N) = @ARGV; +@N = (1, 2, 1, 1, 10, 3, 4, 1, 2, 7, 2, 2, 4, 1, 2, 1, 3, 2) + unless scalar @N; + +die "N must be a list of at least 3 positive integer values" + unless (scalar @N >= 3 and !scalar(grep { !/^[1-9][0-9]*$/ } @N)); + + +my $grid = createHistGrid(\@N); +printHistogram('Input:', $grid, \@N); +my $trappedWater = findAndFillGaps(\@N, $grid); +printHistogram('Output:', $grid, \@N, $trappedWater); + + +sub createHistGrid { + my ($arList) = @_; + + my $grid = []; + + my $max = max(@$arList); + + foreach my $y (0 .. $max - 1) { + foreach my $x (0 .. scalar @$arList - 1) { + $grid->[$x][$y] = ($arList->[$x] > $y ? '#' : ' '); + } + } + + return $grid; +} + + +sub findAndFillGaps { + my ($arL, $grid) = @_; + + my $dropsAdded = 0; + + my @list = @$arL; + + my @levels = sort {$b <=> $a } uniq(@list); + + foreach my $level (@levels) { + my @i = indexes { $_ >= $level } @list; + next unless (scalar(@i) > 1); + + do { + my $i = shift(@i); + last if (!defined $i[0]); + + if ($i[0] - $i > 1) { + my $fillLevel = min($list[$i], $list[$i[0]]); + + for my $j ($i + 1 .. $i[0] - 1) { + for my $k ($list[$j] + 1 .. $fillLevel) { + $grid->[$j][$k - 1] = '.'; + } + $dropsAdded += ($fillLevel - $list[$j]); + $list[$j] = $fillLevel; + } + } + } while (scalar @i > 1); + } + + return $dropsAdded; +} + + +sub printHistogram { + my ($caption, $arGrid, $arList, $trappedWater) = @_; + + my $max = max(@$arList); + my $yLw = length($max); + + print "$caption\n"; + + # Print histogram rows + for (my $row = $max; $row > 0; $row--) { + my @row = (sprintf("%${yLw}s", $row), '|'); + for my $col (0 .. scalar(@$arList) - 1) { + push(@row, $grid->[$col][$row - 1]); + } + print join(" ", @row)."\n"; + } + + # Print X-axis + print sprintf("%${yLw}s +%s\n", + '', + join('-', map { '-' } @$arList, '')); + + # Print X labels + for my $l (0 .. $yLw - 1) { + print sprintf("%${yLw}s %s\n", + '', + join(' ', map { substr($_.' ' x $yLw, $l, 1) } @$arList)); + } + + if (defined $trappedWater) { + printf "\nAmount of trapped waterdrops: %d (marked with '.' in histogram).\n", $trappedWater; + } + + print "\n"; +} -- cgit From 4cbdeba02294cef5007b010a6fdd1e888bd53b63 Mon Sep 17 00:00:00 2001 From: Mohammad S Anwar Date: Tue, 22 Sep 2020 19:41:28 +0100 Subject: - Added solutions by Niels van Dijke. --- stats/pwc-current.json | 223 ++- stats/pwc-language-breakdown-summary.json | 36 +- stats/pwc-language-breakdown.json | 3114 ++++++++++++++--------------- stats/pwc-leaders.json | 710 +++---- stats/pwc-summary-1-30.json | 108 +- stats/pwc-summary-121-150.json | 34 +- stats/pwc-summary-151-180.json | 32 +- stats/pwc-summary-181-210.json | 76 +- stats/pwc-summary-31-60.json | 106 +- stats/pwc-summary-61-90.json | 116 +- stats/pwc-summary-91-120.json | 106 +- stats/pwc-summary.json | 48 +- 12 files changed, 2362 insertions(+), 2347 deletions(-) diff --git a/stats/pwc-current.json b/stats/pwc-current.json index bd34e381c9..748dc666fe 100644 --- a/stats/pwc-current.json +++ b/stats/pwc-current.json @@ -1,132 +1,49 @@ { - "yAxis" : { - "title" : { - "text" : "Total Solutions" - } - }, - "xAxis" : { - "type" : "category" - }, - "title" : { - "text" : "Perl Weekly Challenge - 079" - }, - "subtitle" : { - "text" : "[Champions: 11] Last updated at 2020-09-22 12:01:24 GMT" - }, - "tooltip" : { - "headerFormat" : "{series.name}
", - "pointFormat" : "{point.name}: {point.y:f}
", - "followPointer" : 1 - }, "plotOptions" : { "series" : { - "borderWidth" : 0, "dataLabels" : { "enabled" : 1, "format" : "{point.y}" - } + }, + "borderWidth" : 0 } }, - "legend" : { - "enabled" : 0 - }, - "chart" : { - "type" : "column" + "tooltip" : { + "pointFormat" : "{point.name}: {point.y:f}
", + "followPointer" : 1, + "headerFormat" : "{series.name}
" }, - "series" : [ - { - "data" : [ - { - "y" : 2, - "drilldown" : "Abigail", - "name" : "Abigail" - }, - { - "drilldown" : "Andrew Shitov", - "y" : 1, - "name" : "Andrew Shitov" - }, - { - "y" : 2, - "drilldown" : "Dave Cross", - "name" : "Dave Cross" - }, - { - "name" : "James Smith", - "y" : 2, - "drilldown" : "James Smith" - }, - { - "name" : "Mark Anderson", - "drilldown" : "Mark Anderson", - "y" : 2 - }, - { - "drilldown" : "Markus Holzer", - "y" : 2, - "name" : "Markus Holzer" - }, - { - "name" : "Mohammad S Anwar", - "drilldown" : "Mohammad S Anwar", - "y" : 2 - }, - { - "name" : "Myoungjin Jeon", - "y" : 2, - "drilldown" : "Myoungjin Jeon" - }, - { - "name" : "Roger Bell_West", - "y" : 4, - "drilldown" : "Roger Bell_West" - }, - { - "drilldown" : "Simon Proctor", - "y" : 2, - "name" : "Simon Proctor" - }, - { - "name" : "Vinod Kumar K", - "y" : 1, - "drilldown" : "Vinod Kumar K" - } - ], - "name" : "Perl Weekly Challenge - 079", - "colorByPoint" : 1 - } - ], "drilldown" : { "series" : [ { "id" : "Abigail", + "name" : "Abigail", "data" : [ [ "Perl", 2 ] - ], - "name" : "Abigail" + ] }, { - "id" : "Andrew Shitov", "data" : [ [ "Raku", 1 ] ], - "name" : "Andrew Shitov" + "name" : "Andrew Shitov", + "id" : "Andrew Shitov" }, { - "id" : "Dave Cross", "name" : "Dave Cross", "data" : [ [ "Perl", 2 ] - ] + ], + "id" : "Dave Cross" }, { "data" : [ @@ -139,24 +56,24 @@ "id" : "James Smith" }, { + "id" : "Mark Anderson", "data" : [ [ "Raku", 2 ] ], - "name" : "Mark Anderson", - "id" : "Mark Anderson" + "name" : "Mark Anderson" }, { - "id" : "Markus Holzer", "name" : "Markus Holzer", "data" : [ [ "Raku", 2 ] - ] + ], + "id" : "Markus Holzer" }, { "data" : [ @@ -177,12 +94,23 @@ "data" : [ [ "Raku", - 2 + 1 ] ], "id" : "Myoungjin Jeon" }, { + "id" : "Niels van Dijke", + "name" : "Niels van Dijke", + "data" : [ + [ + "Perl", + 2 + ] + ] + }, + { + "id" : "Roger Bell_West", "data" : [ [ "Perl", @@ -193,8 +121,7 @@ 2 ] ], - "name" : "Roger Bell_West", - "id" : "Roger Bell_West" + "name" : "Roger Bell_West" }, { "id" : "Simon Proctor", @@ -207,15 +134,103 @@ ] }, { - "name" : "Vinod Kumar K", + "id" : "Vinod Kumar K", "data" : [ [ "Perl", 1 ] ], - "id" : "Vinod Kumar K" + "name" : "Vinod Kumar K" } ] + }, + "title" : { + "text" : "Perl Weekly Challenge - 079" + }, + "xAxis" : { + "type" : "category" + }, + "yAxis" : { + "title" : { + "text" : "Total Solutions" + } + }, + "legend" : { + "enabled" : 0 + }, + "chart" : { + "type" : "column" + }, + "series" : [ + { + "data" : [ + { + "name" : "Abigail", + "drilldown" : "Abigail", + "y" : 2 + }, + { + "y" : 1, + "drilldown" : "Andrew Shitov", + "name" : "Andrew Shitov" + }, + { + "y" : 2, + "name" : "Dave Cross", + "drilldown" : "Dave Cross" + }, + { + "y" : 2, + "drilldown" : "James Smith", + "name" : "James Smith" + }, + { + "y" : 2, + "drilldown" : "Mark Anderson", + "name" : "Mark Anderson" + }, + { + "y" : 2, + "name" : "Markus Holzer", + "drilldown" : "Markus Holzer" + }, + { + "y" : 2, + "drilldown" : "Mohammad S Anwar", + "name" : "Mohammad S Anwar" + }, + { + "y" : 1, + "name" : "Myoungjin Jeon", + "drilldown" : "Myoungjin Jeon" + }, + { + "y" : 2, + "name" : "Niels van Dijke", + "drilldown" : "Niels van Dijke" + }, + { + "y" : 4, + "name" : "Roger Bell_West", + "drilldown" : "Roger Bell_West" + }, + { + "y" : 2, + "drilldown" : "Simon Proctor", + "name" : "Simon Proctor" + }, + { + "y" : 1, + "name" : "Vinod Kumar K", + "drilldown" : "Vinod Kumar K" + } + ], + "name" : "Perl Weekly Challenge - 079", + "colorByPoint" : 1 + } + ], + "subtitle" : { + "text" : "[Champions: 12] Last updated at 2020-09-22 18:40:52 GMT" } } diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json index 18e8a66add..47290a084c 100644 --- a/stats/pwc-language-breakdown-summary.json +++ b/stats/pwc-language-breakdown-summary.json @@ -1,22 +1,21 @@ { - "legend" : { - "enabled" : "false" + "subtitle" : { + "text" : "Last updated at 2020-09-22 18:40:52 GMT" }, "series" : [ { "dataLabels" : { "rotation" : -90, + "align" : "right", "style" : { "fontFamily" : "Verdana, sans-serif", "fontSize" : "13px" }, - "color" : "#FFFFFF", "format" : "{point.y:.0f}", + "color" : "#FFFFFF", "enabled" : "true", - "align" : "right", "y" : 10 }, - "name" : "Contributions", "data" : [ [ "Blog", @@ -24,40 +23,41 @@ ], [ "Perl", - 3329 + 3331 ], [ "Raku", - 2169 + 2168 ] - ] + ], + "name" : "Contributions" } ], "chart" : { "type" : "column" }, + "legend" : { + "enabled" : "false" + }, "yAxis" : { + "min" : 0, "title" : { "text" : null - }, - "min" : 0 - }, - "tooltip" : { - "pointFormat" : "{point.y:.0f}" - }, - "subtitle" : { - "text" : "Last updated at 2020-09-22 12:01:24 GMT" + } }, "xAxis" : { - "type" : "category", "labels" : { "style" : { "fontSize" : "13px", "fontFamily" : "Verdana, sans-serif" } - } + }, + "type" : "category" }, "title" : { "text" : "Perl Weekly Challenge Contributions [2019 - 2020]" + }, + "tooltip" : { + "pointFormat" : "{point.y:.0f}" } } diff --git a/stats/pwc-language-breakdown.json b/stats/pwc-language-breakdown.json index a24e3622e2..7627f3d374 100644 --- a/stats/pwc-language-breakdown.json +++ b/stats/pwc-language-breakdown.json @@ -1,1442 +1,25 @@ { + "chart" : { + "type" : "column" + }, "legend" : { "enabled" : "false" }, - "drilldown" : { - "series" : [ - { - "id" : "001", - "name" : "001", - "data" : [ - [ - "Perl", - 86 - ], - [ - "Raku", - 45 - ], - [ - "Blog", - 11 - ] - ] - }, - { - "data" : [ - [ - "Perl", - 67 - ], - [ - "Raku", - 34 - ], - [ - "Blog", - 10 - ] - ], - "name" : "002", - "id" : "002" - }, - { - "id" : "003", - "data" : [ - [ - "Perl", - 34 - ], - [ - "Raku", - 28 - ], - [ - "Blog", - 9 - ] - ], - "name" : "003" - }, - { - "id" : "004", - "data" : [ - [ - "Perl", - 50 - ], - [ - "Raku", - 31 - ], - [ - "Blog", - 10 - ] - ], - "name" : "004" - }, - { - "id" : "005", - "data" : [ - [ - "Perl", - 36 - ], - [ - "Raku", - 24 - ], - [ - "Blog", - 12 - ] - ], - "name" : "005" - }, - { - "id" : "006", - "name" : "006", - "data" : [ - [ - "Perl", - 29 - ], - [ - "Raku", - 16 - ], - [ - "Blog", - 7 - ] - ] - }, - { - "id" : "007", - "data" : [ - [ - "Perl", - 28 - ], - [ - "Raku", - 21 - ], - [ - "Blog", - 10 - ] - ], - "name" : "007" - }, - { - "id" : "008", - "data" : [ - [ - "Perl", - 40 - ], - [ - "Raku", - 20 - ], - [ - "Blog", - 12 - ] - ], - "name" : "008" - }, - { - "id" : "009", - "name" : "009", - "data" : [ - [ - "Perl", - 38 - ], - [ - "Raku", - 19 - ], - [ - "Blog", - 13 - ] - ] - }, - { - "id" : "010", - "name" : "010", - "data" : [ - [ - "Perl", - 32 - ], - [ - "Raku", - 17 - ], - [ - "Blog", - 11 - ] - ] - }, - { - "id" : "011", - "data" : [ - [ - "Perl", - 43 - ], - [ - "Raku", - 26 - ], - [ - "Blog", - 10 - ] - ], - "name" : "011" - }, - { - "id" : "012", - "data" : [ - [ - "Perl", - 44 - ], - [ - "Raku", - 28 - ], - [ - "Blog", - 11 - ] - ], - "name" : "012" - }, - { - "name" : "013", - "data" : [ - [ - "Perl", - 42 - ], - [ - "Raku", - 23 - ], - [ - "Blog", - 13 - ] - ], - "id" : "013" - }, - { - "id" : "014", - "data" : [ - [ - "Perl", - 52 - ], - [ - "Raku", - 29 - ], - [ - "Blog", - 15 - ] - ], - "name" : "014" - }, - { - "data" : [ - [ - "Perl", - 52 - ], - [ - "Raku", - 26 - ], - [ - "Blog", - 15 - ] - ], - "name" : "015", - "id" : "015" - }, - { - "name" : "016", - "data" : [ - [ - "Perl", - 33 - ], - [ - "Raku", - 21 - ], - [ - "Blog", - 12 - ] - ], - "id" : "016" - }, - { - "name" : "017", - "data" : [ - [ - "Perl", - 42 - ], - [ - "Raku", - 25 - ], - [ - "Blog", - 12 - ] - ], - "id" : "017" - }, - { - "id" : "018", - "data" : [ - [ - "Perl", - 33 - ], - [ - "Raku", - 29 - ], - [ - "Blog", - 14 - ] - ], - "name" : "018" - }, - { - "id" : "019", - "data" : [ - [ - "Perl", - 52 - ], - [ - "Raku", - 32 - ], - [ - "Blog", - 13 - ] - ], - "name" : "019" - }, - { - "data" : [ - [ - "Perl", - 47 - ], - [ - "Raku", - 35 - ], - [ - "Blog", - 13 - ] - ], - "name" : "020", - "id" : "020" - }, - { - "id" : "021", - "data" : [ - [ - "Perl", - 35 - ], - [ - "Raku", - 22 - ], - [ - "Blog", - 10 - ] - ], - "name" : "021" - }, - { - "id" : "022", - "name" : "022", - "data" : [ - [ - "Perl", - 32 - ], - [ - "Raku", - 21 - ], - [ - "Blog", - 10 - ] - ] - }, - { - "id" : "023", - "data" : [ - [ - "Perl", - 49 - ], - [ - "Raku", - 30 - ], - [ - "Blog", - 12 - ] - ], - "name" : "023" - }, - { - "name" : "024", - "data" : [ - [ - "Perl", - 35 - ], - [ - "Raku", - 24 - ], - [ - "Blog", - 11 - ] - ], - "id" : "024" - }, - { - "name" : "025", - "data" : [ - [ - "Perl", - 26 - ], - [ - "Raku", - 17 - ], - [ - "Blog", - 12 - ] - ], - "id" : "025" - }, - { - "data" : [ - [ - "Perl", - 33 - ], - [ - "Raku", - 27 - ], - [ - "Blog", - 10 - ] - ], - "name" : "026", - "id" : "026" - }, - { - "data" : [ - [ - "Perl", - 29 - ], - [ - "Raku", - 20 - ], - [ - "Blog", - 9 - ] - ], - "name" : "027", - "id" : "027" - }, - { - "id" : "028", - "name" : "028", - "data" : [ - [ - "Perl", - 45 - ], - [ - "Raku", - 24 - ], - [ - "Blog", - 9 - ] - ] - }, - { - "data" : [ - [ - "Perl", - 40 - ], - [ - "Raku", - 25 - ], - [ - "Blog", - 12 - ] - ], - "name" : "029", - "id" : "029" - }, - { - "name" : "030", - "data" : [ - [ - "Perl", - 74 - ], - [ - "Raku", - 31 - ], - [ - "Blog", - 10 - ] - ], - "id" : "030" - }, - { - "data" : [ - [ - "Perl", - 50 - ], - [ - "Raku", - 28 - ], - [ - "Blog", - 9 - ] - ], - "name" : "031", - "id" : "031" - }, - { - "id" : "032", - "data" : [ - [ - "Perl", - 57 - ], - [ - "Raku", - 25 - ], - [ - "Blog", - 10 - ] - ], - "name" : "032" - }, - { - "id" : "033", - "data" : [ - [ - "Perl", - 62 - ], - [ - "Raku", - 36 - ], - [ - "Blog", - 10 - ] - ], - "name" : "033" - }, - { - "data" : [ - [ - "Perl", - 30 - ], - [ - "Raku", - 21 - ], - [ - "Blog", - 11 - ] - ], - "name" : "034", - "id" : "034" - }, - { - "id" : "035", - "data" : [ - [ - "Perl", - 33 - ], - [ - "Raku", - 20 - ], - [ - "Blog", - 9 - ] - ], - "name" : "035" - }, - { - "id" : "036", - "data" : [ - [ - "Perl", - 35 - ], - [ - "Raku", - 20 - ], - [ - "Blog", - 11 - ] - ], - "name" : "036" - }, - { - "id" : "037", - "data" : [ - [ - "Perl", - 34 - ], - [ - "Raku", - 22 - ], - [ - "Blog", - 9 - ] - ], - "name" : "037" - }, - { - "name" : "038", - "data" : [ - [ - "Perl", - 31 - ], - [ - "Raku", - 22 - ], - [ - "Blog", - 12 - ] - ], - "id" : "038" - }, - { - "id" : "039", - "data" : [ - [ - "Perl", - 29 - ], - [ - "Raku", - 19 - ], - [ - "Blog", - 12 - ] - ], - "name" : "039" - }, - { - "data" : [ - [ - "Perl", - 39 - ], - [ - "Raku", - 22 - ], - [ - "Blog", - 10 - ] - ], - "name" : "040", - "id" : "040" - }, - { - "data" : [ - [ - "Perl", - 37 - ], - [ - "Raku", - 28 - ], - [ - "Blog", - 9 - ] - ], - "name" : "041", - "id" : "041" - }, - { - "data" : [ - [ - "Perl", - 47 - ], - [ - "Raku", - 30 - ], - [ - "Blog", - 11 - ] - ], - "name" : "042", - "id" : "042" - }, - { - "id" : "043", - "data" : [ - [ - "Perl", - 33 - ], - [ - "Raku", - 22 - ], - [ - "Blog", - 11 - ] - ], - "name" : "043" - }, - { - "name" : "044", - "data" : [ - [ - "Perl", - 41 - ], - [ - "Raku", - 30 - ], - [ - "Blog", - 11 - ] - ], - "id" : "044" - }, - { - "data" : [ - [ - "Perl", - 50 - ], - [ - "Raku", - 33 - ], - [ - "Blog", - 11 - ] - ], - "name" : "045", - "id" : "045" - }, - { - "id" : "046", - "data" : [ - [ - "Perl", - 44 - ], - [ - "Raku", - 31 - ], - [ - "Blog", - 10 - ] - ], - "name" : "046" - }, - { - "id" : "047", - "data" : [ - [ - "Perl", - 43 - ], - [ - "Raku", - 29 - ], - [ - "Blog", - 10 - ] - ], - "name" : "047" - }, - { - "id" : "048", - "data" : [ - [ - "Perl", - 59 - ], - [ - "Raku", - 35 - ], - [ - "Blog", - 12 - ] - ], - "name" : "048" - }, - { - "data" : [ - [ - "Perl", - 48 - ], - [ - "Raku", - 25 - ], - [ - "Blog", - 12 - ] - ], - "name" : "049", - "id" : "049" - }, - { - "data" : [ - [ - "Perl", - 50 - ], - [ - "Raku", - 34 - ], - [ - "Blog", - 12 - ] - ], - "name" : "050", - "id" : "050" - }, - { - "id" : "051", - "name" : "051", - "data" : [ - [ - "Perl", - 46 - ], - [ - "Raku", - 30 - ], - [ - "Blog", - 11 - ] - ] - }, - { - "id" : "052", - "data" : [ - [ - "Perl", - 45 - ], - [ - "Raku", - 30 - ], - [ - "Blog", - 14 - ] - ], - "name" : "052" - }, - { - "id" : "053", - "data" : [ - [ - "Perl", - 45 - ], - [ - "Raku", - 39 - ], - [ - "Blog", - 15 - ] - ], - "name" : "053" - }, - { - "name" : "054", - "data" : [ - [ - "Perl", - 45 - ], - [ - "Raku", - 38 - ], - [ - "Blog", - 18 - ] - ], - "id" : "054" - }, - { - "id" : "055", - "data" : [ - [ - "Perl", - 41 - ], - [ - "Raku", - 31 - ], - [ - "Blog", - 14 - ] - ], - "name" : "055" - }, - { - "id" : "056", - "data" : [ - [ - "Perl", - 47 - ], - [ - "Raku", - 30 - ], - [ - "Blog", - 16 - ] - ], - "name" : "056" - }, - { - "id" : "057", - "name" : "057", - "data" : [ - [ - "Perl", - 39 - ], - [ - "Raku", - 24 - ], - [ - "Blog", - 15 - ] - ] - }, - { - "id" : "058", - "data" : [ - [ - "Perl", - 33 - ], - [ - "Raku", - 21 - ], - [ - "Blog", - 13 - ] - ], - "name" : "058" - }, - { - "data" : [ - [ - "Perl", - 39 - ], - [ - "Raku", - 32 - ], - [ - "Blog", - 16 - ] - ], - "name" : "059", - "id" : "059" - }, - { - "data" : [ - [ - "Perl", - 39 - ], - [ - "Raku", - 28 - ], - [ - "Blog", - 16 - ] - ], - "name" : "060", - "id" : "060" - }, - { - "name" : "061", - "data" : [ - [ - "Perl", - 37 - ], - [ - "Raku", - 28 - ], - [ - "Blog", - 14 - ] - ], - "id" : "061" - }, - { - "id" : "062", - "data" : [ - [ - "Perl", - 26 - ], - [ - "Raku", - 17 - ], - [ - "Blog", - 11 - ] - ], - "name" : "062" - }, - { - "data" : [ - [ - "Perl", - 42 - ], - [ - "Raku", - 32 - ], - [ - "Blog", - 13 - ] - ], - "name" : "063", - "id" : "063" - }, - { - "id" : "064", - "data" : [ - [ - "Perl", - 35 - ], - [ - "Raku", - 27 - ], - [ - "Blog", - 16 - ] - ], - "name" : "064" - }, - { - "data" : [ - [ - "Perl", - 32 - ], - [ - "Raku", - 24 - ], - [ - "Blog", - 15 - ] - ], - "name" : "065", - "id" : "065" - }, - { - "id" : "066", - "name" : "066", - "data" : [ - [ - "Perl", - 39 - ], - [ - "Raku", - 29 - ], - [ - "Blog", - 14 - ] - ] - }, - { - "name" : "067", - "data" : [ - [ - "Perl", - 38 - ], - [ - "Raku", - 32 - ], - [ - "Blog", - 18 - ] - ], - "id" : "067" - }, - { - "data" : [ - [ - "Perl", - 33 - ], - [ - "Raku", - 27 - ], - [ - "Blog", - 13 - ] - ], - "name" : "068", - "id" : "068" - }, - { - "id" : "069", - "data" : [ - [ - "Perl", - 39 - ], - [ - "Raku", - 26 - ], - [ - "Blog", - 16 - ] - ], - "name" : "069" - }, - { - "name" : "070", - "data" : [ - [ - "Perl", - 42 - ], - [ - "Raku", - 32 - ], - [ - "Blog", - 17 - ] - ], - "id" : "070" - }, - { - "id" : "071", - "name" : "071", - "data" : [ - [ - "Perl", - 31 - ], - [ - "Raku", - 30 - ], - [ - "Blog", - 15 - ] - ] - }, - { - "id" : "072", - "data" : [ - [ - "Perl", - 51 - ], - [ - "Raku", - 40 - ], - [ - "Blog", - 19 - ] - ], - "name" : "072" - }, - { - "id" : "073", - "name" : "073", - "data" : [ - [ - "Perl", - 53 - ], - [ - "Raku", - 38 - ], - [ - "Blog", - 17 - ] - ] - }, - { - "name" : "074", - "data" : [ - [ - "Perl", - 56 - ], - [ - "Raku", - 37 - ], - [ - "Blog", - 20 - ] - ], - "id" : "074" - }, - { - "name" : "075", - "data" : [ - [ - "Perl", - 55 - ], - [ - "Raku", - 36 - ], - [ - "Blog", - 20 - ] - ], - "id" : "075" - }, - { - "id" : "076", - "name" : "076", - "data" : [ - [ - "Perl", - 47 - ], - [ - "Raku", - 28 - ], - [ - "Blog", - 16 - ] - ] - }, - { - "data" : [ - [ - "Perl", - 48 - ], - [ - "Raku", - 32 - ], - [ - "Blog", - 14 - ] - ], - "name" : "077", - "id" : "077" - }, - { - "id" : "078", - "name" : "078", - "data" : [ - [ - "Perl", - 66 - ], - [ - "Raku", - 37 - ], - [ - "Blog", - 18 - ] - ] - }, - { - "id" : "079", - "data" : [ - [ - "Perl", - 10 - ], - [ - "Raku", - 12 - ], - [ - "Blog", - 0 - ] - ], - "name" : "079" - } - ] + "yAxis" : { + "title" : { + "text" : "Total Solutions" + } + }, + "subtitle" : { + "text" : "Click the columns to drilldown the language breakdown. Last updated at 2020-09-22 18:40:52 GMT" }, "series" : [ { - "colorByPoint" : "true", - "name" : "Perl Weekly Challenge Languages", "data" : [ { + "drilldown" : "001", "name" : "#001", - "y" : 142, - "drilldown" : "001" + "y" : 142 }, { "y" : 111, @@ -1444,39 +27,39 @@ "name" : "#002" }, { - "name" : "#003", "drilldown" : "003", + "name" : "#003", "y" : 71 }, { - "name" : "#004", + "y" : 91, "drilldown" : "004", - "y" : 91 + "name" : "#004" }, { - "y" : 72, + "name" : "#005", "drilldown" : "005", - "name" : "#005" + "y" : 72 }, { - "y" : 52, + "name" : "#006", "drilldown" : "006", - "name" : "#006" + "y" : 52 }, { - "drilldown" : "007", "y" : 59, - "name" : "#007" + "name" : "#007", + "drilldown" : "007" }, { - "y" : 72, + "name" : "#008", "drilldown" : "008", - "name" : "#008" + "y" : 72 }, { - "y" : 70, "drilldown" : "009", - "name" : "#009" + "name" : "#009", + "y" : 70 }, { "y" : 60, @@ -1489,9 +72,9 @@ "name" : "#011" }, { - "name" : "#012", "y" : 83, - "drilldown" : "012" + "drilldown" : "012", + "name" : "#012" }, { "y" : 78, @@ -1499,9 +82,9 @@ "name" : "#013" }, { + "y" : 96, "name" : "#014", - "drilldown" : "014", - "y" : 96 + "drilldown" : "014" }, { "name" : "#015", @@ -1509,18 +92,18 @@ "y" : 93 }, { - "y" : 66, "drilldown" : "016", - "name" : "#016" + "name" : "#016", + "y" : 66 }, { "name" : "#017", - "y" : 79, - "drilldown" : "017" + "drilldown" : "017", + "y" : 79 }, { - "drilldown" : "018", "y" : 76, + "drilldown" : "018", "name" : "#018" }, { @@ -1535,13 +118,13 @@ }, { "y" : 67, - "drilldown" : "021", - "name" : "#021" + "name" : "#021", + "drilldown" : "021" }, { "name" : "#022", - "y" : 63, - "drilldown" : "022" + "drilldown" : "022", + "y" : 63 }, { "y" : 91, @@ -1549,29 +132,29 @@ "name" : "#023" }, { + "drilldown" : "024", "name" : "#024", - "y" : 70, - "drilldown" : "024" + "y" : 70 }, { "name" : "#025", - "y" : 55, - "drilldown" : "025" + "drilldown" : "025", + "y" : 55 }, { - "y" : 70, "drilldown" : "026", - "name" : "#026" + "name" : "#026", + "y" : 70 }, { - "name" : "#027", + "y" : 58, "drilldown" : "027", - "y" : 58 + "name" : "#027" }, { + "drilldown" : "028", "name" : "#028", - "y" : 78, - "drilldown" : "028" + "y" : 78 }, { "y" : 77, @@ -1579,19 +162,19 @@ "name" : "#029" }, { - "drilldown" : "030", "y" : 115, - "name" : "#030" + "name" : "#030", + "drilldown" : "030" }, { + "drilldown" : "031", "name" : "#031", - "y" : 87, - "drilldown" : "031" + "y" : 87 }, { "y" : 92, - "drilldown" : "032", - "name" : "#032" + "name" : "#032", + "drilldown" : "032" }, { "y" : 108, @@ -1599,43 +182,43 @@ "name" : "#033" }, { + "name" : "#034", "drilldown" : "034", - "y" : 62, - "name" : "#034" + "y" : 62 }, { - "name" : "#035", + "y" : 62, "drilldown" : "035", - "y" : 62 + "name" : "#035" }, { - "name" : "#036", "y" : 66, - "drilldown" : "036" + "drilldown" : "036", + "name" : "#036" }, { - "drilldown" : "037", "y" : 65, - "name" : "#037" + "name" : "#037", + "drilldown" : "037" }, { - "name" : "#038", "drilldown" : "038", + "name" : "#038", "y" : 65 }, { - "name" : "#039", + "y" : 60, "drilldown" : "039", - "y" : 60 + "name" : "#039" }, { + "drilldown" : "040", "name" : "#040", - "y" : 71, - "drilldown" : "040" + "y" : 71 }, { - "drilldown" : "041", "y" : 74, + "drilldown" : "041", "name" : "#041" }, { @@ -1650,8 +233,8 @@ }, { "y" : 82, - "drilldown" : "044", - "name" : "#044" + "name" : "#044", + "drilldown" : "044" }, { "y" : 94, @@ -1659,28 +242,28 @@ "name" : "#045" }, { + "drilldown" : "046", "name" : "#046", - "y" : 85, - "drilldown" : "046" + "y" : 85 }, { - "name" : "#047", "drilldown" : "047", + "name" : "#047", "y" : 82 }, { + "name" : "#048", "drilldown" : "048", - "y" : 106, - "name" : "#048" + "y" : 106 }, { + "y" : 85, "name" : "#049", - "drilldown" : "049", - "y" : 85 + "drilldown" : "049" }, { - "name" : "#050", "y" : 96, + "name" : "#050", "drilldown" : "050" }, { @@ -1689,24 +272,24 @@ "y" : 87 }, { + "name" : "#052", "drilldown" : "052", - "y" : 89, - "name" : "#052" + "y" : 89 }, { "y" : 99, - "drilldown" : "053", - "name" : "#053" + "name" : "#053", + "drilldown" : "053" }, { + "drilldown" : "054", "name" : "#054", - "y" : 101, - "drilldown" : "054" + "y" : 101 }, { - "name" : "#055", "y" : 86, - "drilldown" : "055" + "drilldown" : "055", + "name" : "#055" }, { "y" : 93, @@ -1714,133 +297,1555 @@ "name" : "#056" }, { - "y" : 78, "drilldown" : "057", - "name" : "#057" + "name" : "#057", + "y" : 78 }, { - "name" : "#058", "y" : 67, + "name" : "#058", "drilldown" : "058" }, { + "name" : "#059", "drilldown" : "059", - "y" : 87, - "name" : "#059" + "y" : 87 }, { - "drilldown" : "060", "y" : 83, - "name" : "#060" + "name" : "#060", + "drilldown" : "060" }, { - "y" : 79, + "name" : "#061", "drilldown" : "061", - "name" : "#061" + "y" : 79 }, { - "drilldown" : "062", "y" : 54, + "drilldown" : "062", "name" : "#062" }, { + "drilldown" : "063", "name" : "#063", - "y" : 87, - "drilldown" : "063" + "y" : 87 }, { - "name" : "#064", "drilldown" : "064", + "name" : "#064", "y" : 78 }, { - "drilldown" : "065", "y" : 71, + "drilldown" : "065", "name" : "#065" }, { + "name" : "#066", "drilldown" : "066", - "y" : 82, - "name" : "#066" + "y" : 82 }, { "y" : 88, - "drilldown" : "067", - "name" : "#067" + "name" : "#067", + "drilldown" : "067" }, { - "y" : 73, "drilldown" : "068", - "name" : "#068" + "name" : "#068", + "y" : 73 }, { - "drilldown" : "069", "y" : 81, + "drilldown" : "069", "name" : "#069" }, { + "y" : 91, "name" : "#070", - "drilldown" : "070", - "y"