展平列表中的嵌套列表

Question

我有一個帶有嵌套列表的列表。

LIST2 <- list(list("USA","WY","TX","AZ","Canada", "CA", "NY", 'Russia', 'NY'), 
             list(c("USA","Canada","CA","WY", 'China', 'AZ', 'AZ', 'AZ', 'WY')), 
             list(c("USA","Australia","CA","AR", 'AZ', 'WY', 'New Zealand', 'Japan', 'Japan', 'NJ')),
             list(list('Australia', 'Australia', 'Japan', 'Malaysia' )),
             list(c('USA', 'Australia', 'Japan', 'Malaysia' )))

我想以某種方式弄平第一和第四列表，以便它們與其余列表具有相同的形式。 這可能嗎？

Answer 1

我們可以使用rapply

lapply(LIST2, rapply, f = c)

Answer 2

遍歷列表，遞歸取消列表，然后以列表形式返回：

lapply(LIST2, function(i) list(unlist(i, recursive = TRUE)))

Answer 3

這應該為您做：

LIST2 <- lapply(LIST2, unlist)