Fix paranthesis and clean up

This commit is contained in:
2026-02-06 15:40:25 +01:00
parent 414cb97670
commit 5eefe3fe02

9
ui.R
View File

@@ -226,8 +226,8 @@ ui <- function() {
style ="padding: 0 15px; margin-top: 10px;", style ="padding: 0 15px; margin-top: 10px;",
uiOutput("txt_map_selection_bezirk"), uiOutput("txt_map_selection_bezirk"),
uiOutput("txt_map_selection_stadtteil"), uiOutput("txt_map_selection_stadtteil"),
), plotlyOutput("grph_top3", width = "484px", height = "667px")
plotlyOutput("grph_top3", width = "484px", height = "667px"), )
), ),
col_widths = breakpoints( col_widths = breakpoints(
sm = c(12, 12), # Auf kleinen Bildschirmen: untereinander (100% Breite) sm = c(12, 12), # Auf kleinen Bildschirmen: untereinander (100% Breite)
@@ -241,7 +241,6 @@ ui <- function() {
choices = c("Bezirke", "Stadtteile"), choices = c("Bezirke", "Stadtteile"),
selected = "Bezirke" selected = "Bezirke"
), ),
selectizeInput( selectizeInput(
inputId = "search", inputId = "search",
label = tags$span(icon("search"),"Suche"), label = tags$span(icon("search"),"Suche"),
@@ -300,8 +299,8 @@ ui <- function() {
"vergleichs_jahr", "vergleichs_jahr",
"Jahr wählen:", "Jahr wählen:",
choices = c(2024, 2023), choices = c(2024, 2023),
selected = 2024, selected = 2024
), )
), ),
card( card(
card_header(uiOutput("vergleichs_titel")), # Dynamischer Titel card_header(uiOutput("vergleichs_titel")), # Dynamischer Titel