Update and style second page

This commit is contained in:
2026-02-07 20:10:11 +01:00
parent a7f7aafd1f
commit 09ef5ecff0

23
ui.R
View File

@@ -105,6 +105,10 @@ ui <- function() {
.bslib-card .card-body {
padding: 0;
}
.card-body.bslib-gap-spacing.html-fill-item.html-fill-container{
border-radius: 12px;
box-shadow: 0 4px 8px rgba(0,0,0,0.2);
}
#grph_top3 {
height: 100% !important;
}
@@ -142,9 +146,23 @@ ui <- function() {
.selectize-control.multi .selectize-input {
padding-right: 35px !important;
}
.selectize-control.multi .selectize-input > div {
border-radius: 12px;
padding: 2px 16px 2px 16px;
background: #d5f4ff;
}
.selectize-control.multi .selectize-input > div.active {
background: #b8ecff;
color: #000;
}
.selectize-dropdown.plugin-dropdown_header .selectize-dropdown-header {
display: none;
}
#vergleich_balkendiagramm {
border-radius: 12px;
overflow: hidden;
box-shadow: 0 4px 8px rgba(0,0,0,0.2);
}
"
)
@@ -374,10 +392,7 @@ ui <- function() {
selected = 2024
)
),
card(
card_header(uiOutput("vergleichs_titel")), # Dynamischer Titel
plotlyOutput("vergleich_balkendiagramm")
)
plotlyOutput("vergleich_balkendiagramm")
)
),