"将变量传递给过滤器 - R dplyr"

Question

这是我拥有的数据集的示例。 我正在寻找拥有最多商店数量的州。 在这种情况下，CA 还可以查看有多少 ID 来自该州

| ID | | State | | Stores| 
| -- | |------ | | ----- | 
|a11 | | CA    | | 16585 | 
|a12 | | CA    | | 45552 | 
|a13 | | AK    | | 7811  |
|a14 | | MA    | | 4221  |

Answer 1

这是一个tidyverse<\/code>方法。

如果您的Stores<\/code>列是数字，我们可以以相反的顺序排列此列，以便最大值为第一行。 然后过滤与第一行匹配的State<\/code> ，然后进行summarise<\/code> 。

library(tidyverse)

df %>% arrange(desc(Stores)) %>% 
  filter(State == first(State)) %>% 
  group_by(State) %>% 
  summarize(Count_ID = n())

Answer 2

几种方法：

max_state %>% 
  left_join(df) %>%
  summarize(n = n())

df %>%
  filter(State == max_state$State) %>%
  summarize(n = n())

df %>%
  group_by(State) %>%
  mutate(Stores_total = sum(Stores)) %>%
  filter(Stores_total == max(Stores_total)) %>% 
  count(ID)