tibble 的交叉表变量并使输出可读
crosstab variables of tibble and make the output readable
我必须对 tibble 的变量进行交叉制表。我为此使用了 table()
,但输出不容易阅读。
有没有办法格式化输出以使其更易于阅读。
谢谢
library(tidyverse)
# random arrays of 0 and 1
a <- sample(c(0, 1, 2, 3, 4, 5), replace = TRUE, size = 100)
b <- sample(c(0, 1, 2, 3, 4, 5), replace = TRUE, size = 100)
tbl <- tibble(a, b)
cross_tab <- table(tbl$a, tbl$b)
cross_tab
我对这些类型的表格使用 expss
:
library(expss)
cro(tbl$a,tbl$b) %>% htmlTable()
您可以在上面的命令之前加上 expss 命令 apply_labels
来格式化变量和值名称。有关详细信息,请参阅文档。
我必须对 tibble 的变量进行交叉制表。我为此使用了 table()
,但输出不容易阅读。
有没有办法格式化输出以使其更易于阅读。
谢谢
library(tidyverse)
# random arrays of 0 and 1
a <- sample(c(0, 1, 2, 3, 4, 5), replace = TRUE, size = 100)
b <- sample(c(0, 1, 2, 3, 4, 5), replace = TRUE, size = 100)
tbl <- tibble(a, b)
cross_tab <- table(tbl$a, tbl$b)
cross_tab
我对这些类型的表格使用 expss
:
library(expss)
cro(tbl$a,tbl$b) %>% htmlTable()
您可以在上面的命令之前加上 expss 命令 apply_labels
来格式化变量和值名称。有关详细信息,请参阅文档。