我通过连接另外两个用CPS数据创建的表创建了这个表。我加入了age和sex的行列,然后在这个假设的经济中,我计算了每个年龄和性别的劳动力参与率。现在,我需要按age和sex折叠表,以便获得总人口劳动力参与率,但是由于某些原因,ungroup()命令不起作用。我已经在附加的图像链接中包含了数据的摘录,以及到目前为止我所拥有的代码。
cps_summary2 <- left_join(cps_summary2015, cps_summary1995,
by = c("age", "sex"))
cps_summary2 <- cps_summary2 %>% mutate(estWorkingAgePop = cps_summary2$total_pop.x * cps_summary2$lfpr.y)
cps_summary2 <- cps_summary2 %>% mutate(laborforcerate = estWorkingAgePop/total_pop.y) %>%
ungroup(cps_summary2, by = c("age", "sex"))

发布于 2019-11-25 08:12:56
您尚未对表中的行进行分组,因此无法取消分组。您将来自两个表的列“联接”在一个键上。要反转这种情况,您可以简单地子集表,在表1中选择您想要的列并将其分配给一个新对象;然后对表2执行相同的操作。
即
iris.1 <- iris %>%
select(Petal.width, Petal.length)
iris.2 <- iris %>%
select(-c(Petal.width, Petal.length))https://stackoverflow.com/questions/59023156
复制相似问题