Add Yacht exercise to the Scala track (#789)

* test * done coding Signed-off-by: wangxiaoxuan273 <[email protected]> * Update exercises/practice/yacht/.meta/config.json Co-authored-by: Erik Schierboom <[email protected]> * Update exercises/practice/yacht/src/test/scala/YachtTest.scala Co-authored-by: Erik Schierboom <[email protected]> * added pending on tests Signed-off-by: wangxiaoxuan273 <[email protected]> * reran the configlet commands Signed-off-by: wangxiaoxuan273 <[email protected]> * changed implementation Signed-off-by: wangxiaoxuan273 <[email protected]> * added extra line to make github happy Signed-off-by: wangxiaoxuan273 <[email protected]> * fixed my class name error in Example.scala Signed-off-by: wangxiaoxuan273 <[email protected]> --------- Signed-off-by: wangxiaoxuan273 <[email protected]> Co-authored-by: Erik Schierboom <[email protected]>
exercism · Jun 4, 2023 · 7ff0c68 · 7ff0c68
1 parent b26bb49
commit 7ff0c68
Show file tree

Hide file tree

Showing 8 changed files with 372 additions and 0 deletions.
diff --git a/config.json b/config.json
@@ -1221,6 +1221,17 @@
           "transforming"
         ]
       },
