- Added solutions by Colin Crain.

17 files changed, 1587 insertions, 1282 deletions

diff --git a/challenge-074/colin-crain/blog.txt b/challenge-074/colin-crain/blog.txt
new file mode 100644
index 0000000000..1355e7910f
--- /dev/null
+++ b/challenge-074/colin-crain/blog.txt
@@ -0,0 +1 @@
+https://colincrain.wordpress.com/2020/08/21/when-majority-rule-plays-finders-keepers/
diff --git a/challenge-074/colin-crain/perl/ch-1.pl b/challenge-074/colin-crain/perl/ch-1.pl
new file mode 100644
index 0000000000..8536654751
--- /dev/null
+++ b/challenge-074/colin-crain/perl/ch-1.pl
@@ -0,0 +1,55 @@
+#! /opt/local/bin/perl
+#
+#       majority_ruler.pl
+#
+#       TASK #1 › Majority Element
+#         Submitted by: Mohammad S Anwar
+#         You are given an array of integers of size $N.
+# 
+#         Write a script to find the majority element. If none found then print -1.
+# 
+#         Majority element in the list is the one that appears more than floor(size_of_list/2).
+# 
+#         Example 1
+#             Input: @A = (1, 2, 2, 3, 2, 4, 2)
+#             Output: 2, as 2 appears 4 times in the list which is more than floor(7/2).
+# 
+#         Example 2
+#             Input: @A = (1, 3, 1, 2, 4, 5)
+#             Output: -1 as none of the elements appears more than floor(6/2).
+# 
+#
+#       2020 colin crain
+## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ##
+
+
+use warnings;
+use strict;
+use feature ":5.26";
+
+## ## ## ## ## MAIN:
+
+my @A = @ARGV;
+@A = (1, 2, 2, 3, 3, 4, 2, 2, 2) if scalar @A == 0;
+say "input: @A";
+
+my %count;
+$count{$_}++ for @A;
+
+# version 1:
+# is first elem count larger than half list size?
+my $max = ( sort { $count{$b} <=> $count{$a} } keys %count )[0];
+say "ver 1: ", $count{$max} > int(@A/2) ? $max : -1;
+
+## version 2:
+## if first elem same at far side of center?
+my @sorted = sort {$count{$b} <=> $count{$a}} @A;
+say "ver 2: ", $sorted[0] eq $sorted[int(@A/2)] ? $sorted[0] : -1;
+
+## version 3:
+## is maximum count greater than the sum for all other values?
+use List::Util qw(sum);
+my ($candidate, $count) = ($sorted[0], $count{$sorted[0]});
+delete $count{$sorted[0]};
+my $others = sum values %count;
+say "ver 3: ", $count > $others ? $candidate : -1;
\ No newline at end of file
diff --git a/challenge-074/colin-crain/perl/ch-2.pl b/challenge-074/colin-crain/perl/ch-2.pl
new file mode 100644
index 0000000000..438fb8a681
--- /dev/null
+++ b/challenge-074/colin-crain/perl/ch-2.pl
@@ -0,0 +1,102 @@
+#! /opt/local/bin/perl
+#
+#       finders_keepers.pl
+#
+#       TASK #2 › FNR Character
+#         Submitted by: Mohammad S Anwar
+#         You are given a string $S.
+# 
+#         Write a script to print the series of first
+#         non-repeating character for the given string. Print #
+#         if none found.
+# 
+#         Example 1
+#         Input: $S = ‘ababc’
+#         Output: ‘abb#c’
+#             Pass 1: “a”, the FNR character is ‘a’
+#             Pass 2: “ab”, the FNR character is ‘b’
+#             Pass 3: “aba”, the FNR character is ‘b’
+#             Pass 4: “abab”, no FNR found, hence ‘#’
+#             Pass 5: “ababc” the FNR character is ‘c’
+# 
+#         Example 2
+#         Input: $S = ‘xyzzyx’
+#         Output: ‘xyzyx#’
+#             Pass 1: “x”, the FNR character is “x”
+#             Pass 2: “xy”, the FNR character is “y”
+#             Pass 3: “xyz”, the FNR character is “z”
+#             Pass 4: “xyzz”, the FNR character is “y”
+#             Pass 5: “xyzzy”, the FNR character is “x”
+#             Pass 6: “xyzzyx”, no FNR found, hence ‘#’
+# 
+#       method:
+#             Again with the misdirecting name, wouldn't this be the "last"
+#             non-repeating character? "first non-repeating character looking
+#             backwards from a given point in a string". Bit wordy, that one.
+#             But we're compiling a string of these, so "first non-repeating
+#             character looking backwards from each character in a string". In a
+#             sense, though, I like that figuring out what the task is becomes
+#             part of the puzzle. In this sense the challenges mimic the real
+#             world. 
+#             
+#             In any case the first order of business is to plot out the action. 
+# 
+#             I believe the only thing that makes sense is for '#' to be an
+#             excluded character from the input, but didn't do that.
+#             
+#             the list is iterated through one character at a time
+#             each char when evaluated replaces the fnr unless that char is not unique,
+#                 the prev fnr goes on the stack, unless it is '#'
+#             if the new char matches the fnr:
+#                 the stack is rechecked for uniqueness
+#                 the top element is popped of the stack:
+#                     if the stack is empty the fnr is '#'
+#             ---
+#             pseudo-perl:
+# 
+#             list -> char:
+#                 uniq{char}++
+#             if uniq{char} == 1: 
+#                 push stack, fnr unless fnr == '#'
+#                 fnr = char
+#                 next
+#             if uniq{fnr} == 2:      ## match to fnr
+#                 stack = grep { uniq == 1 } stack
+#                 if stack has elements:
+#                     fnr = pop stack
+#                 else 
+#                     fnr = '#'
+#                 
+# 
+#       2020 colin crain
+## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ##
+
+
+
+use warnings;
+use strict;
+use feature ":5.26";
+
+## ## ## ## ## MAIN:
+
+my $str = shift @ARGV // '#yzzy#w';
+my %uniq;
+my $fnr = undef;
+my @prev;
+my $output;
+
+while (my $char = substr $str, 0, 1, '') {
+    $uniq{$char}++;
+    
+    if ($uniq{$char} == 1) {
+        push @prev, $fnr unless not defined $fnr;
+        $fnr = $char;
+    }    
+    elsif ($uniq{$fnr} == 2) {
+        @prev = grep { $uniq{$_} == 1 } @prev;
+        $fnr = @prev ? pop @prev : undef;
+    }
+    $output .= $fnr // '#';
+}
+
+say $output;
diff --git a/challenge-074/colin-crain/raku/ch-1.raku b/challenge-074/colin-crain/raku/ch-1.raku
new file mode 100644
index 0000000000..b1d9cc78f3
--- /dev/null
+++ b/challenge-074/colin-crain/raku/ch-1.raku
@@ -0,0 +1,38 @@
+#!/usr/bin/env perl6
+# 
+#
+#       majority-ruler.raku
+#
+#       TASK #1 › Majority Element
+#         Submitted by: Mohammad S Anwar
+#         You are given an array of integers of size $N.
+# 
+#         Write a script to find the majority element. If none found then print -1.
+# 
+#         Majority element in the list is the one that appears more than floor(size_of_list/2).
+# 
+#         Example 1
+#             Input: @A = (1, 2, 2, 3, 2, 4, 2)
+#             Output: 2, as 2 appears 4 times in the list which is more than floor(7/2).
+# 
+#         Example 2
+#             Input: @A = (1, 3, 1, 2, 4, 5)
+#             Output: -1 as none of the elements appears more than floor(6/2).
+# 
+#
+#       2020 colin crain
+## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ##
+
+
+
+unit sub MAIN (*@A);
+
+@A = 1, 2, 2, 3, 2, 4, 2 if @A.elems == 0;
+my %count;
+%count{$_}++ for @A;
+
+# is count of first elem count larger than half list size?
+my $max = @A.max({%count{$_}});
+say %count{$max} > (@A.elems/2).Int ?? $max !! -1 ;
+
+
diff --git a/challenge-074/colin-crain/raku/ch-2.raku b/challenge-074/colin-crain/raku/ch-2.raku
new file mode 100644
index 0000000000..9c2cb2fc94
--- /dev/null
+++ b/challenge-074/colin-crain/raku/ch-2.raku
@@ -0,0 +1,86 @@
+#!/usr/bin/env perl6
+# 
+#
+#       finders_keepers.raku
+#
+#       TASK #2 › FNR Character
+#         Submitted by: Mohammad S Anwar
+#         You are given a string $S.
+# 
+#         Write a script to print the series of first
+#         non-repeating character for the given string. Print #
+#         if none found.
+# 
+#         Example 1
+#         Input: $S = ‘ababc’
+#         Output: ‘abb#c’
+#             Pass 1: “a”, the FNR character is ‘a’
+#             Pass 2: “ab”, the FNR character is ‘b’
+#             Pass 3: “aba”, the FNR character is ‘b’
+#             Pass 4: “abab”, no FNR found, hence ‘#’
+#             Pass 5: “ababc” the FNR character is ‘c’
+# 
+#         Example 2
+#         Input: $S = ‘xyzzyx’
+#         Output: ‘xyzyx#’
+#             Pass 1: “x”, the FNR character is “x”
+#             Pass 2: “xy”, the FNR character is “y”
+#             Pass 3: “xyz”, the FNR character is “z”
+#             Pass 4: “xyzz”, the FNR character is “y”
+#             Pass 5: “xyzzy”, the FNR character is “x”
+#             Pass 6: “xyzzyx”, no FNR found, hence ‘#’
+# 
+# # # # # 
+# 
+#         method:
+#             the list is iterated through one character at a time
+#             each char when evaluated replaces the fnr unless that char is not unique,
+#                 the prev fnr goes on the stack
+#             if the new char matches the fnr:
+#                 the stack is rechecked for uniqueness
+#                 the top element is popped of the stack:
+#                     if the stack is empty the fnr is undef
+#             the output is either the fnr or '#' if not defined
+#
+#
+#       2020 colin crain
+## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ##
+
+
+
+unit sub MAIN (Str $str = 'xyzzyxwvuvu');
+
+## because of dynamic conditions, we need to 
+## recheck uniqueness as individual chars are added 
+## we will use a hash to keep track of char counts
+my %unique;
+my $fnr;
+my @prev;
+my $output;
+
+## 1. divide str
+## 2. apply function over characters to determine fnr
+## 3. write either fnr or '#' to output if Nil
+## 4. join back into single string
+$output = $str.comb
+              .map({ %unique{$_}++;  
+                     $fnr = do {
+                          when %unique{$_} == 1 {
+                              @prev.push($fnr) if $fnr.defined;
+                              $_;                       
+                          }
+                          when $_ === $fnr {
+                              ## recheck for uniqueness
+                              @prev .= grep({ %unique{$_} == 1 });
+                              @prev.pop // Nil;
+                          }
+                          $fnr;  
+                     }
+                     (defined $fnr) ?? $fnr !! '#';              
+                })
+              .join('');
+
+$str   .say;
+$output.say;
+
+
diff --git a/stats/pwc-current.json b/stats/pwc-current.json
index 661f0993ec..bacb22a726 100644
--- a/stats/pwc-current.json
+++ b/stats/pwc-current.json
@@ -2,9 +2,15 @@
    "xAxis" : {
       "type" : "category"
    },
