Millicool/shiny-app
1
0
Fork 0
Code Issues Pull Requests 1 Actions Packages Projects Releases Wiki Activity

Fix formatting

Browse Source
This commit is contained in:
C0d3v
2026-02-07 22:09:22 +01:00
parent 9ebc754c44
commit 7da43631ff
1 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
server.R
View File

@@ -270,13 +270,15 @@ server <- function(input, output, session) {
) %>% ) %>%
layout( layout(
autosize = TRUE, autosize = TRUE,
separators = ",.",
xaxis = list( xaxis = list(
title = "<br><br><b>Straftat<b>", title = "<br><br><b>Straftat<b>",
tickangle = 0, tickangle = 0,
ticklabeloverflow = "allow" ticklabeloverflow = "allow"
), ),
yaxis = list( yaxis = list(
title = "<b>Anzahl erfasster Fälle<b>" title = "<b>Anzahl erfasster Fälle<b>",
tickformat=",.0d"
), ),
margin = list(pad = 5) margin = list(pad = 5)
) %>% ) %>%
@@ -332,9 +334,11 @@ server <- function(input, output, session) {
plot <- plot_ly() %>% plot <- plot_ly() %>%
layout( layout(
barmode = 'group', barmode = 'group',
separators = ",.",
colorway = blue_palette(6), colorway = blue_palette(6),
xaxis = list( xaxis = list(
title = "<b>Anzahl erfasster Fälle<b>" title = "<b>Anzahl erfasster Fälle<b>",
tickformat=",.0d"
), ),
yaxis = list( yaxis = list(
title = "<b>Straftat<b>", title = "<b>Straftat<b>",