+      {
+        "slug": "yacht",
+        "name": "Yacht",
+        "uuid": "d4b60464-31e3-47f9-a99d-08a6e3a255b6",
+        "practices": [],
+        "prerequisites": [],
+        "difficulty": 5,
+        "topics": [
+          "pattern_matching"
+        ]
+      },
       {
         "slug": "sgf-parsing",
         "name": "SGF Parsing",

diff --git a/exercises/practice/yacht/.docs/instructions.md b/exercises/practice/yacht/.docs/instructions.md
@@ -0,0 +1,35 @@
+# Instructions
+
+The dice game [Yacht][yacht] is from the same family as Poker Dice, Generala and particularly Yahtzee, of which it is a precursor.
+In the game, five dice are rolled and the result can be entered in any of twelve categories.
+The score of a throw of the dice depends on category chosen.
+
+## Scores in Yacht
+
+| Category | Score | Description | Example |
+| -------- | ----- | ----------- | ------- |
+| Ones | 1 × number of ones | Any combination | 1 1 1 4 5 scores 3 |
+| Twos | 2 × number of twos | Any combination | 2 2 3 4 5 scores 4 |
+| Threes | 3 × number of threes | Any combination | 3 3 3 3 3 scores 15 |
+| Fours | 4 × number of fours | Any combination | 1 2 3 3 5 scores 0 |
+| Fives | 5 × number of fives| Any combination | 5 1 5 2 5 scores 15 |
+| Sixes | 6 × number of sixes | Any combination | 2 3 4 5 6 scores 6 |
+| Full House | Total of the dice | Three of one number and two of another | 3 3 3 5 5 scores 19 |
+| Four of a Kind | Total of the four dice | At least four dice showing the same face | 4 4 4 4 6 scores 16 |
+| Little Straight |  30 points | 1-2-3-4-5 | 1 2 3 4 5 scores 30 |
+| Big Straight | 30 points | 2-3-4-5-6 | 2 3 4 5 6 scores 30 |
+| Choice | Sum of the dice | Any combination | 2 3 3 4 6 scores 18 |
+| Yacht | 50 points | All five dice showing the same face | 4 4 4 4 4 scores 50 |
+
+If the dice do not satisfy the requirements of a category, the score is zero.
+If, for example, *Four Of A Kind* is entered in the *Yacht* category, zero points are scored.
+A *Yacht* scores zero if entered in the *Full House* category.
+
+## Task
+
+Given a list of values for five dice and a category, your solution should return the score of the dice for that category.
+If the dice do not satisfy the requirements of the category your solution should return 0.
+You can assume that five values will always be presented, and the value of each will be between one and six inclusively.
+You should not assume that the dice are ordered.
+
+[yacht]: https://en.wikipedia.org/wiki/Yacht_(dice_game)
diff --git a/exercises/practice/yacht/.meta/Example.scala b/exercises/practice/yacht/.meta/Example.scala
@@ -0,0 +1,51 @@
+object Yacht {
+  def yacht(dices: List[Int]): Int =
+    if (dices.toSet.size == 1) 50 else 0
+
+  def diceFrequencies(dices: List[Int]): Vector[Int] =
+    (1 to 6).map(i => dices.count(_ == i)).toVector
+
+  def appearances(dices: List[Int], diceValue: Int): Int =
+    diceFrequencies(dices)(diceValue - 1)
+
+  def getSumOfDices(dices: List[Int]): Int =
+    dices.sum
+
+  def fourOfKind(dices: List[Int]): Int = {
+    val counterArray = diceFrequencies(dices)
+    val scores = (0 to 5).flatMap(i =>
+      if (counterArray(i) >= 4) Some((i + 1) * 4) else None
+    )
+    if (scores.isEmpty) 0 else scores.head
+  }
+
+  def littleStraight(dices: List[Int]): Int =
+    if (dices.sorted == List(1, 2, 3, 4, 5)) 30 else 0
+
+  def bigStraight(dices: List[Int]): Int =
+    if (dices.sorted == List(2, 3, 4, 5, 6)) 30 else 0
+
+  def fullHouse(dices: List[Int]): Int = {
+    val counterArray = diceFrequencies(dices)
+    if (counterArray.contains(2) && counterArray.contains(3))
+      dices.sum
+    else
+      0
+  }
+
+  def score(dices: List[Int], category: String): Int = category match {
+    case "yacht" => yacht(dices)
+    case "ones" => appearances(dices, 1)
+    case "twos" => appearances(dices, 2) * 2
+    case "threes" => appearances(dices, 3) * 3
+    case "fours" => appearances(dices, 4) * 4
+    case "fives" => appearances(dices, 5) * 5
+    case "sixes" => appearances(dices, 6) * 6
+    case "full house" => fullHouse(dices)
+    case "four of a kind" => fourOfKind(dices)
+    case "little straight" => littleStraight(dices)
+    case "big straight" => bigStraight(dices)
+    case "choice" => getSumOfDices(dices)
+    case _ => 0
+  }
+}
diff --git a/exercises/practice/yacht/.meta/config.json b/exercises/practice/yacht/.meta/config.json
@@ -0,0 +1,22 @@
+{
+  "authors": [
+    "wangxiaoxuan273"
+  ],
+  "files": {
+    "solution": [
+      "src/main/scala/Yacht.scala"
+    ],
+    "test": [
+      "src/test/scala/YachtTest.scala"
+    ],
+    "example": [
+      ".meta/Example.scala"
+    ],
+    "invalidator": [
+      "build.sbt"
+    ]
+  },
+  "blurb": "Score a single throw of dice in the game Yacht.",
+  "source": "James Kilfiger, using wikipedia",
+  "source_url": "https://en.wikipedia.org/wiki/Yacht_(dice_game)"
+}
diff --git a/exercises/practice/yacht/.meta/tests.toml b/exercises/practice/yacht/.meta/tests.toml
@@ -0,0 +1,97 @@
+# This is an auto-generated file.
+#
+# Regenerating this file via `configlet sync` will:
+# - Recreate every `description` key/value pair
+# - Recreate every `reimplements` key/value pair, where they exist in problem-specifications
+# - Remove any `include = true` key/value pair (an omitted `include` key implies inclusion)
+# - Preserve any other key/value pair
+#
+# As user-added comments (using the # character) will be removed when this file
+# is regenerated, comments can be added via a `comment` key.
+
+[3060e4a5-4063-4deb-a380-a630b43a84b6]
+description = "Yacht"
+
+[15026df2-f567-482f-b4d5-5297d57769d9]
+description = "Not Yacht"
+
+[36b6af0c-ca06-4666-97de-5d31213957a4]
+description = "Ones"
+
+[023a07c8-6c6e-44d0-bc17-efc5e1b8205a]
+description = "Ones, out of order"
+
+[7189afac-cccd-4a74-8182-1cb1f374e496]
+description = "No ones"
+
+[793c4292-dd14-49c4-9707-6d9c56cee725]
+description = "Twos"
+
+[dc41bceb-d0c5-4634-a734-c01b4233a0c6]
+description = "Fours"
+
+[f6125417-5c8a-4bca-bc5b-b4b76d0d28c8]
+description = "Yacht counted as threes"
+
+[464fc809-96ed-46e4-acb8-d44e302e9726]
+description = "Yacht of 3s counted as fives"
+
+[d054227f-3a71-4565-a684-5c7e621ec1e9]
+description = "Fives"
+
+[e8a036e0-9d21-443a-8b5f-e15a9e19a761]
+description = "Sixes"
+
+[51cb26db-6b24-49af-a9ff-12f53b252eea]
+description = "Full house two small, three big"
+
+[1822ca9d-f235-4447-b430-2e8cfc448f0c]
+description = "Full house three small, two big"
+
+[b208a3fc-db2e-4363-a936-9e9a71e69c07]
+description = "Two pair is not a full house"
+
+[b90209c3-5956-445b-8a0b-0ac8b906b1c2]
+description = "Four of a kind is not a full house"
+
+[32a3f4ee-9142-4edf-ba70-6c0f96eb4b0c]
+description = "Yacht is not a full house"
+
+[b286084d-0568-4460-844a-ba79d71d79c6]
+description = "Four of a Kind"
+
+[f25c0c90-5397-4732-9779-b1e9b5f612ca]
+description = "Yacht can be scored as Four of a Kind"
+
+[9f8ef4f0-72bb-401a-a871-cbad39c9cb08]
+description = "Full house is not Four of a Kind"
+
+[b4743c82-1eb8-4a65-98f7-33ad126905cd]
+description = "Little Straight"
+
+[7ac08422-41bf-459c-8187-a38a12d080bc]
+description = "Little Straight as Big Straight"
+
+[97bde8f7-9058-43ea-9de7-0bc3ed6d3002]
+description = "Four in order but not a little straight"
+
+[cef35ff9-9c5e-4fd2-ae95-6e4af5e95a99]
+description = "No pairs but not a little straight"
+
+[fd785ad2-c060-4e45-81c6-ea2bbb781b9d]
+description = "Minimum is 1, maximum is 5, but not a little straight"
+
+[35bd74a6-5cf6-431a-97a3-4f713663f467]
+description = "Big Straight"
+
+[87c67e1e-3e87-4f3a-a9b1-62927822b250]
+description = "Big Straight as little straight"
+
+[c1fa0a3a-40ba-4153-a42d-32bc34d2521e]
+description = "No pairs but not a big straight"
+
+[207e7300-5d10-43e5-afdd-213e3ac8827d]
+description = "Choice"
+
+[b524c0cf-32d2-4b40-8fb3-be3500f3f135]
+description = "Yacht as choice"
diff --git a/exercises/practice/yacht/build.sbt b/exercises/practice/yacht/build.sbt
@@ -0,0 +1,3 @@
+scalaVersion := "2.13.6"
+
+libraryDependencies += "org.scalatest" %% "scalatest" % "3.2.10" % "test"
diff --git a/exercises/practice/yacht/src/main/scala/Yacht.scala b/exercises/practice/yacht/src/main/scala/Yacht.scala
@@ -0,0 +1,4 @@
+object Yacht {
+
+def score(dices: List[Int], category: String): Int = ???
+}
diff --git a/exercises/practice/yacht/src/test/scala/YachtTest.scala b/exercises/practice/yacht/src/test/scala/YachtTest.scala
@@ -0,0 +1,149 @@
+import org.scalatest.funsuite.AnyFunSuite
+import org.scalatest.matchers.should.Matchers
+
+class YachtTests extends AnyFunSuite with Matchers {
+
+  test("Yacht") {
+    Yacht.score(List(5, 5, 5, 5, 5), "yacht") shouldEqual 50
+  }
+
+  test("Not Yacht") {
+    pending
+    Yacht.score(List(1, 3, 3, 2, 5), "yacht") shouldEqual 0
+  }
+
+  test("Ones") {
+    pending
+    Yacht.score(List(1, 1, 1, 3, 5), "ones") shouldEqual 3
+  }
+
+  test("Ones, out of order") {
+    pending
+    Yacht.score(List(3, 1, 1, 5, 1), "ones") shouldEqual 3
+  }
+
+  test("No ones") {
+    pending
+    Yacht.score(List(4, 3, 6, 5, 5), "ones") shouldEqual 0
+  }
+
+  test("Twos") {
+    pending
+    Yacht.score(List(2, 3, 4, 5, 6), "twos") shouldEqual 2
+  }
+
+  test("Fours") {
+    pending
+    Yacht.score(List(1, 4, 1, 4, 1), "fours") shouldEqual 8
+  }
+
+  test("Yacht counted as threes") {
+    pending
+    Yacht.score(List(3, 3, 3, 3, 3), "threes") shouldEqual 15
+  }
+
+  test("Yacht of 3s counted as fives") {
+    pending
+    Yacht.score(List(3, 3, 3, 3, 3), "fives") shouldEqual 0
+  }
+
+  test("Fives") {
+    pending
+    Yacht.score(List(1, 5, 3, 5, 3), "fives") shouldEqual 10
+  }
+
+  test("Sixes") {
+    pending
+    Yacht.score(List(2, 3, 4, 5, 6), "sixes") shouldEqual 6
+  }
+
+  test("Full house two small, three big") {
+    pending
+    Yacht.score(List(2, 2, 4, 4, 4), "full house") shouldEqual 16
+  }
+
+  test("Full house three small, two big") {
+    pending
+    Yacht.score(List(5, 3, 3, 5, 3), "full house") shouldEqual 19
+  }
+
+  test("Two pair is not a full house") {
+    pending
+    Yacht.score(List(2, 2, 4, 4, 5), "full house") shouldEqual 0
+  }
+
+  test("Four of a kind is not a full house") {
+    pending
+    Yacht.score(List(1, 4, 4, 4, 4), "full house") shouldEqual 0
+  }
+
+  test("Yacht is not a full house") {
+    pending
+    Yacht.score(List(2, 2, 2, 2, 2), "full house") shouldEqual 0
+  }
+
+  test("Four of a Kind") {
+    pending
+    Yacht.score(List(6, 6, 4, 6, 6), "four of a kind") shouldEqual 24
+  }
+
+  test("Yacht can be scored as Four of a Kind") {
+    pending
+    Yacht.score(List(3, 3, 3, 3, 3), "four of a kind") shouldEqual 12
+  }
+
+  test("Full house is not Four of a Kind") {
+    pending
+    Yacht.score(List(3, 3, 3, 5, 5), "four of a kind") shouldEqual 0
+  }
+
+  test("Little Straight") {
+    pending
+    Yacht.score(List(3, 5, 4, 1, 2), "little straight") shouldEqual 30
+  }
+
+  test("Little Straight as Big Straight") {
+    pending
+    Yacht.score(List(1, 2, 3, 4, 5), "big straight") shouldEqual 0
+  }
+
+  test("Four in order but not a little straight") {
+    pending
+    Yacht.score(List(1, 1, 2, 3, 4), "little straight") shouldEqual 0
+  }
+
+  test("No pairs but not a little straight") {
+    pending
+    Yacht.score(List(1, 2, 3, 4, 6), "little straight") shouldEqual 0
+  }
+
+  test("Minimum is 1, maximum is 5, but not a little straight") {
+    pending
+    Yacht.score(List(1, 1, 3, 4, 5), "little straight") shouldEqual 0
+  }
+
+  test("Big Straight") {
+    pending
+    Yacht.score(List(4, 6, 2, 5, 3), "big straight") shouldEqual 30
+  }
+
+  test("Big Straight as little straight") {
+    pending
+    Yacht.score(List(6, 5, 4, 3, 2), "little straight") shouldEqual 0
+  }
+
+  test("No pairs but not a big straight") {
+    pending
+    Yacht.score(List(6, 5, 4, 3, 1), "big straight") shouldEqual 0
+  }
+
+  test("Choice") {
+    pending
+    Yacht.score(List(3, 3, 5, 6, 6), "choice") shouldEqual 23
+  }
+
+  test("Yacht as choice") {
+    pending
+    Yacht.score(List(2, 2, 2, 2, 2), "choice") shouldEqual 10
+  }
+}