r - 使用 dplyr 计数

Question

有了这个数据框:

df = data.frame(mes = c(1,1,2,2,3,3), 
                ano = c(1981, 1982,1983), 
                x1 = c(95,8,10,NA,NA,98), 
                x2 = c(NA, NA, 89, 48, NA, 10))
> df
  mes  ano x1 x2
1   1 1981 95 NA
2   1 1982  8 NA
3   2 1983 10 89
4   2 1981 NA 48
5   3 1982 NA NA
6   3 1983 98 10

我想得到这个:

  mes x1_n x2_n
1   1    2    0
2   2    1    2
3   3    1    1

我的意思是，对于每个 mes 唯一值，我想知道有多少个非 NA 值。我正在尝试使用 dplyr::count() 但我得到了这个:

> count(df,mes)
# A tibble: 3 × 2
    mes     n
  <dbl> <int>
1     1     2
2     2     2
3     3     2

有什么想法吗？谢谢。

Answer 1

count 为您提供观察次数。如果您对非 NA 的观察次数感兴趣，您可以:

 df %>%
   group_by(mes) %>%
   summarize(x1_n = sum(!is.na(x1)),
             x2_n = sum(!is.na(x2)))