Отсутствующая категория будет показана внизу

Question

Я хочу, чтобы категория «Отсутствует» отображалась внизу в результате после группового поиска. В столбце x может быть любое символьное значение. Смотрите пример ниже.

library(dplyr)
df <- data.frame(x = c('Ap','LA','MN', 'Missing','ZA'),
                 y = c('PA','NA','DN', 'Missing','ZD'),
                 z = 1:5,
                 stringsAsFactors = F)

df %>% group_by(x) %>% summarise(x1 = sum(z))

Answer 1

Soultion используя dplyr::arrange:

df %>% group_by(x) %>%
  summarise(x1 = sum(z)) %>%
  arrange(x == "Missing", x)

Возвращает:

# A tibble: 5 x 2
  x          x1
  <chr>   <int>
1 Ap          1
2 LA          2
3 MN          3
4 ZA          5
5 Missing     4

Answer 2

Вы можете регулировать уровни факторов, оставляя «отсутствующим» в конце.

librrary(dplyr)

levels <- c(setdiff(unique(df$x), 'Missing'), 'Missing')

df %>% 
  mutate(x = factor(x, levels = levels)) %>%
  group_by(x) %>% 
  summarise(x1 = sum(z))

# A tibble: 5 x 2
#  x          x1
#  <fct>   <int>
#1 Ap          1
#2 LA          2
#3 MN          3
#4 ZA          5
#5 Missing     4