Удалить несовпадающие имена фреймов данных, вложенные в список

Question

У меня есть два списка, состоящих из фреймов данных - df_quintile и sick_df_quintile.Я не знаю, как представить их кратко, но вот как они выглядят в Rstudio:

Обратите внимание, болезнь_df_quintile состоит из 5 кадров данных (данные с 1 по 5), а болезнь_дф_quintile состоит из 4 (данные с 2 по 5).Я хотел бы перепроверить оба списка и удалить все кадры данных, которые не являются общими для обоих списков - поэтому в этом случае я хотел бы удалить первый кадр данных из списка df_quintile.Как мне этого добиться?

Спасибо.

Answer 1

Вы можете сопоставить имена в списке и сохранить общие.

keep <- match(names(disease_df_quintile), names(df_quintile))
new_df_quintile <- df_quintile[keep]

Answer 2

Независимо от содержимого списка, вы можете сначала найти повторяющиеся имена, а затем подгруппировать списки:

##-- Fake lists
l1 <- as.list(1:5)
names(l1) <- 1:5

l2 <- as.list(2:5)
names(l2) <- 2:5

##-- Common names and subsetting
common_names <- intersect(names(l1), names(l2))
l1 <- l1[common_names]
l2 <- l2[common_names]