# create dummy delimitation outputs
delim_1 <- tibble::tibble(
labels = paste0("seq", 1:10),
method_A = c(rep(1, 5), rep(2, 5))
)
delim_2 <- tibble::tibble(
labels = paste0("seq", 1:10),
method_B = c(rep(1, 3), rep(2, 2), rep(3, 5))
)
delim_3 <- tibble::tibble(
labels = paste0("seq", 1:10),
method_C = c(rep(1, 3), rep(2, 2), rep(3, 3), rep(4, 2))
)
# check outputs
check_delim(list(delim_1, delim_2, delim_3))
Run the code above in your browser using DataLab