Nothing
Code
tbl %>% as.data.frame()
Output
**Caractéristique** **Drug A**, N = 98 **Drug B**, N = 102 **p-valeur**
1 Age <NA> <NA> 0,72
2 Médiane (EI) 46 (37 – 59) 48 (39 – 56) <NA>
3 Manquant 7 4 <NA>
4 Marker Level (ng/mL) <NA> <NA> 0,085
5 Médiane (EI) 0,84 (0,24 – 1,57) 0,52 (0,19 – 1,20) <NA>
6 Manquant 6 4 <NA>
7 T Stage, n (%) <NA> <NA> 0,87
8 T1 28 (29) 25 (25) <NA>
9 T2 25 (26) 29 (28) <NA>
10 T3 22 (22) 21 (21) <NA>
11 T4 23 (23) 27 (26) <NA>
12 Grade, n (%) <NA> <NA> 0,87
13 I 35 (36) 33 (32) <NA>
14 II 32 (33) 36 (35) <NA>
15 III 31 (32) 33 (32) <NA>
16 Tumor Response, n (%) 28 (29) 33 (34) 0,53
17 Manquant 3 4 <NA>
18 Patient Died, n (%) 52 (53) 60 (59) 0,41
19 Months to Death/Censor <NA> <NA> 0,14
20 Médiane (EI) 23,5 (17,4 – 24,0) 21,2 (14,6 – 24,0) <NA>
Code
lm(age ~ marker + grade, trial) %>% tbl_regression() %>% as.data.frame()
Output
**Caractéristique** **Beta** **(95% CI)** **p-valeur**
1 Marker Level (ng/mL) -0,04 (-2,6 to 2,5) 0,98
2 Grade <NA> <NA>
3 I <NA> <NA>
4 II 0,64 (-4,7 to 6,0) 0,81
5 III 2,4 (-2,8 to 7,6) 0,37
Code
tbl_theme %>% as.data.frame()
Output
**Characteristic** **N = 200**
1 Chemotherapy Treatment <NA>
2 Drug A 98 / 200 (49%)
3 Drug B 102 / 200 (51%)
4 Age <NA>
5 Median (IQR) 47 (38 - 57)
6 Mean (SD) 47 (14)
7 Unknown 11
Code
tbl1
Output
# A tibble: 2 x 5
label stat_1 stat_2 estimate p.value
<chr> <chr> <chr> <chr> <chr>
1 Age, Median (IQR) 46 (37 – 59) 48 (39 – 56) -0.44 (-4.6 to 3.7) 0.83
2 Tumor Response, n (%) 28 (29) 33 (34) -4.2% (-18% to 9.9%) 0.64
Code
tbl_qjecon1 %>% as.data.frame()
Output
**Characteristic** **Beta** \n**(SE)**
1 Grade <NA>
2 I <NA>
3 II 1.4 \n(2.54)
4 III 2.0 \n(2.55)
Code
tbl_qjecon2 %>% as.data.frame()
Output
**Characteristic** **N** **Beta** \n**(SE)**
1 mpg 32 -8.8*** \n(1.31)
2 cyl 32 32*** \n(3.88)
3 disp 32 0.44*** \n(0.062)
4 drat 32 -58** \n(20.9)
5 wt 32 46*** \n(9.63)
6 qsec 32 -27*** \n(4.95)
7 vs 32 -98*** \n(17.2)
8 am 32 -33 \n(24.3)
9 gear 32 -12 \n(16.8)
10 carb 32 32*** \n(5.13)
Code
tbl
Output
# A tibble: 5 x 2
label stat_0
<chr> <chr>
1 Age <NA>
2 Median (IQR) 47 (38, 57)
3 Mean (SD) 47 (14)
4 Range 6, 83
5 Unknown 11
Code
with_gtsummary_theme(theme_gtsummary_journal("lancet"), lm(mpg ~ factor(cyl) +
hp + am, mtcars) %>% tbl_regression() %>% as_tibble())
Output
# A tibble: 6 x 4
`**Characteristic**` `**Beta**` `**95% CI**` `**p-value**`
<chr> <chr> <chr> <chr>
1 factor(cyl) <NA> <NA> <NA>
2 4 <NA> <NA> <NA>
3 6 -3·9 -7·1 to -0·77 0·017
4 8 -3·5 -8·7 to 1·6 0·17
5 hp -0·04 -0·07 to -0·01 0·0053
6 am 4·2 1·6 to 6·7 0·0027
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.