up level directory
upper.dir(dir, end.slash = TRUE)
dir
present directory or file path
end.slash
logical
upper directory