Фильтр после group_by в r - PullRequest
Новая
       37

Фильтр после group_by в r

0 голосов
/ 01 октября 2018

Я хочу отфильтровать некоторые данные после того, как я использую group_by для переменного года yr.У меня есть год, когда кредиты выдаются yr, status кредита и amount.Я хочу узнать общее количество выданных ссуд, сколько из них имеет статус «Изменен» и сумму ссуд со статусом «Вычтено» за каждый yr

То, что я пробовал, это 

    data %>% select(status, yr, amount)%>%
                     group_by(yr) %>%
                     summarise(Nr_of_laons=count(),
                            nr_charged_off=as.numeric(nrow(filter(status=="Charged Off"))))

Должен быть ужин, но я не мог найти ошибку.

Любая помощь?

1 Ответ

0 голосов
/ 01 октября 2018

После group_by получите счет с n() и получите sum логического выражения 

data %>%
     group_by(yr) %>%
     summarise(Nr_of_loans = n(), 
               nr_charged_off= sum(status=="Charged Off"),
               Amt_loans = sum(amount[status== "Charged Off"]))
...