单行从列表中删除Null元素:

x = x(((酸式焦磷酸钠(x, is.null) arr.ind = TRUE)))

干杯

如果您想避免数字索引，可以使用

a <- setdiff(names(a),c("name1", ..., "namen"))

从a中删除名字namea…namen，这适用于列表

> l <- list(a=1,b=2)
> l[setdiff(names(l),"a")]
$b
[1] 2

对于向量也是一样

> v <- c(a=1,b=2)
> v[setdiff(names(v),"a")]
b 
2

单行从列表中删除Null元素:

x = x(((酸式焦磷酸钠(x, is.null) arr.ind = TRUE)))

干杯

如果你有一个命名列表，想要删除一个特定的元素，你可以尝试:

lst <- list(a = 1:4, b = 4:8, c = 8:10)

if("b" %in% names(lst)) lst <- lst[ - which(names(lst) == "b")]

这将创建一个包含元素a, b, c的列表lst。第二行在检查元素b是否存在后删除元素b(以避免@hjv提到的问题)。

或更好:

lst$b <- NULL

这样，尝试删除一个不存在的元素就不是问题(例如lst$g <- NULL)

使用lapply和grep:

lst <- list(a = 1:4, b = 4:8, c = 8:10)
# say you want to remove a and c
toremove<-c("a","c")
lstnew<-lst[-unlist(lapply(toremove, function(x) grep(x, names(lst)) ) ) ]
#or
pattern<-"a|c"
lstnew<-lst[-grep(pattern, names(lst))]

下面是如何在R中删除列表的最后一个元素:

x <- list("a", "b", "c", "d", "e")
x[length(x)] <- NULL

如果x可能是一个向量，那么你需要创建一个新对象:

x <- c("a", "b", "c", "d", "e")
x <- x[-length(x)]

处理列表和向量