考虑这个数据帧的嵌套列表：
df <- data.frame(x = 1:5, y = letters[1:5])
l <- list(df, list(df, df), list(df, list(df, df, list(df))), list(df), df)
如何从这个深度嵌套的列表得到一个简单的数据帧列表：
list(df, df, df, df, df, df, df, df, df)
通常的解决方案（如此处）无法保留数据帧的结构。