Question

我有这个表，它是通过结合使用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"))

Data Excerpt

Answer 1

您尚未对表中的行进行分组，因此无法取消分组。您已经将两个表中的列“联接”在一起了。为了解决这个问题，您可以简单地对表进行子集选择，在表1中选择所需的列并将其分配给新对象。并对表2进行同样的操作。

即

setStyleProp('left', '250px')

如何在R中取消合并表的分组？

1 个答案: