Skip to contents

summarizor object should be transformed into a flextable with method as_flextable().

Usage

# S3 method for class 'summarizor'
as_flextable(x, ...)

Arguments

x

result from summarizor()

...

arguments for as_flextable.tabulator()

Examples

z <- summarizor(CO2[-c(1, 4)],
  by = "Treatment",
  overall_label = "Overall"
)
ft_1 <- as_flextable(z, spread_first_col = TRUE)
ft_1 <- prepend_chunks(ft_1,
  i = ~ is.na(variable), j = 1,
  as_chunk("\t")
)
ft_1 <- autofit(ft_1)
ft_1

nonchilled
(N=40)

chilled
(N=42)

Overall
(N=82)

Plant

 Qn1

5 (12.5%)

0 (0.0%)

5 (6.1%)

 Qn2

7 (17.5%)

0 (0.0%)

7 (8.5%)

 Qn3

7 (17.5%)

0 (0.0%)

7 (8.5%)

 Qc1

0 (0.0%)

7 (16.7%)

7 (8.5%)

 Qc3

0 (0.0%)

7 (16.7%)

7 (8.5%)

 Qc2

0 (0.0%)

7 (16.7%)

7 (8.5%)

 Mn3

7 (17.5%)

0 (0.0%)

7 (8.5%)

 Mn2

7 (17.5%)

0 (0.0%)

7 (8.5%)

 Mn1

7 (17.5%)

0 (0.0%)

7 (8.5%)

 Mc2

0 (0.0%)

7 (16.7%)

7 (8.5%)

 Mc3

0 (0.0%)

7 (16.7%)

7 (8.5%)

 Mc1

0 (0.0%)

7 (16.7%)

7 (8.5%)

Type

 Quebec

19 (47.5%)

21 (50.0%)

40 (48.8%)

 Mississippi

21 (52.5%)

21 (50.0%)

42 (51.2%)

conc

 Mean (SD)

445.6 (299.9)

435.0 (297.7)

440.2 (297.0)

 Median (IQR)

350.0 (500.0)

350.0 (500.0)

350.0 (500.0)

 Range

95.0 - 1,000.0

95.0 - 1,000.0

95.0 - 1,000.0

uptake

 Mean (SD)

30.8 (9.6)

23.8 (10.9)

27.2 (10.8)

 Median (IQR)

31.3 (12.3)

19.7 (20.4)

28.3 (18.8)

 Range

10.6 - 45.5

7.7 - 42.4

7.7 - 45.5