+   "subtitle" : {
+      "text" : "[Champions: 21] Last updated at 2020-08-21 14:53:01 GMT"
+   },
    "legend" : {
       "enabled" : 0
    },
+   "title" : {
+      "text" : "Perl Weekly Challenge - 074"
+   },
    "yAxis" : {
       "title" : {
          "text" : "Total Solutions"
@@ -14,79 +20,84 @@
       {
          "data" : [
             {
-               "name" : "Andrew Shitov",
                "drilldown" : "Andrew Shitov",
+               "name" : "Andrew Shitov",
                "y" : 3
             },
             {
+               "name" : "Athanasius",
                "y" : 4,
-               "drilldown" : "Athanasius",
-               "name" : "Athanasius"
+               "drilldown" : "Athanasius"
             },
             {
-               "y" : 2,
                "drilldown" : "Bob Lied",
+               "y" : 2,
                "name" : "Bob Lied"
             },
             {
-               "name" : "Dave Jacoby",
+               "name" : "Colin Crain",
+               "y" : 5,
+               "drilldown" : "Colin Crain"
+            },
+            {
                "drilldown" : "Dave Jacoby",
-               "y" : 2
+               "y" : 2,
+               "name" : "Dave Jacoby"
             },
             {
-               "name" : "Duncan C. White",
                "drilldown" : "Duncan C. White",
+               "name" : "Duncan C. White",
                "y" : 2
             },
             {
+               "y" : 2,
                "name" : "E. Choroba",
-               "drilldown" : "E. Choroba",
-               "y" : 2
+               "drilldown" : "E. Choroba"
             },
             {
-               "y" : 5,
                "drilldown" : "Jaldhar H. Vyas",
-               "name" : "Jaldhar H. Vyas"
+               "name" : "Jaldhar H. Vyas",
+               "y" : 5
             },
             {
-               "drilldown" : "Javier Luque",
                "y" : 5,
-               "name" : "Javier Luque"
+               "name" : "Javier Luque",
+               "drilldown" : "Javier Luque"
             },
             {
-               "drilldown" : "Jorg Sommrey",
+               "name" : "Jorg Sommrey",
                "y" : 2,
-               "name" : "Jorg Sommrey"
+               "drilldown" : "Jorg Sommrey"
             },
             {
-               "name" : "Luca Ferrari",
                "y" : 4,
+               "name" : "Luca Ferrari",
                "drilldown" : "Luca Ferrari"
             },
             {
-               "drilldown" : "Mark Anderson",
                "y" : 2,
-               "name" : "Mark Anderson"
+               "name" : "Mark Anderson",
+               "drilldown" : "Mark Anderson"
             },
             {
-               "y" : 4,
                "drilldown" : "Mohammad S Anwar",
-               "name" : "Mohammad S Anwar"
+               "name" : "Mohammad S Anwar",
+               "y" : 4
             },
             {
-               "name" : "Myoungjin Jeon",
                "y" : 4,
+               "name" : "Myoungjin Jeon",
                "drilldown" : "Myoungjin Jeon"
             },
             {
                "name" : "Niels van Dijke",
-               "drilldown" : "Niels van Dijke",
-               "y" : 2
+               "y" : 2,
+               "drilldown" : "Niels van Dijke"
             },
             {
                "drilldown" : "Pavel Kuptsov",
-               "y" : 1,
-               "name" : "Pavel Kuptsov"
+               "name" : "Pavel Kuptsov",
+               "y" : 1
             },
             {
                "drilldown" : "Roger Bell_West",
@@ -94,23 +105,23 @@
                "name" : "Roger Bell_West"
             },
             {
+               "y" : 2,
                "name" : "Shawn Wagner",
-               "drilldown" : "Shawn Wagner",
-               "y" : 2
+               "drilldown" : "Shawn Wagner"
             },
             {
-               "name" : "Simon Proctor",
+               "drilldown" : "Simon Proctor",
                "y" : 2,
-               "drilldown" : "Simon Proctor"
+               "name" : "Simon Proctor"
             },
             {
+               "drilldown" : "Steven Wilson",
                "name" : "Steven Wilson",
-               "y" : 2,
-               "drilldown" : "Steven Wilson"
+               "y" : 2
             },
             {
-               "name" : "Ulrich Rieke",
                "drilldown" : "Ulrich Rieke",
+               "name" : "Ulrich Rieke",
                "y" : 4
             }
          ],
@@ -138,6 +149,8 @@
             ]
          },
          {
+            "name" : "Athanasius",
+            "id" : "Athanasius",
             "data" : [
                [
                   "Perl",
@@ -147,49 +160,65 @@
                   "Raku",
                   2
                ]
-            ],
-            "name" : "Athanasius",
-            "id" : "Athanasius"
+            ]
          },
          {
-            "id" : "Bob Lied",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ],
             "name" : "Bob Lied",
