# NOT RUN {
# Use `exibble` to create a gt table;
# NA values in different columns will
# be given replacement text
tab_1 <-
exibble %>%
dplyr::select(-row, -group) %>%
gt() %>%
fmt_missing(
columns = 1:2,
missing_text = "missing"
) %>%
fmt_missing(
columns = 4:7,
missing_text = "nothing"
)
# }
Run the code above in your browser using DataLab