Thanks Mikhail. I've been doing something very similar to your example below, I was just wondering if anyone had packaged functions for this task.
Thanks again, Ista On Sat, Mar 12, 2011 at 12:39 AM, Mikhail Titov <m...@gmx.us> wrote: > I'm not sure what you are trying to achieve, but I think this can be a good > starting point: > > files <- list.files("deleteme", full.names=TRUE, recursive=TRUE) > names <- sapply(strsplit(files, "/", TRUE), "[", 2) > x <- lapply(files, function(f) { > out <- read.csv(f) > out$city <- strsplit(f, "/", TRUE)[[1]][2] > out > }) > y <- do.call("rbind", x) > > Mikhail > >> -----Original Message----- >> From: r-help-boun...@r-project.org [mailto:r-help-bounces@r- >> project.org] On Behalf Of Ista Zahn >> Sent: Friday, March 11, 2011 10:53 AM >> To: r-help@r-project.org >> Subject: [R] Any existing functions for reading and extracting data >> from path names? >> >> Hi helpeRs, >> >> I have inherited a set of data files that use the file system as a >> sort of poor man's database, i.e., the data files are nested in >> directories that indicate which city they come from. For example: >> >> dir.create("deleteme") >> for(i in paste("deleteme", c("New York", "Los Angeles"), sep="/")) { >> dir.create(i) >> for(j in paste("data", 1:2, ".csv", sep="")) { >> write.csv(data.frame(x=1:10), file=paste(i, j, sep="/")) >> } >> } >> >> list.files("deleteme", recursive=TRUE) >> >> What I want to end up with is >> >> x city wave >> 1 New York 1 >> 1 Los Angeles 1 >> 1 New York 2 >> 1 Los Angeles 2 >> >> I've started writting a simple function to do this, but it seems like >> a common situation and I'm wondering if there are any packages or >> functions that might make this easier. >> >> Thanks! >> Ista >> -- >> Ista Zahn >> Graduate student >> University of Rochester >> Department of Clinical and Social Psychology >> http://yourpsyche.org >> >> ______________________________________________ >> R-help@r-project.org mailing list >> https://stat.ethz.ch/mailman/listinfo/r-help >> PLEASE do read the posting guide http://www.R-project.org/posting- >> guide.html >> and provide commented, minimal, self-contained, reproducible code. > > -- Ista Zahn Graduate student University of Rochester Department of Clinical and Social Psychology http://yourpsyche.org ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.