Подсчет вхождений фактора по группе

Question

Я имею дело с некоторыми проблемами с dplyr.Я хотел бы создать новую переменную, которая является частотой уровня фактора, но я хотел бы сделать это по группам.Вот выдержка из моих данных:

head(Dataset)
Code_PR   Code_SP  Status_SP
  PR1        SP1       0
  PR1        SP2       0
  PR1        SP3       1
  PR2        SP1       0
  PR2        SP2       1

Я хотел бы получить такой результат:

Code_PR   Count  Ratio
  PR1      3       1/3 
  PR2      2       1/2

Я попробовал следующий код и изменил его, но всегда получаю один и тот жеошибка:

RatioAb <-  Database_V2  %>%
group_by(CodePR, StatutSP) %>%
summarize(
n=n(),
Ratio =count(StatutSP, '1')/count(StatutSP)
)
Error in summarise_impl(.data, dots) : 
Evaluation error:
no applicable method for 'group_by_' applied to an object of class 
"logical"

Как я могу это исправить?

Answer 1

Dataset %>% 
  group_by(Code_PR) %>% 
  summarise(Count = n(), Ratio = paste0(sum(Status_SP),"/",n()))

Answer 2

df %>% 
  group_by(Code_PR) %>% 
  summarise(Count = n()
            , Ratio = mean(Status_SP))

## A tibble: 2 x 3
#   Code_PR Count Ratio
#   <chr>   <int> <dbl>
# 1 PR1         3 0.333
# 2 PR2         2 0.500