assert_is_list(x, severity = getOption("assertive.severity", "stop")) assert_is_pairlist(x, severity = getOption("assertive.severity", "stop")) is_list(x, .xname = get_name_in_parent(x)) is_pairlist(x, .xname = get_name_in_parent(x))
"stop"
"warning"
"message"
"none"
is_list
is.list
assert_is_list(list(1,2,3)) assert_is_pairlist(.Options) #These examples should fail. assertive.base::dont_stop({ assert_is_list(1:10) assert_is_pairlist(options()) })
Run the code above in your browser using DataLab