用于计算每组中因子变量不同水平的数量的功能？

Question

我有一个数据集，其中包含来自多个场所的多个观测值，其中许多具有多个观测值，例如

ID <- paste("s", seq(1,150,1), sep="")
venue <- paste("L", sample(c(1:40), size=150, replace =T), sep="")
group <- c(rep("A", 100), rep("B", 50))
outcome_variable <- c(rnorm(100, 50, 10), rnorm(50, 40, 12))

reprex <- data.frame(ID,venue,group, outcome_variable)

我知道我可以获得每组的观察数和连续变量的摘要统计信息，例如

reprex %>%
  group_by(group) %>%
  summarise(obs=n(),
         mean_outcome =mean(outcome_variable))

但是有没有一种直接的方法来获取此管道中每个组的不同地点的数量（嵌套观测值的地点）？

这似乎应该很简单，但是我已经搜索了一段时间，但似乎什么也找不到！