Henrik, thanks!  Your example worked fine.

Listed below is a sample of what I used and the output.
> path <- "C:/MyFiles/Approach/OMRL/Data/"
> pathnames <- list.files(path, full.names=F)
> isDir <- file.info(pathnames)$isdir
> isDir
 [1]  TRUE  TRUE  TRUE FALSE FALSE FALSE FALSE 
> dirs <- pathnames[isDir]
> dirs
[1] "3334"             "d1"               "NotUsedTemplates"
> files <- pathnames[!isDir]
> files
 [1] "O.zip"            "Sample21.adx"     "Sample21.apr"     "Sample21.dbf"   
        [[alternative HTML version deleted]]

______________________________________________
[email protected] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html

Reply via email to