+            "id" : "Bob Lied"
+         },
+         {
             "data" : [
                [
                   "Perl",
                   2
+               ],
+               [
+                  "Raku",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
                ]
-            ]
+            ],
+            "name" : "Colin Crain",
+            "id" : "Colin Crain"
          },
          {
-            "id" : "Dave Jacoby",
-            "name" : "Dave Jacoby",
             "data" : [
                [
                   "Perl",
                   2
                ]
-            ]
+            ],
+            "name" : "Dave Jacoby",
+            "id" : "Dave Jacoby"
          },
          {
+            "id" : "Duncan C. White",
             "name" : "Duncan C. White",
             "data" : [
                [
                   "Perl",
                   2
                ]
-            ],
-            "id" : "Duncan C. White"
+            ]
          },
          {
             "id" : "E. Choroba",
+            "name" : "E. Choroba",
             "data" : [
                [
                   "Perl",
                   2
                ]
-            ],
-            "name" : "E. Choroba"
+            ]
          },
          {
             "data" : [
@@ -206,8 +235,8 @@
                   1
                ]
             ],
-            "name" : "Jaldhar H. Vyas",
-            "id" : "Jaldhar H. Vyas"
+            "id" : "Jaldhar H. Vyas",
+            "name" : "Jaldhar H. Vyas"
          },
          {
             "data" : [
@@ -228,8 +257,8 @@
             "id" : "Javier Luque"
          },
          {
-            "id" : "Jorg Sommrey",
             "name" : "Jorg Sommrey",
+            "id" : "Jorg Sommrey",
             "data" : [
                [
                   "Perl",
@@ -238,7 +267,6 @@
             ]
          },
          {
-            "name" : "Luca Ferrari",
             "data" : [
                [
                   "Raku",
@@ -249,19 +277,21 @@
                   2
                ]
             ],
-            "id" : "Luca Ferrari"
+            "id" : "Luca Ferrari",
+            "name" : "Luca Ferrari"
          },
          {
+            "id" : "Mark Anderson",
             "name" : "Mark Anderson",
             "data" : [
                [
                   "Raku",
                   2
                ]
-            ],
-            "id" : "Mark Anderson"
+            ]
          },
          {
+            "id" : "Mohammad S Anwar",
             "name" : "Mohammad S Anwar",
             "data" : [
                [
@@ -272,8 +302,7 @@
                   "Raku",
                   2
                ]
-            ],
-            "id" : "Mohammad S Anwar"
+            ]
          },
          {
             "data" : [
@@ -286,31 +315,30 @@
                   2
                ]
             ],
