mix colors for hybrid recoding strategies

• define scripts/color.nu to manipulate RGB colors, especially mix two colors together
• compute the color of hybrid recoding strategies as a weighted sum of the two simple recoding strategies involved, e.g. if the strategy is "10% of the time recode 2 shards and 90% of the time recode 3", then the color of that curve will be 10% the color of the simple strategy recoding 2 shards and 90% the color of the other simple strategy recoding 3 shards
• make the hybrid curves transparent and dashed

example

scripts/inbreeding/plot.nu

@@ -3,6 +3,7 @@
 use std repeat
 
 use ../plot.nu gplt
+use ../color.nu *
 
 def "parse strategy" []: string -> record<type: string> {
     let s = $in
@@ -24,6 +25,21 @@ def "parse strategy" []: string -> record<type: string> {
     }
 }
 
+def get-color []: int -> string {
+    match $in {
+        10 => "#d62728",
+        9 => "#ff7f0e",
+        8 => "#bcbd22",
+        7 => "#1f77b4",
+        6 => "#9467bd",
+        5 => "#2ca02c",
+        4 => "#17becf",
+        3 => "#8c564b",
+        2 => "#e377c2",
+        _ => "#7f7f7f",
+    }
+}
+
 export def main [data: path, --save: path, --options: record<k: int>] {
     let data = open $data
     let l = $data.diversity.0 | length
@@ -58,20 +74,27 @@ export def main [data: path, --save: path, --options: record<k: int>] {
         }
         | rename --column { diversity: "points" }
         | insert style {|it|
-            let color = match $it.strategy.n {
-                10 => "tab:red",
-                9 => "tab:orange",
-                8 => "tab:olive",
-                7 => "tab:blue",
-                6 => "tab:purple",
-                5 => "tab:green",
-                4 => "tab:cyan",
-                3 => "tab:brown",
-                2 => "tab:pink",
-                _ => "tab:gray",
+            let color = match $it.strategy.type {
+                "single" => { $it.strategy.n | get-color },
+                "double" => {
+                    let c1 = $it.strategy.n | get-color | color from-string $in
+                    let c2 = $it.strategy.m | get-color | color from-string $in
+                    let c = $it.strategy.p
+
+                    color mix $c1 $c2 $c | color to-hex
+                },
+            }
+
+            let alpha = match $it.strategy.type {
+                "single" => 1.0,
+                "double" => 0.3,
+            }
+            let type = match $it.strategy.type {
+                "single" => "solid",
+                "double" => "dashed",
             }
 
-            { color: $color, line: { alpha: ($it.strategy.p? | default 1.0) } }
+            { color: $color, line: { alpha: $alpha, type: $type } }
         }
         | reject strategy
         | save --force /tmp/graphs.json