在R中的多个目录中读取多个csv文件 [英] Read multiple csv files in several directories in r

查看:814
本文介绍了在R中的多个目录中读取多个csv文件的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!

问题描述

我想从differents目录中读取多个.csv文件,然后将其放在单个数据框中.

I want to read multiple .csv files from differents directories then put it in a single dataframe.

我有两种目录可供读取:

I have two kinds of directories to read:

E:/R_Process/R_Input_UDM/Greater Europe/CEW Hub/Austria/Ap deo/Variant/Ap_deo_1.csv

E:/R_Process/R_Input_UDM/Greater Europe/CEW Hub/Austria/Ap deo/Variant/Ap_deo_2.csv


E:/R_Process/R_Input_UDM/Greater Europe/CEW Hub/Austria/Bar soap/Variant/Bar_soap_1.csv


E:/R_Process/R_Input_UDM/Greater Europe/CEW Hub/Austria/Bar soap/Variant/Bar_soap_2.csv

E:/R_Process/R_Input_UDM/Greater Europe/CEW Hub/Switzerland/Ap deo/Variant/Ap_deo_1.csv

E:/R_Process/R_Input_UDM/Greater Europe/CEW Hub/Switzerland/Ap deo/Variant/Ap_deo_2.csv

E:/R_Process/R_Input_UDM/Greater Europe/CEW Hub/Switzerland/Bar soap/Variant/Bar_soap_1.csv


E:/R_Process/R_Input_UDM/Greater Europe/CEW Hub/Switzerland/Bar soap/Variant/Bar_soap_2.csv

因此,在上面的目录中,我必须根据要在路径中给出的内容读取所有文件,如路径奥地利或瑞士中所示...所以有很多国家/地区,例如Ap deo或肥皂在每个国家/地区中有8个类别,我只想读取csv变体文件夹,因此这些csv文件可以是1或2或3,有时甚至比我如何读取这些文件还要多?

so above directories i have so i have to read the all the files from based upon the contires which i will give in a path like as shown in path austria or switzerland...so there are many countries and like Ap deo or bar soap there are 8 categories in each countries i want to read only variants folders csv so those csv files can be 1 or 2 or 3 or sometimes more than that how can i read these files?

推荐答案

也许类似于以下内容.

base <- "E:/R_Process/R_Input_UDM/Greater Europe/CEW Hub/"
or1 <- "(Austria|Switzerland)"
or2 <- "(Ap deo|Bar soap)"

pat <- paste(or1, or2, "Variant/.*\\.csv$", sep = "/")

filenames <- list.files(path = base, pattern = pat, 
                        recursive = TRUE, full.names = TRUE)

df_list <- lapply(filenames, read.csv)
names(df_list) <- sapply(filenames, basename)

这篇关于在R中的多个目录中读取多个csv文件的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!

查看全文
登录 关闭
扫码关注1秒登录
发送“验证码”获取 | 15天全站免登陆