-            "name" : "Myoungjin Jeon",
-            "id" : "Myoungjin Jeon"
+            "id" : "Myoungjin Jeon",
+            "name" : "Myoungjin Jeon"
          },
          {
-            "id" : "Niels van Dijke",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
+            "id" : "Niels van Dijke",
             "name" : "Niels van Dijke"
          },
          {
             "name" : "Pavel Kuptsov",
+            "id" : "Pavel Kuptsov",
             "data" : [
                [
                   "Perl",
                   1
                ]
-            ],
-            "id" : "Pavel Kuptsov"
+            ]
          },
          {
-            "name" : "Roger Bell_West",
             "data" : [
                [
                   "Perl",
@@ -321,39 +349,42 @@
                   2
                ]
             ],
-            "id" : "Roger Bell_West"
+            "id" : "Roger Bell_West",
+            "name" : "Roger Bell_West"
          },
          {
-            "id" : "Shawn Wagner",
-            "name" : "Shawn Wagner",
             "data" : [
                [
                   "Perl",
                   2
                ]
-            ]
+            ],
+            "id" : "Shawn Wagner",
+            "name" : "Shawn Wagner"
          },
          {
             "name" : "Simon Proctor",
+            "id" : "Simon Proctor",
             "data" : [
                [
                   "Raku",
                   2
                ]
-            ],
-            "id" : "Simon Proctor"
+            ]
          },
          {
-            "id" : "Steven Wilson",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
+            "id" : "Steven Wilson",
             "name" : "Steven Wilson"
          },
          {
+            "id" : "Ulrich Rieke",
+            "name" : "Ulrich Rieke",
             "data" : [
                [
                   "Perl",
@@ -363,15 +394,10 @@
                   "Raku",
                   2
                ]
-            ],
-            "name" : "Ulrich Rieke",
-            "id" : "Ulrich Rieke"
+            ]
          }
       ]
    },
