Run your data science work in the cloud_queue
df %>%
  select(city, rev) %>%
  group_by(city) %>%
  mutate(m = mean(rev)) %>%
  filter(m >= 50000) -> df_2
Notify Me:
New users subscribe to the release of SUMOMI® version 2.0
Thanks for subscribing!