# \donttest{
# Generate data for the example
set.seed(123L)
jobchange2 <- jobchange[sample(nrow(jobchange), size = 1000), ]
# Visualize the combination variables that is include missing value.
plot_na_intersect(jobchange2)
# Diagnose the data with missing_count using diagnose() function
library(dplyr)
jobchange2 %>%
diagnose %>%
arrange(desc(missing_count))
# Visualize the combination variables that is include missing value
plot_na_intersect(jobchange2)
# Visualize variables containing missing values and complete case
plot_na_intersect(jobchange2, only_na = FALSE)
# Using n_vars argument
plot_na_intersect(jobchange2, n_vars = 5)
# Using n_intersects argument
plot_na_intersect(jobchange2, only_na = FALSE, n_intersacts = 7)
# Non typographic elements
plot_na_intersect(jobchange2, typographic = FALSE)
# }
Run the code above in your browser using DataLab