# NOT RUN {
df <- data.frame(SiteID = 1:100,
Catvar = sample(LETTERS[1:5], 100, TRUE),
Contvar = rnorm(100, 10, 1),
Gender = rep(c("Male", "Female"), rep(50, 2)))
examine(df, ord = FALSE)
examine(df, "Gender", FALSE)
# }
Run the code above in your browser using DataLab