-   "title" : {
-      "text" : "Perl Weekly Challenge - 074"
-   },
    "plotOptions" : {
       "series" : {
          "dataLabels" : {
@@ -381,12 +407,9 @@
          "borderWidth" : 0
       }
    },
-   "subtitle" : {
-      "text" : "[Champions: 20] Last updated at 2020-08-20 13:04:01 GMT"
-   },
    "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,
-      "headerFormat" : "<span style='font-size:11px'>{series.name}</span><br/>"
+      "followPointer" : 1
    }
 }
diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json
index ff37be50ba..9acae7a630 100644
--- a/stats/pwc-language-breakdown-summary.json
+++ b/stats/pwc-language-breakdown-summary.json
@@ -2,44 +2,38 @@
    "tooltip" : {
       "pointFormat" : "<b>{point.y:.0f}</b>"
    },
-   "subtitle" : {
-      "text" : "Last updated at 2020-08-20 13:04:01 GMT"
-   },
-   "title" : {
-      "text" : "Perl Weekly Challenge Contributions [2019 - 2020]"
-   },
    "chart" : {
       "type" : "column"
    },
    "series" : [
       {
+         "dataLabels" : {
+            "color" : "#FFFFFF",
+            "y" : 10,
+            "rotation" : -90,
+            "enabled" : "true",
+            "format" : "{point.y:.0f}",
+            "style" : {
+               "fontSize" : "13px",
+               "fontFamily" : "Verdana, sans-serif"
+            },
+            "align" : "right"
+         },
+         "name" : "Contributions",
          "data" : [
             [
                "Blog",
-               901
+               902
             ],
             [
                "Perl",
-               3075
+               3077
             ],
             [
                "Raku",
-               2003
+               2005
             ]
-         ],
-         "name" : "Contributions",
-         "dataLabels" : {
-            "rotation" : -90,
-            "style" : {
-               "fontSize" : "13px",
-               "fontFamily" : "Verdana, sans-serif"
-            },
-            "y" : 10,
-            "color" : "#FFFFFF",
-            "align" : "right",
-            "enabled" : "true",
-            "format" : "{point.y:.0f}"
-         }
+         ]
       }
    ],
    "yAxis" : {
@@ -48,16 +42,22 @@
          "text" : null
       }
    },
