df1 <-
data.frame(
smoke_status = c("smoker", "non-smoker",
"smoker", "smoker",
"smoker", "smoker",
"non-smoker"
),
hypertension = c(1, 1, 0, 1, 1, 1, 1),
age = c(60, 50, 56, 49, 75, 69, 85),
bmi = c(18, 30, 25, 22, 23, 21, 22)
)
# Use default formatting
desc_facvar(.data = df1, vf = c("hypertension", "smoke_status"))
# Use custom formatting
desc_facvar(.data = df1,
vf = c("hypertension", "smoke_status"),
format = "n_ out of N_, pc_%",
digits = 1)
# You might want to export raw values, to run plotting or
# other formatting functions
desc_facvar(.data = df1,
vf = c("hypertension", "smoke_status"),
export_raw_values = TRUE)
Run the code above in your browser using DataLab