Как сгладить список с разметками в списках, чтобы все разметки были на одном уровне?

Question

У меня есть список, где элементы списка представляют собой тиблы или списки, которые содержат несколько тибблов. Я хотел бы получить список, где все тиблы находятся на одном уровне.

Как бы я это сделал?

library(tibble)

tib_1 <- tibble(a = 1:4, b = LETTERS[1:4])
tib_2 <- tibble(c = 1:4, d = LETTERS[1:4])
tib_3 <- tibble(e = 1:4, f = LETTERS[1:4])
tib_4 <- tibble(g = 1:4, h = LETTERS[1:4])

my_list <- list(tib_1, tib_2, list(tib_3, tib_4))

desired_list <- list(tib_1, tib_2, tib_3, tib_4)

Answer 1

Мы можем просто использовать flatten

library(rlang)
out <- flatten(my_list)

-checking

identical(desired_list, out)
#[1] TRUE