Loop for merging multiple dataframes from list of dataframes in R

Question

I have multiple dataframes and there are couple of dfs having similar IDs. I want to merge those dfs if they have similar row count.

df1_ID1
ID b c d
1 x y z
1 y z x
1 z x y

df2_ID1
ID b c d
1 x y z
1 y z x
1 z x y

df3_ID2
ID b c d
2 x y z
2 y z x
2 z x y

what I want is

ID1
ID b c d b c d
1 x y z x y z
1 y z x y z x
1 z x y z x y

I'm trying something like this code:

for (i in 1:length(df)) {
  columnnames<-df[[i]][["b"]]
  if (df[[i]][["ID"]] == df[[i++]][["ID"]])
  merge.data.frame(df[[i]],df[[i++]], by = "ID")
}

Why have you tagged 'python' and 'pandas'? Are you looking for an R solution and a python solution? Or just a solution in R? — jared_mamrot
– jared_mamrot, Commented Oct 28, 2021 at 21:36
This question as written only shows r code, and has r in the title. If there is some pandas or python related please update your question to reflect these elements and add the tags back. — Henry Ecker
– Henry Ecker ♦, Commented Oct 28, 2021 at 22:05

Brian Montgomery · Accepted Answer · 2021-10-29 03:32:49Z

I'm not a fan of how this ends up with multiple columns with the same name, but that's what you wanted.
You aren't really asking for a merge because that would give 3 x 3 = 9 rows, so I used cbind.
(I changed the name of the list of data.frames to df_list to avoid confusion)

df_list <- list(
  data.frame(ID = 1, b = c('x', 'y', 'z'), c = c('y', 'z', 'x'), d = c('z', 'x', 'y')),
  data.frame(ID = 1, b = c('x', 'y', 'z'), c = c('y', 'z', 'x'), d = c('z', 'x', 'y')),
  data.frame(ID = 2, b = c('x', 'y', 'z'), c = c('y', 'z', 'x'), d = c('z', 'x', 'y'))
  )

for (i in 1:(length(df_list) - 1)) {
  if (NROW(df_list[[i]]) == NROW(df_list[[i + 1]]) &&
      all(df_list[[i]]$ID == df_list[[i + 1]]$ID)) {
    df_list[[i]] <- cbind(df_list[[i]], df_list[[i + 1]][, -1])
    df_list[[i + 1]] <- list()
  }
}
df_list <- df_list[!sapply(df_list, function(x) NROW(x) == 0)]

df_list
[[1]]
  ID b c d b c d
1  1 x y z x y z
2  1 y z x y z x
3  1 z x y z x y

[[2]]
  ID b c d
1  2 x y z
2  2 y z x
3  2 z x y

Collectives™ on Stack Overflow

Loop for merging multiple dataframes from list of dataframes in R

1 Answer 1

1 Comment

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Related