如何在dplyr中使用点引用（对于数据框）和组？

Question

考虑以下示例数据：

tmp_df_dplyr <- data.frame(groups = rep(c("C", "B", "A"), each = 3), 
                           a = c(-2, 0, -1, -1, 0, 1, 0, 1, 2), 
                           b = rep(c(-1, 0, 1), each = 3))

除了使用colSums：

之外，我希望执行以下操作

tmp_df_dplyr %>%
    group_by(groups) %>%
    summarise(min_group = min(c(sum(a), sum(b))))
# produces:
# A tibble: 3 × 2
  groups min_group
  <fctr>     <dbl>
1      A         3
2      B         0
3      C        -3

使用点引用，我得到了意想不到的结果：

tmp_df_dplyr %>%
    group_by(groups) %>%
    summarise(min_group = min(colSums(.[, c('a', 'b')])))
# produces
# A tibble: 3 × 2
  groups min_group
  <fctr>     <dbl>
1      A         0
2      B         0
3      C         0

即，看起来这些组没有被应用。