# NOT RUN {
tmp <- dir_create(file_temp())
file_create(path(tmp, "file.txt"))
dir_create(path(tmp, "dir"))
link_create(path(tmp, "file.txt"), path(tmp, "link"))
paths <- dir_ls(tmp)
is_file(paths)
is_dir(paths)
is_link(paths)
# }
Run the code above in your browser using DataLab