# \donttest{
data(crashMD)
output <- meltt(crash_data1, crash_data2, crash_data3,
taxonomies = crash_taxonomies, twindow = 1, spatwindow = 3)
# }
if (FALSE) {
# app will activate to validate sample.
meltt_validate(output)
# for smaller sample, must reset to overwrite existing validation sample
meltt_validate(output, sample_prop=.1, reset = TRUE)
# override of the validation to get a sense of the report
output$validation$validation_set$coding = 1
meltt_validate(output)
}
Run the code above in your browser using DataLab