diff --git a/vignettes/REDCapCAST.Rmd b/vignettes/REDCapCAST.Rmd
index 696ca20..4177ed3 100644
--- a/vignettes/REDCapCAST.Rmd
+++ b/vignettes/REDCapCAST.Rmd
@@ -110,7 +110,8 @@ wide_data_suffixes <- wide_data |> suffix2label()
 ## Creating a nice table
 
 ```{r}
-wide_data_suffixes |>
+wide_data_suffixes |> 
+  as_factor()|>
   dplyr::select(sex, hypertension, diabetes,mrs_score____follow2) |>
-  gtsummary::tbl_summary()
+  gtsummary::tbl_summary(type = gtsummary::all_dichotomous() ~ "categorical")
 ```