Message-ID: <CAGxFJbQB+zFZwho-QqcBw+bG-vpu4X3VXQU12wvWZdx0fwYyFA@mail.gmail.com>
Date: 2020-04-24T14:50:47Z
From: Bert Gunter
Subject: Problem with loop in folders
In-Reply-To: <CAA5NU8oUUX8S5HwY5RD4rmycUdVKLwso_+G5GtAbioDrpXOaUQ@mail.gmail.com>
What package is "read.dbf" from? What error message/behavior did you see?
Should it be:
path<-setwd(paste0("inpath/",folder)) ## did you forget the "/" ?
Bert Gunter
"The trouble with having an open mind is that people keep coming along
and sticking things into it."
-- Opus (aka Berkeley Breathed in his "Bloom County" comic strip )
On Fri, Apr 24, 2020 at 7:08 AM Shubhasmita Sahani
<shubhasmita.sahani at gmail.com> wrote:
>
> Hi Everyone,
> I am trying to loop through the folders in the major working directory.
> Read the dbf file into the data frame then save the data frame as CSV file
> in another folder.
> For this, I have written this code, But not able to figure out where it is
> going wrong. Any ideas will be of great support.
>
>
> setwd(choose.dir())
> csvpath= "C:/plan/Learning/dummydata/csv/"
> a<-list.dirs()
> inpath<-"C:/workplan/Q2/Project1"
>
> for (folder in list.dirs()[-1]) {
>
> path<-setwd(paste0("inpath",folder))
> dbf<-list.files(path, pattern = "*ward.dbf")
> df <- read.dbf(dbf)
> dbfname<-basename(dbf)
> name<-file_path_sans_ext(dbfname) # get the name of the file like
> agra_ward
> write.csv( df, file = paste0("csvpath",name,"csv"))
> print(path)
>
> }
>
>
>
>
>
> --
> Thanks & Regards,
> Shubhasmita Sahani
>
> [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see
> 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.