real_file <- system.file("DESCRIPTION", package = "assertions")
try({
assert_file_exists(real_file) # PASSES
assert_file_exists("foo") # Throws Error
assert_file_exists(c(real_file, real_file)) # Throws Error (should use assert_all_files_exist)
})
Run the code above in your browser using DataLab