This function allows you to return either the data stored in `$data` or the flowchart information stored in `$fc`.
Examples
#Return the data associated to the flowchart
safo |>
as_fc(label = "Patients assessed for eligibility") |>
fc_filter(!is.na(group), label = "Randomized", show_exc = TRUE) |>
fc_view("data")
#> # A tibble: 215 × 21
#> id inclusion_crit exclusion_crit chronic_heart_failure expected_death_24h
#> <int> <fct> <fct> <fct> <fct>
#> 1 3 No No No No
#> 2 5 No No No No
#> 3 9 No No No No
#> 4 12 No No No No
#> 5 14 No No No No
#> 6 27 No No No No
#> 7 29 No No No No
#> 8 32 No No No No
#> 9 50 No No No No
#> 10 51 No No No No
#> # ℹ 205 more rows
#> # ℹ 16 more variables: polymicrobial_bacteremia <fct>,
#> # conditions_affect_adhrence <fct>, susp_prosthetic_valve_endocard <fct>,
#> # severe_liver_cirrhosis <fct>, acute_sars_cov2 <fct>,
#> # blactam_fosfomycin_hypersens <fct>, other_clinical_trial <fct>,
#> # pregnancy_or_breastfeeding <fct>, previous_participation <fct>,
#> # myasthenia_gravis <fct>, decline_part <fct>, group <fct>, itt <fct>, …
#Return the flowchart information
safo |>
as_fc(label = "Patients assessed for eligibility") |>
fc_filter(!is.na(group), label = "Randomized", show_exc = TRUE) |>
fc_view("fc")
#> # A tibble: 3 × 17
#> id x y n N perc text type group just text_color text_fs
#> <int> <dbl> <dbl> <int> <int> <chr> <chr> <chr> <lgl> <chr> <chr> <dbl>
#> 1 1 0.5 0.667 925 925 100 "Pat… init NA cent… black 8
#> 2 2 0.5 0.333 215 925 23.24 "Ran… filt… NA cent… black 8
#> 3 3 0.65 0.5 710 925 76.76 "Exc… excl… NA cent… black 6
#> # ℹ 5 more variables: text_fface <dbl>, text_ffamily <lgl>, text_padding <dbl>,
#> # bg_fill <chr>, border_color <chr>