Hủy bỏ các yếu tố có sản phẩm nào trong danh sách với ký tự (0)

Question

Làm thế nào tôi có thể loại bỏ yếu tố rỗng từ một danh sách có chứa số không dài pairlist như character(0), integer(0) vv ...

list2 
# $`hsa:7476` 
# [1] "1","2","3" 
# 
# $`hsa:656` 
# character(0) 
# 
# $`hsa:7475` 
# character(0) 
# 
# $`hsa:7472` 
# character(0) 

Tôi không biết làm thế nào để đối phó với họ. Ý tôi là nếu NULL thì đơn giản hơn nhiều. Làm thế nào tôi có thể loại bỏ các yếu tố này mà chỉ cần hsa:7476 vẫn còn trong danh sách.

Answer 1

Một cách tiếp cận có thể:

l <- list(1:3, "foo", character(0), integer(0)) 
Filter(length, l) 
# [[1]] 
# [1] 1 2 3 
# 
# [[2]] 
# [1] "foo" 

Answer 2

Một tùy chọn khác (tôi nghĩ hiệu quả hơn) bằng cách giữ cho chỉ số nơi chiều dài element> 0:

l[lapply(l,length)>0] ## you can use sapply,rapply 

[[1]] 
[1] 1 2 3 

[[2]] 
[1] "foo" 

Answer 3

Sử dụng lengths() để xác định độ dài của các yếu tố danh sách:

l <- list(1:3, "foo", character(0), integer(0)) 
l[lengths(l) > 0L] 
#> [[1]] 
#> [1] 1 2 3 
#> 
#> [[2]] 
#> [1] "foo" 
#> 

Answer 4

Vì mục đích hoàn chỉnh, gói purrr fro m phổ biến tidyverse có một số chức năng hữu ích để làm việc với danh sách - compact (introduction) không lừa, quá, và hoạt động tốt với magrittr của %>% ống:

l <- list(1:3, "foo", character(0), integer(0)) 
library(purrr) 
compact(l) 
# [[1]] 
# [1] 1 2 3 
# 
# [[2]] 
# [1] "foo" 

hoặc

list(1:3, "foo", character(0), integer(0)) %>% compact