From 10d0a9ad05661215869bd7ea6b8026ff1a3d1033 Mon Sep 17 00:00:00 2001 From: Millicool Date: Fri, 6 Feb 2026 15:54:21 +0100 Subject: [PATCH] Make whitespace changes and a small change in vjust --- server.R | 7 +------ 1 file changed, 1 insertion(+), 6 deletions(-) diff --git a/server.R b/server.R index 02affbb..1274a7c 100644 --- a/server.R +++ b/server.R @@ -242,12 +242,8 @@ server <- function(input, output, session) { "#e6f9ff" )) + geom_text( - # Die Text-Ästhetik soll der Wert aus der Spalte 'Erfasst' sein aes(label = format(Erfasst, big.mark = ".", decimal.mark = ",")), - # Platzierung: Y-Wert des Textes = Wert der Spalte + Offset - # Wir verwenden den Offset, um den Text knapp über den Balken zu platzieren - # Wenn Sie den Text IN den Balken setzen möchten, setzen Sie y=Erfasst/2 - vjust = -0.5, # Vertikale Ausrichtung: Negativer Wert platziert Text über dem Punkt + vjust = -0.8, # Vertikale Ausrichtung: Negativer Wert platziert Text über dem Punkt size = 4, fontface = "bold" ) + @@ -257,7 +253,6 @@ server <- function(input, output, session) { y = "Anzahl erfasster Fälle" ) + theme_pander() + #neues theme aus ggthemes packages - # NEUE ANPASSUNG: Drehen der X-Achsen-Beschriftungen theme( plot.background = element_rect( color = "darkgrey", # Farbe des Rahmens