我使用expss包来生成表，然后将它们传递给huxtable这工作正常，但height函数似乎不起作用。任何见解？无论使用主题或导出到HTML或Word，都会发生这种情况。

t<-mpg %>% tab_cells(hwy,displ) %>%
  tab_rows(manufacturer) %>% 
  tab_stat_mean() %>%
  tab_pivot() %>% 
  set_caption("Car Stats") %>% 
  as_huxtable() %>% 
  set_col_width(1,.1)  %>%
  theme_article()

height(t)<-0.1   # if I change this to 0.2 I get the same result...

t