+   "title" : {
+      "text" : "Perl Weekly Challenge Contributions [2019 - 2020]"
+   },
+   "subtitle" : {
+      "text" : "Last updated at 2020-08-21 14:53:01 GMT"
+   },
    "legend" : {
       "enabled" : "false"
    },
    "xAxis" : {
-      "type" : "category",
       "labels" : {
          "style" : {
             "fontFamily" : "Verdana, sans-serif",
             "fontSize" : "13px"
          }
-      }
+      },
+      "type" : "category"
    }
 }
diff --git a/stats/pwc-language-breakdown.json b/stats/pwc-language-breakdown.json
index 820f12bd09..0a966ebf1c 100644
--- a/stats/pwc-language-breakdown.json
+++ b/stats/pwc-language-breakdown.json
@@ -1,401 +1,23 @@
 {
-   "xAxis" : {
-      "type" : "category"
-   },
-   "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>"
    },
-   "series" : [
-      {
-         "name" : "Perl Weekly Challenge Languages",
-         "data" : [
-            {
-               "name" : "#001",
-               "y" : 142,
-               "drilldown" : "001"
-            },
-            {
-               "y" : 109,
-               "drilldown" : "002",
-               "name" : "#002"
-            },
-            {
-               "name" : "#003",
-               "y" : 71,
-               "drilldown" : "003"
-            },
-            {
-               "y" : 91,
-               "drilldown" : "004",
-               "name" : "#004"
-            },
-            {
-               "name" : "#005",
-               "drilldown" : "005",
-               "y" : 72
-            },
-            {
-               "name" : "#006",
-               "y" : 52,
-               "drilldown" : "006"
-            },
-            {
-               "y" : 59,
-               "drilldown" : "007",
-               "name" : "#007"
-            },
-            {
-               "name" : "#008",
-               "y" : 72,
-               "drilldown" : "008"
-            },
-            {
-               "name" : "#009",
-               "drilldown" : "009",
-               "y" : 68
-            },
-            {
-               "name" : "#010",
-               "y" : 60,
-               "drilldown" : "010"
-            },
-            {
-               "name" : "#011",
-               "y" : 79,
-               "drilldown" : "011"
-            },
-            {
-               "name" : "#012",
-               "y" : 83,
-               "drilldown" : "012"
-            },
-            {
-               "drilldown" : "013",
-               "y" : 76,
-               "name" : "#013"
-            },
-            {
-               "y" : 96,
-               "drilldown" : "014",
-               "name" : "#014"
-            },
-            {
-               "drilldown" : "015",
-               "y" : 93,
-               "name" : "#015"
-            },
-            {
-               "y" : 66,
-               "drilldown" : "016",
-               "name" : "#016"
-            },
-            {
-               "drilldown" : "017",
-               "y" : 79,
-               "name" : "#017"
-            },
-            {
-               "drilldown" : "018",
-               "y" : 76,
-               "name" : "#018"
-            },
-            {
-               "drilldown" : "019",
-               "y" : 97,
-               "name" : "#019"
-            },
-            {
-               "name" : "#020",
-               "y" : 95,
-               "drilldown" : "020"
-            },
-            {
-               "y" : 67,
-               "drilldown" : "021",
-               "name" : "#021"
-            },
-            {
-               "name" : "#022",
-               "drilldown" : "022",
-               "y" : 63
-            },
-            {
-               "name" : "#023",
-               "y" : 91,
-               "drilldown" : "023"
-            },
-            {
-               "y" : 70,
-               "drilldown" : "024",
-               "name" : "#024"
-            },
-            {
-               "y" : 55,
-               "drilldown" : "025",
-               "name" : "#025"
-            },
-            {
-               "name" : "#026",
-               "drilldown" : "026",
-               "y" : 70
-            },
-            {
-               "name" : "#027",
-               "drilldown" : "027",
-               "y" : 58
-            },
-            {
-               "name" : "#028",
-               "y" : 78,
-               "drilldown" : "028"
-            },
-            {
-