如何使用 kableExtra 构建一个带有汇总月份但不汇总其他列值的 table

How to build a table with kableExtra with summarized months but not summarize the values of the other columns

我想要一个包含我所有专栏的table。

数据框如下所示:

所以我想要一个 table,它只显示州、政党、人口、病例、死亡,cases/100K。 没有日期,但有数据集中最近一天的值,今天是 2020-09-29。

我这样试过:

corona_cases_month <- corona_party_states %>% group_by(state, Party, Date=floor_date(Date)) %>% rename("Population"=totalPopulation, "Confirmed Cases"=totalConfirmed, "Confirmed Deaths"=totalDeaths, "Cases/100K"=CasesPop)

corona_cases_month %>%
kbl() %>%
  kable_paper("hover", full_width = F) %>%
    kable_styling(fixed_thead = T) %>%
   column_spec(1, bold = T, border_right = T) %>%
column_spec(6, bold = T, color = "orange")

但这不是正确的结果,因为它仍然在新行中显示每个日期。

我之前用 floor 函数试过它,它起作用了——但我用了总结,当然还有人口、病例、死亡的值都错了:

如何仅使用昨天的值构建此 table?

我建议过滤数据以仅保留具有最后日期的行。我不会尝试在 group_by 中创建新变量,而是在 mutate 中创建新变量。这是一种方式:

corona_cases_month <- corona_party_states %>% 
  group_by(state, Party) %>% 
  mutate(Date_new=floor_date(Date)) %>% 
  filter(Date == Date_new) %>% 
  ungroup() %>% 
  group_by(state, Party, Date_new) %>%
  rename("Population"=totalPopulation, "Confirmed Cases"=totalConfirmed, "Confirmed Deaths"=totalDeaths, "Cases/100K"=CasesPop)