如何在表格上调用或使用格式表

Question

我有一个数据框my_df，其中包含两列性别（m / f）和患病（yes / no）。我使用以下两种方法创建了一个列联表：

my_table <- addmargins(table(my_df$gender, my_df$sick))

现在，我想通过使用刚刚发现的formattable :: formattable（）函数来设置非常基本的输出样式，但是在第一步操作中我失败了formattable(my_table)的返回结果与my_table相同。我想念什么？

当前正在尝试使用本指南：https://www.littlemissdata.com/blog/prettytables

[潜伏了几周，以某种方式开始使用R之后的第一次发帖。希望我一直保持礼节。

最好的问候tholori

Answer 1

我看了看文档。 formattable适用于data.frames，而不适用于表对象。要使用表，您必须将其转换为data.frame。当转换中断表格布局时，您必须重新调整生成的df的形状，例如来自spread的tidyr。

library(dplyr)
library(tidyr)
library(formattable)

# example data = mtcars
my_table <- addmargins(table(factor(mtcars$cyl), factor(mtcars$gear))) %>% 
  as.data.frame() %>% 
  spread(Var2, Freq)

formattable(my_table)