From 81d63ae72714bc4bcac9aff521f6560e617bb581 Mon Sep 17 00:00:00 2001 From: Millicool Date: Tue, 16 Dec 2025 19:17:58 +0100 Subject: [PATCH] Add heatmap headline --- ui.R | 19 +++++++++++-------- 1 file changed, 11 insertions(+), 8 deletions(-) diff --git a/ui.R b/ui.R index f75d22c..d6f7236 100644 --- a/ui.R +++ b/ui.R @@ -65,14 +65,17 @@ ui <- function() { plugins = list('dropdown_header') ) ), - selectizeInput( - inputId = "heatmap", - label = "Wähle eine Straftat:", - choices = list_of_crimes, - selected = NULL, - options = list( - placeholder = "Keine Auswahl", - plugins = list('clear_button') + div( + tags$h5("Heatmap zur Häufigkeit der Straftaten:", style = "font-weight: bold; margin-bottom: 10px;"), + selectizeInput( + inputId = "heatmap", + label = "Wähle eine Straftat:", + choices = list_of_crimes, + selected = NULL, + options = list( + placeholder = "Keine Auswahl", + plugins = list('clear_button') + ) ) ) ),