Fix name and style of former heatmap

This commit is contained in:
2026-02-06 15:41:25 +01:00
parent 5eefe3fe02
commit 2094db061d

29
ui.R
View File

@@ -255,23 +255,24 @@ ui <- function() {
plugins = list('dropdown_header') plugins = list('dropdown_header')
) )
), ),
tags$hr(style = "border-top: 2px solid #d7dbde; margin: 20px 0 0 0;"), # The divider line
div( div(
tags$h5( style = "margin-top: 20px; margin-bottom: 0px;",
"Heatmap zur Häufigkeit der Straftaten:", tags$h5(
style = "font-weight: bold; margin-bottom: 10px;" "Geografische Verteilung nach Fallzahlen",
), style = "font-weight: 600; line-height: 1.1; margin-bottom: 5px;")
selectizeInput( ),
inputId = "heatmap", selectizeInput(
label = "Wähle eine Straftat:", inputId = "heatmap",
choices = list_of_crimes, label = "Wähle eine Straftat:",
selected = NULL, choices = list_of_crimes,
options = list( selected = NULL,
placeholder = "Keine Auswahl", options = list(
plugins = list('clear_button') placeholder = "Keine Auswahl",
) plugins = list('clear_button')
) )
) )
), )
) )
), ),
nav_panel("Interaktiver Vergleich", nav_panel("Interaktiver Vergleich",