如何在表格上调用或使用 formattable答案

【问题标题】：How to call or use formattable on a table如何在表格上调用或使用 formattable
【发布时间】：2020-03-09 10:36:03
【问题描述】：

我有一个数据框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。希望我遵守礼节。

最好的问候托洛里

【问题讨论】：

欢迎来到 SO ！您能否提供数据框的最小可重现示例？（见此链接：stackoverflow.com/questions/5963269/…）。此外，现在，您没有在命令中指定任何格式显示。你能澄清一下你想要的输出是什么吗？
感谢您的链接。由于问题已经得到解答，我将保持这样的状态，但下次一定会记住这一点！

标签： r formattable

【解决方案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)

【讨论】：