Fix paranthesis and clean up

ui.R

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