Я хочу показать процент

Question

Что я должен написать в обобщенном виде, чтобы показать процентное соотношение количества несчастных случаев. Спасибо

dfc %>% 
  group_by(Urban_or_Rural_Area) %>% 
  summarise(
    Accidents = mean(Number_of_Casualties), 
    `Amount of Accidents` = n()
  )

Answer 1

Возможно, где-то есть дурак, но ...

library(dplyr)
mtcars %>%
  group_by(cyl) %>%
  summarize(Amt = n()) %>%
  ungroup() %>%
  mutate(Pct = 100 * Amt / sum(Amt))
# # A tibble: 3 x 3
#     cyl   Amt   Pct
#   <dbl> <int> <dbl>
# 1     4    11  34.4
# 2     6     7  21.9
# 3     8    14  43.8