R — Cleaning/Merging Excel files

Shane Dowling
Feb 5, 2015 · 1 min read

This is just a useful snippet of code I’ve been using a lot to tidy
up messy exports I’ve been getting lately.

Takes in a bunch of excel files, rewrites some variable column names in
column 3 then outputs them as a list of dataframes. These then get
merged into a single csv file.

filenames <- list.files("excels", pattern="*.xlsx", full.names=TRUE)
ldf <- lapply(filenames, function(file) {
df = read.xls(file)
names = names(df)
sectionName = names[3]
names(df)[names(df)==sectionName] <- "section"
result = reshape::merge_all(ldf)
write.csv(result, "result.csv", row.names=FALSE)

Tech Blog

Random smattering of technical posts

Medium is an open platform where 170 million readers come to find insightful and dynamic thinking. Here, expert and undiscovered voices alike dive into the heart of any topic and bring new ideas to the surface. Learn more

Follow the writers, publications, and topics that matter to you, and you’ll see them on your homepage and in your inbox. Explore

If you have a story to tell, knowledge to share, or a perspective to offer — welcome home. It’s easy and free to post your thinking on any topic. Write on Medium

Get the Medium app

A button that says 'Download on the App Store', and if clicked it will lead you to the iOS App store
A button that says 'Get it on, Google Play', and if clicked it will lead you to the Google Play store