Windows List of Folders?

For windows, how can I list only the folders in some folder?
I was thinking that dir() and file.info() with isdir==TRUE being something
that might work.

These folders or directories are numerically named with no dot extension
names or other characters.  Typically, these are 3132, 3334, ...

Here is what I tried.  The last line is where I need more work.

pData="C:/Myfiles/R/Data/"
setwd (pData)
x <- dir(pData, all.files=F)
y <- file.info(x, x$isdir==T)

TIA

Kenneth Ray Hobson, P.E.
Oklahoma DOT - QA & IAS Manager
200 N.E. 21st Street
Oklahoma City, OK  73105-3204

Example:

path <- system.file(package="base")
pathnames <- list.files(path, full.names=TRUE)
isDir <- file.info(pathnames)$isdir
dirs <- pathnames[isDir]
files <- pathnames[!isDir]

If you don't get the 'isDir' line, think of it as
infos <- file.info(pathnames)
isDir <- infos$isdir

/Henrik

khobson at fd9ns01.okladot.state.ok.us wrote:

For windows, how can I list only the folders in some folder?
I was thinking that dir() and file.info() with isdir==TRUE being  
something
that might work.
These folders or directories are numerically named with no dot  
extension
names or other characters.  Typically, these are 3132, 3334, ...
Here is what I tried.  The last line is where I need more work.
pData="C:/Myfiles/R/Data/"
setwd (pData)
x <- dir(pData, all.files=F)
y <- file.info(x, x$isdir==T)
TIA
Kenneth Ray Hobson, P.E.
Oklahoma DOT - QA & IAS Manager
200 N.E. 21st Street
Oklahoma City, OK  73105-3204