Объедините результат из top_n с категорией «Другое» в dplyr
У меня есть фрейм данныхDAT1
Country Count
1 AUS 1
2 NZ 2
3 NZ 1
4 USA 3
5 AUS 1
6 IND 2
7 AUS 4
8 USA 2
9 JPN 5
10 CN 2
Сначала я хочу подвести итог «Количество» на «Страна». Затем три верхних общих показателя по стране следует объединить с дополнительной строкой «Другие», которая представляет собой сумму стран, которые не входят в первую тройку.
Следовательно, ожидаемый результат будет следующим:
Country Count
1 AUS 6
2 JPN 5
3 USA 5
4 Others 7
Я попробовал приведенный ниже код, но не смог понять, как разместить строку «Другие».
dat1 %>%
group_by(Country) %>%
summarise(Count = sum(Count)) %>%
arrange(desc(Count)) %>%
top_n(3)
Этот код в настоящее время дает:
Country Count
1 AUS 6
2 JPN 5
3 USA 5
Любая помощь будет принята с благодарностью.
dat1 <- structure(list(Country = structure(c(1L, 5L, 5L, 6L, 1L, 3L,
1L, 6L, 4L, 2L), .Label = c("AUS", "CN", "IND", "JPN", "NZ",
"USA"), class = "factor"), Count = c(1L, 2L, 1L, 3L, 1L, 2L,
4L, 2L, 5L, 2L)), .Names = c("Country", "Count"), class = "data.frame", row.names = c("1",
"2", "3", "4", "5", "6", "7", "8", "9", "10"))