From d0f36ce7c5b906f7b9521fec950fda192a65cad7 Mon Sep 17 00:00:00 2001
From: C0d3v <chococookiemedia@gmail.com>
Date: Sat, 7 Feb 2026 12:01:21 +0100
Subject: [PATCH] Add legend to comparison

---
 server.R | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/server.R b/server.R
index 81b9f37..20f1a92 100644
--- a/server.R
+++ b/server.R
@@ -312,6 +312,14 @@ server <- function(input, output, session) {
       yaxis = list(
         title = "<b>Straftat<b>",
         tickangle = "-90"
+      ),
+      legend = list(
+        orientation = "h",
+        x = 0.5,
+        itemwidth = 40,
+        xanchor = "center",
+        yanchor = "top",
+        valign = "top"
       )
     ) %>%
     config(