Takes a file path and converts it to its directory path by
dropping the file name and extension. If
flpth is already a directory
path, the argument will be returned unchanged. If nothing is provided,
nothing is returned (i.e.
File path for which directory path will be returned.
library(outsider.base) # get the parent directory from a filepath drpth <- tempdir() flpth <- file.path(drpth, 'testfile') file.create(flpth)#>  TRUE(dirpath_get(flpth = flpth) == drpth)#>  FALSE(dirpath_get(flpth = drpth) == drpth)#>  TRUEfile.remove(flpth)#>  TRUE