Check if a directory is empty in R

Question

My script currently checks a folder called \'current\', that always has data in it, the folder I\'m trying to conditionally check is called \'future\' and it only periodical