data(lse_synthetic_rules)
names(lse_synthetic_rules)
head(lse_synthetic_rules$edit)
if (requireNamespace("validate", quietly = TRUE)) {
edit_rules <- validate::validator(.data = lse_synthetic_rules$edit)
length(edit_rules)
}
Run the code above in your browser using DataLab