Transform a 'grouped_data' object into a flextable
Source:R/as_flextable.R
as_flextable.grouped_data.Rd
Produce a flextable from a table
produced by function as_grouped_data()
.
Usage
# S3 method for class 'grouped_data'
as_flextable(x, col_keys = NULL, hide_grouplabel = FALSE, ...)
Arguments
- x
'grouped_data' object to be transformed into a "flextable"
- col_keys
columns names/keys to display. If some column names are not in the dataset, they will be added as blank columns by default.
- hide_grouplabel
if TRUE, group label will not be rendered, only level/value will be rendered.
- ...
unused argument
See also
Other as_flextable methods:
as_flextable()
,
as_flextable.data.frame()
,
as_flextable.gam()
,
as_flextable.glm()
,
as_flextable.htest()
,
as_flextable.kmeans()
,
as_flextable.lm()
,
as_flextable.merMod()
,
as_flextable.pam()
,
as_flextable.summarizor()
,
as_flextable.table()
,
as_flextable.tabular()
,
as_flextable.tabulator()
,
as_flextable.xtable()
Examples
library(data.table)
CO2 <- CO2
setDT(CO2)
CO2$conc <- as.integer(CO2$conc)
data_co2 <- dcast(CO2, Treatment + conc ~ Type,
value.var = "uptake", fun.aggregate = mean
)
data_co2 <- as_grouped_data(x = data_co2, groups = c("Treatment"))
ft <- as_flextable(data_co2)
ft <- add_footer_lines(ft, "dataset CO2 has been used for this flextable")
ft <- add_header_lines(ft, "mean of carbon dioxide uptake in grass plants")
ft <- set_header_labels(ft, conc = "Concentration")
ft <- autofit(ft)
ft <- width(ft, width = c(1, 1, 1))
ft
mean of carbon dioxide uptake in grass plants
Concentration
Quebec
Mississippi
Treatment: nonchilled
95
15.26667
11.30000
175
30.03333
20.20000
250
37.40000
27.53333
350
40.36667
29.90000
500
39.60000
30.60000
675
41.50000
30.53333
1,000
43.16667
31.60000
Treatment: chilled
95
12.86667
9.60000
175
24.13333
14.76667
250
34.46667
16.10000
350
35.80000
16.60000
500
36.66667
16.63333
675
37.50000
18.26667
1,000
40.83333
18.73333
dataset CO2 has been used for this flextable