powered by
dir.create
unlink
create_dirs(x = temp_file(pattern = "dir")) remove_dirs(x)
create_dirs
tempdir()
dirs <- file.path(temp_dir(), c("foo", "bar/baz")) create_dirs(dirs) # Check this worked: assert_all_are_dirs(dirs) # Clean up remove_dirs(dirs)
Run the code above in your browser using DataLab