From: https://rosettacode.org/wiki/Find_common_directory_path#R
get_common_dir(paths, delim = "/")
paths
vector of paths
delim
folder delimiter