r - 如何创建一个表

Question

我想使用 R 创建一个表。我发现[这里]有一个类似的问题:How can I add a table to my ggplot2 output? ，但最佳答案无法解决我的问题。

Answer 1

您可以按照评论的建议在单独的图中绘制表值，并使用 plot_grid 排列图。来自 cowplot包裹。

library(cowplot)
# assume the original plot was named p1

p2 <- ggplot(df, aes(x=avisit, y=forcats::fct_rev(Type), label = n)) + 
  geom_text(size = 3) +
  xlab("") +
  facet_grid(.~factor(visit)) +
  theme_void() +
  theme(axis.text.y = element_text(size = 10, margin = margin(r = 0)),
        panel.spacing = unit(0, "mm"),
        strip.text = element_blank())
# vary the size in geom_text / axis.text.y depending on your desired plot dimensions.

plot_grid(p1, p2, align = "v", axis = "lr",
          ncol = 1, rel_heights = c(1, 0.2))