- Added solutions by Mark Anderson.

- Added solutions by Luca Ferrari.
- Added solutions by Niels van Dijke.
- Added solutions by Mariano Spadaccini.
- Added solutions by Stephen G. Lynn.
- Added solutions by David Ferrone.
- Added solutions by Rawley Fowler.
- Added solutions by Dave Jacoby.
- Added solutions by Thomas Kohler.
- Added solutions by Roger Bell_West.
- Added solutions by E. Choroba.
- Added solutions by W. Luis Mochan.
- Added solutions by Ali Moradi.
- Added solutions by Peter Campbell Smith.
- Added solutions by Bob Lied.
- Added solutions by Robert Ransbottom.
- Added solutions by Robert DiCicco.

22 files changed, 2889 insertions, 1957 deletions

diff --git a/challenge-199/robert-dicicco/julia/ch-1.jl b/challenge-199/robert-dicicco/julia/ch-1.jl
new file mode 100644
index 0000000000..37c3591611
--- /dev/null
+++ b/challenge-199/robert-dicicco/julia/ch-1.jl
@@ -0,0 +1,109 @@
+#!/usr/bin/env julia
+
+#=
+
+AUTHOR: Robert DiCicco
+
+DATE  : 2023-01-09
+
+Challenge 199 Good Pairs ( Julia )
+
+=#
+
+ 
+
+using Printf
+
+ 
+
+lists = [[1,2,3,1,1,3],[1,2,3],[1,1,1,1]]
+
+finalCnt = 0
+
+ 
+
+for list in lists
+
+                global finalCnt
+
+                @printf("Input: @list = %s\n", list)
+
+                beginner = 1
+
+                ender = length(list)
+
+                cnt = beginner + 1
+
+                while beginner < ender
+
+                                while cnt <= ender
+
+                                                if list[cnt] == list[beginner]
+
+                                                                @printf("%d,%d\n",beginner-1,cnt-1)
+
+                                                                finalCnt += 1
+
+                                                end
+
+                                                cnt += 1
+
+                                end
+
+                                beginner += 1
+
+                                cnt = beginner + 1
+
+                end
+
+                @printf("Output: %d\n\n", finalCnt)
+
+                finalCnt = 0
+
+end
+
+ 
+
+#=
+
+SAMPLE OUTPUT
+
+julia .\GoodPairs.jl
+
+Input: @list = [1, 2, 3, 1, 1, 3]
+
+0,3
+
+0,4
+
+2,5
+
+3,4
+
+Output: 4
+
+ 
+
+Input: @list = [1, 2, 3]
+
+Output: 0
+
+ 
+
+Input: @list = [1, 1, 1, 1]
+
+0,1
+
+0,2
+
+0,3
+
+1,2
+
+1,3
+
+2,3
+
+Output: 6
+
+=#
diff --git a/challenge-199/robert-dicicco/perl/ch-1.pl b/challenge-199/robert-dicicco/perl/ch-1.pl
new file mode 100644
index 0000000000..0d5bad394b
--- /dev/null
+++ b/challenge-199/robert-dicicco/perl/ch-1.pl
@@ -0,0 +1,113 @@
+#!/usr/bin/env perl
+
+=begin
+
+AUTHOR: Robert DiCicco
+
+DATE  : 2023-01-09
+
+Challenge 199 Good Pairs ( Perl )
+
+=cut
+
+ 
+
+use strict;
+
+use warnings;
+
+use feature qw/say/;
+
+ 
+
+my @lists = ([1,2,3,1,1,3],[1,2,3],[1,1,1,1]);
+
+my $finalCnt = 0;
+
+ 
+
+for my $list (@lists) {
+
+                print "Input: \@list = [@$list]\n";
+
+                my $begin = 0;
+
+                my $ender = scalar @$list - 1;
+
+                my $cnt = $begin + 1;
+
+               
+
+                while($begin < $ender){
+
+                                while($cnt <= $ender ) {
+
+                                                if ($list->[$cnt] == $list->[$begin]){
+
+                                                                print("($begin,$cnt)\n");
+
+                                                                $finalCnt++;
+
+                                                }
+
+                                                $cnt++;
+
+                                }
+
+                                $begin++;
+
+                                $cnt = $begin + 1;
+
+                }
+
+                print "Output: $finalCnt\n\n";
+
+                $finalCnt = 0;
+
+}
+
+ 
+
+=begin
+
+SAMPLE OUTPUT
+
+perl .\GoodPairs.pl
+
+Input: @list = [1 2 3 1 1 3]
+
+(0,3)
+
+(0,4)
+
+(2,5)
+
+(3,4)
+
+Output: 4
+
+ 
+
+Input: @list = [1 2 3]
+
+Output: 0
+
+ 
+
+Input: @list = [1 1 1 1]
+
+(0,1)
+
+(0,2)
+
+(0,3)
+
+(1,2)
+
+(1,3)
+
+(2,3)
+
+Output: 6
+
+=cut
diff --git a/challenge-199/robert-dicicco/python/ch-1.py b/challenge-199/robert-dicicco/python/ch-1.py
new file mode 100644
index 0000000000..1ef638bb42
--- /dev/null
+++ b/challenge-199/robert-dicicco/python/ch-1.py
@@ -0,0 +1,95 @@
+#!/usr/bin/env python
+
+'''
+
+AUTHOR: Robert DiCicco
+
+DATE  : 2023-01-09
+
+Challenge 199 Good Pairs ( Python )
+
+'''
+
+ 
+
+lists = [[1,2,3,1,1,3],[1,2,3],[1,1,1,1]]
+
+finalCnt = 0
+
+ 
+
+for list in lists:
+
+    print(f"Input: @list = {list}")
+
+    beginner = 0
+
+    ender = len(list) - 1
+
+    cnt = beginner + 1
+
+    while beginner < ender:
+
+        while cnt <= ender:
+
+            if list[cnt] == list[beginner]:
+
+                print(f"{beginner},{cnt}")
+
+                finalCnt += 1
+
+            cnt += 1
+
+        beginner += 1
+
+        cnt = beginner + 1
+
+    print(f"Output: {finalCnt}\n")
+
+    finalCnt = 0
+
+      
+
+'''
+
+SAMPLE OUTPOUT
+
+python .\GoodPairs.py
+
+Input: @list = [1, 2, 3, 1, 1, 3]
+
+0,3
+
+0,4
+
+2,5
+
+3,4
+
+Output: 4
+
+ 
+
+Input: @list = [1, 2, 3]
+
+Output: 0
+
+ 
+
+Input: @list = [1, 1, 1, 1]
+
+0,1
+
+0,2
+
+0,3
+
+1,2
+
+1,3
+
+2,3
+
+Output: 6
+
+'''
diff --git a/challenge-199/robert-dicicco/raku/ch-1.raku b/challenge-199/robert-dicicco/raku/ch-1.raku
new file mode 100644
index 0000000000..c3aa287435
--- /dev/null
+++ b/challenge-199/robert-dicicco/raku/ch-1.raku
@@ -0,0 +1,103 @@
+use v6;
+
+#`{
+
+AUTHOR: Robert DiCicco
+
+DATE  : 2023-01-09
+
+Challenge 199 Good Pairs ( Raku )
+
+}
+
+ 
+
+my @lists = ([1,2,3,1,1,3],[1,2,3],[1,1,1,1]);
+
+my $finalCnt = 0;
+
+ 
+
+for (@lists) -> @list {
+
+                print "Input: \@list = [",@list,"]\n";
+
+                my $begin = 0;
+
+                my $ender = @list.elems - 1;
+
+                my $cnt = $begin + 1;
+
+                while ($begin < $ender) {
+
+                                while ( $cnt <= $ender ) {
+
+                                                if (@list[$cnt] == @list[$begin]) {
+
+                                                                print("($begin,$cnt)\n");
+
+                                                                $finalCnt++;
+
+                                                }
+
+                                $cnt++;
+
+                                }
+
+                                $begin++;
+
+                                $cnt = $begin + 1;
+
+                }
+
+                print "Output: $finalCnt\n\n";
+
+                $finalCnt = 0;
+
+}
+
+ 
+
+#`{
+
+SAMPLE OUTPUT
+
+raku .\GoodPairs.rk
+
+Input: @list = [1 2 3 1 1 3]
+
+(0,3)
+
+(0,4)
+
+(2,5)
+
+(3,4)
+
+Output: 4
+
+ 
+
+Input: @list = [1 2 3]
+
+Output: 0
+
+ 
+
+Input: @list = [1 1 1 1]
+
+(0,1)
+
+(0,2)
+
+(0,3)
+
+(1,2)
+
+(1,3)
+
+(2,3)
+
+Output: 6
+
+}
diff --git a/challenge-199/robert-dicicco/ruby/ch-1.rb b/challenge-199/robert-dicicco/ruby/ch-1.rb
new file mode 100644
index 0000000000..4f2205939f
--- /dev/null
+++ b/challenge-199/robert-dicicco/ruby/ch-1.rb
@@ -0,0 +1,107 @@
+#!/usr/bin/env ruby
+
+=begin
+
+AUTHOR: Robert DiCicco
+
+DATE  : 2023-01-09
+
+Challenge 199 Good Pairs ( Ruby )
+
+=end
+
+ 
+
+ 
+
+lists = [[1,2,3,1,1,3],[1,2,3],[1,1,1,1]]
+
+finalCnt = 0
+
+ 
+
+lists.each do |list|
+
+                puts "Input: @list = #{list}"
+
+                beginner = 0
+
+                ender = list.length() - 1
+
+                cnt = beginner + 1
+
+                while beginner < ender
+
+                                while cnt <= ender
+
+                                                if (list[cnt] == list[beginner]) then
+
+                                                                puts("#{beginner},#{cnt}")
+
+                                                                finalCnt += 1
+
+                                                end
+
+                                                cnt += 1
+
+                                end
+
+                                beginner += 1
+
+                                cnt = beginner + 1
+
+                end
+
+                puts("Output: #{finalCnt}")
+
+                puts(" ")
+
+                finalCnt = 0
+
+end
+
+ 
+
+=begin
+
+SAMPLE OUTPUT
+
+ruby .\GoodPairs.rb
+
+Input: @list = [1, 2, 3, 1, 1, 3]
+
+0,3
+
+0,4
+
+2,5
+
+3,4
+
+Output: 4
+
+ 
+
+Input: @list = [1, 2, 3]
+
+Output: 0
+
+ 
+
+Input: @list = [1, 1, 1, 1]
+
+0,1
+
+0,2
+
+0,3
+
+1,2
+
+1,3
+
+2,3
+
+Output: 6
+
+=end
diff --git a/challenge-199/ziameraj16/java/GoodPairs.java b/challenge-199/ziameraj16/java/GoodPairs.java
new file mode 100644
index 0000000000..fb76bea61d
--- /dev/null
+++ b/challenge-199/ziameraj16/java/GoodPairs.java
@@ -0,0 +1,20 @@
+import java.util.*;
+import java.util.stream.Collectors;
+
+public class GoodPairs {
+
+    public static void main(String[] args) {
+        Scanner scanner = new Scanner(System.in);
+        System.out.println("Enter comma separated values");
+        List<Integer> list = Arrays.stream(scanner.nextLine().split(",")).map(Integer::valueOf).collect(Collectors.toList());
+        int count = 0;
+        for (int i = 1; i < list.size(); i++) {
+            for (int j = 0; j < i; j++) {
+                if (list.get(i) == list.get(j)) {
+                    count++;
+                }
+            }
+        }
+        System.out.println(count);
+    }
+}
diff --git a/stats/pwc-challenge-198.json b/stats/pwc-challenge-198.json
new file mode 100644
index 0000000000..a00eae3a49
--- /dev/null
+++ b/stats/pwc-challenge-198.json
@@ -0,0 +1,680 @@
+{
+   "plotOptions" : {
+      "series" : {
+         "dataLabels" : {
+            "enabled" : 1,
+            "format" : "{point.y}"
+         },
+         "borderWidth" : 0
+      }
+   },
+   "chart" : {
+      "type" : "column"
+   },
+   "title" : {
+      "text" : "The Weekly Challenge - 198"
+   },
+   "series" : [
+      {
+         "colorByPoint" : 1,
+         "name" : "The Weekly Challenge - 198",
+         "data" : [
+            {
+               "drilldown" : "Adam Russell",
+               "y" : 4,
+               "name" : "Adam Russell"
+            },
+            {
+               "drilldown" : "Ali Moradi",
+               "name" : "Ali Moradi",
+               "y" : 4
+            },
+            {
+               "y" : 2,
+               "name" : "Andrew Grangaard",
+               "drilldown" : "Andrew Grangaard"
+            },
+            {
+               "drilldown" : "Arne Sommer",
+               "name" : "Arne Sommer",
+               "y" : 3
+            },
+            {
+               "drilldown" : "Athanasius",
+               "name" : "Athanasius",
+               "y" : 4
+            },
+            {
+               "y" : 2,
+               "name" : "Bob Lied",
+               "drilldown" : "Bob Lied"
+            },
+            {
+               "drilldown" : "Bruce Gray",
+               "y" : 2,
+               "name" : "Bruce Gray"
+            },
+            {
+               "drilldown" : "Carlos Oliveira",
+               "name" : "Carlos Oliveira",
+               "y" : 2
+            },
+            {
+               "drilldown" : "Cheok-Yin Fung",
+               "name" : "Cheok-Yin Fung",
+               "y" : 1
+            },
+            {
+               "drilldown" : "Colin Crain",
+               "y" : 2,
+               "name" : "Colin Crain"
+            },
+            {
+               "name" : "Dave Jacoby",
+               "y" : 3,
+               "drilldown" : "Dave Jacoby"
+            },
+            {
+               "drilldown" : "David Ferrone",
+               "y" : 4,
+               "name" : "David Ferrone"
+            },
+            {
+               "drilldown" : "Duncan C. White",
+               "name" : "Duncan C. White",
+               "y" : 2
+            },
+            {
+               "name" : "E. Choroba",
+               "y" : 2,
+               "drilldown" : "E. Choroba"
+            },
+            {
+               "drilldown" : "Feng Chang",
+               "y" : 2,
+               "name" : "Feng Chang"
+            },
+            {
+               "y" : 6,
+               "name" : "Flavio Poletti",
+               "drilldown" : "Flavio Poletti"
+            },
+            {
+               "name" : "James Smith",
+               "y" : 3,
+               "drilldown" : "James Smith"
+            },
+            {
+               "drilldown" : "Jan Krnavek",
+               "name" : "Jan Krnavek",
+               "y" : 2
+            },
+            {
+               "y" : 2,
+               "name" : "Jorg Sommrey",
+               "drilldown" : "Jorg Sommrey"
+            },
+            {
+               "y" : 5,
+               "name" : "Laurent Rosenfeld",
+               "drilldown" : "Laurent Rosenfeld"
+            },
+            {
+               "drilldown" : "Luca Ferrari",
+               "y" : 8,
+               "name" : "Luca Ferrari"
+            },
+            {
+               "y" : 2,
+               "name" : "Mark Anderson",
+               "drilldown" : "Mark Anderson"
+            },
+            {
+               "y" : 2,
+               "name" : "Marton Polgar",
+               "drilldown" : "Marton Polgar"
+            },
+            {
+               "name" : "Niels van Dijke",
+               "y" : 2,
+               "drilldown" : "Niels van Dijke"
+            },
+            {
+               "drilldown" : "Peter Campbell Smith",
+               "y" : 3,
+               "name" : "Peter Campbell Smith"
+            },
+            {
+               "drilldown" : "Pip Stuart",
+               "y" : 2,
+               "name" : "Pip Stuart"
+            },
+            {
+               "name" : "Rawley Fowler",
+               "y" : 2,
+               "drilldown" : "Rawley Fowler"
+            },
+            {
+               "drilldown" : "Robbie Hatley",
+               "y" : 3,
+               "name" : "Robbie Hatley"
+            },
+            {
+               "drilldown" : "Robert DiCicco",
+               "name" : "Robert DiCicco",
+               "y" : 2
+            },
+            {
+               "drilldown" : "Roger Bell_West",
+               "name" : "Roger Bell_West",
+               "y" : 5
+            },
+            {
+               "drilldown" : "Simon Green",
+               "y" : 3,
+               "name" : "Simon Green"
+            },
+            {
+               "y" : 2,
+               "name" : "Solathian",
+               "drilldown" : "Solathian"
+            },
+            {
+               "drilldown" : "Stephen G. Lynn",
+               "y" : 5,
+               "name" : "Stephen G. Lynn"
+            },
+            {
+               "drilldown" : "Thomas Kohler",
+               "name" : "Thomas Kohler",
+               "y" : 4
+            },
+            {
+               "drilldown" : "Ulrich Rieke",
+               "y" : 4,
+               "name" : "Ulrich Rieke"
+            },
+            {
+               "name" : "W. Luis Mochan",
+               "y" : 3,
+               "drilldown" : "W. Luis Mochan"
+            }
+         ]
+      }
+   ],
+   "subtitle" : {
+      "text" : "[Champions: 36] Last updated at 2023-01-10 18:29:22 GMT"
+   },
+   "yAxis" : {
+      "title" : {
+         "text" : "Total Solutions"
+      }
+   },
+   "drilldown" : {
+      "series" : [
+         {
+            "name" : "Adam Russell",
+            "id" : "Adam Russell",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Blog",
+                  2
+               ]
+            ]
+         },
+         {
+            "name" : "Ali Moradi",
+            "id" : "Ali Moradi",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Raku",
+                  2
+               ]
+            ]
+         },
+         {
+            "id" : "Andrew Grangaard",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ],
+            "name" : "Andrew Grangaard"
+         },
+         {
+            "data" : [
+               [
+                  "Raku",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ],
+            "id" : "Arne Sommer",
+            "name" : "Arne Sommer"
+         },
+         {
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Raku",
+                  2
+               ]
+            ],
+            "id" : "Athanasius",
+            "name" : "Athanasius"
+         },
+         {
+            "name" : "Bob Lied",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ],
+            "id" : "Bob Lied"
+         },
+         {
+            "data" : [
+               [
+                  "Raku",
+                  2
+               ]
+            ],
+            "id" : "Bruce Gray",
+            "name" : "Bruce Gray"
+         },
+         {
+            "name" : "Carlos Oliveira",
+            "id" : "Carlos Oliveira",
+            "data" : [
+               [
+                  "Raku",
+                  2
+               ]
+            ]
+         },
+         {
+            "name" : "Cheok-Yin Fung",
+            "data" : [
+               [
+                  "Perl",
+                  1
+               ]
+            ],
+            "id" : "Cheok-Yin Fung"
+         },
+         {
+            "name" : "Colin Crain",
+            "id" : "Colin Crain",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ]
+         },
+         {
+            "name" : "Dave Jacoby",
+            "id" : "Dave Jacoby",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ]
+         },
+         {
+            "id" : "David Ferrone",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Raku",
+                  2
+               ]
+            ],
+            "name" : "David Ferrone"
+         },
+         {
+            "name" : "Duncan C. White",
+            "id" : "Duncan C. White",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ]
+         },
+         {
+            "name" : "E. Choroba",
+            "id" : "E. Choroba",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ]
+         },
+         {
+            "data" : [
+               [
+                  "Raku",
+                  2
+               ]
+            ],
+            "id" : "Feng Chang",
+            "name" : "Feng Chang"
+         },
+         {
+            "name" : "Flavio Poletti",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Raku",
+                  2
+               ],
+               [
+                  "Blog",
+                  2
+               ]
+            ],
+            "id" : "Flavio Poletti"
+         },
+         {
+            "name" : "James Smith",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ],
+            "id" : "James Smith"
+         },
+         {
+            "name" : "Jan Krnavek",
+            "id" : "Jan Krnavek",
+            "data" : [
+               [
+                  "Raku",
+                  2
+               ]
+            ]
+         },
+         {
+            "name" : "Jorg Sommrey",
+            "id" : "Jorg Sommrey",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ]
+         },
+         {
+            "name" : "Laurent Rosenfeld",
+            "id" : "Laurent Rosenfeld",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Raku",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ]
+         },
+         {
+            "name" : "Luca Ferrari",
+            "data" : [
+               [
+                  "Raku",
+                  2
+               ],
+               [
+                  "Blog",
+                  6
+               ]
+            ],
+            "id" : "Luca Ferrari"
+         },
+         {
+            "name" : "Mark Anderson",
+            "id" : "Mark Anderson",
+            "data" : [
+               [
+                  "Raku",
+                  2
+               ]
+            ]
+         },
+         {
+            "name" : "Marton Polgar",
+            "id" : "Marton Polgar",
+            "data" : [
+               [
+                  "Raku",
+                  2
+               ]
+            ]
+         },
+         {
+            "name" : "Niels van Dijke",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ],
+            "id" : "Niels van Dijke"
+         },
+         {
+            "name" : "Peter Campbell Smith",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ],
+            "id" : "Peter Campbell Smith"
+         },
+         {
+            "id" : "Pip Stuart",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ],
+            "name" : "Pip Stuart"
+         },
+         {
+            "name" : "Rawley Fowler",
+            "data" : [
+               [
+                  "Raku",
+                  2
+               ]
+            ],
+            "id" : "Rawley Fowler"
+         },
+         {
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ],
+            "id" : "Robbie Hatley",
+            "name" : "Robbie Hatley"
+         },
+         {
+            "id" : "Robert DiCicco",
+            "data" : [
+               [
+                  "Perl",
+                  1
+               ],
+               [
+                  "Raku",
+                  1
+               ]
+            ],
+            "name" : "Robert DiCicco"
+         },
+         {
+            "name" : "Roger Bell_West",
+            "data" : [