我有一个简单的表，我想生产和只显示计数，没有百分比，这是什么flextable默认值。我找不到类似的问题，在这里或通过阅读包文档。
new_data <- df %>% group_by(var1, var2) %>% select(var1, var2) %>% tabyl(var2) %>% arrange(desc(n)) %>% flextable() %>% print()
vwhgwdsa1#
这与flextable无关。它是janitor::tably添加百分比列，然后显示在flextable中。如果你不想要百分比，你可以使用dplyr::count来创建频率表。使用基于mtcars的最小可重现示例。
flextable
janitor::tably
dplyr::count
mtcars
library(flextable) library(dplyr) mtcars %>% count(cyl) %>% arrange(desc(n)) %>% flextable()
fruv7luv2#
使用您的代码：删除带有select的列：
select
library(dplyr) library(janitor) library(flextable mtcars %>% group_by(cyl, am) %>% select(cyl, am) %>% tabyl(am) %>% arrange(desc(n)) %>% select(-percent) %>% flextable()
2条答案
按热度按时间vwhgwdsa1#
这与
flextable无关。它是janitor::tably添加百分比列，然后显示在flextable中。如果你不想要百分比，你可以使用dplyr::count来创建频率表。使用基于
mtcars的最小可重现示例。fruv7luv2#
使用您的代码：删除带有
select的列：