# NOT RUN {
getPath(c(a="this.good.path/filename.R", b="nopath.R", c="/", d=NA,
e="path1/path2/", ""))
# An example with 'real' files
files <- dir(file.path(path.package(package = "Smisc"), "data"), full.names = TRUE)
print(files)
getPath(files)
# }
Run the code above in your browser using DataLab