diff --git a/IT Shiny App.R b/IT Shiny App.R index e5edc28..4c36e1e 100644 --- a/IT Shiny App.R +++ b/IT Shiny App.R @@ -25,7 +25,7 @@ map_data_to_table <- function(bezirk, stadtteil, year) { Name = crime, `Erfasste Fälle` = as.integer(row[["Erfasste Fälle"]]), `Aufgeklärte Fälle` = as.integer(row[["Aufgeklärte Fälle"]]), - `Aufklärung relativ` = row[["Aufklärung relativ"]] + `Aufklärung relativ` = paste(row[["Aufklärung relativ"]], "%", sep=""), ) }) }