x <- 1:5
are_same_length(runif(5), x, list(1, 2:3, 4:6, 7:10, 11:15), 1:6)
assert_any_are_same_length(runif(5), x, list(1, 2:3, 4:6, 7:10, 11:15), 1:6)
dont_stop(assert_all_are_same_length(runif(5), x, list(1, 2:3, 4:6, 7:10, 11:15), 1:6))
Run the code above in your browser using DataLab