Carpeta principal para el directorio de trabajo en R

Path="FolderA/FolderB/FolderC/FolderD"

dirname(Path)
Trustworthy Whale