我有一个数据帧列表,许多数据帧只有1行,这会导致ggplot问题。我究竟该如何自动删除这些数据框?
答案 0 :(得分:3)
我们可以使用Filter
中的base R
Filter(function(x) nrow(x) > 1, lst)
或与sapply
lst[sapply(lst, nrow) > 1]
或者使用keep
中的purrr
library(purrr)
keep(lst, ~ nrow(.x) > 1)
lst <- list(data.frame(col1 = 1, col2 = 2), data.frame(col1 = 1:5, col2 = 6:10))