Extract second subelement of every element in a list while ignoring NA's in sapply in R

r list apply na sapply
itpetersen picture itpetersen · Oct 1, 2013 · Viewed 14.8k times · Source

I'm trying to extract the second subelement of every element in a list while ignoring NAs in R. Here's a small example:

mylist <- list(a=c(6,7),b=NA,c=c(8,9))
sapply(mylist, "[[", 1)
sapply(mylist, "[[", 2) #receive error

Because element 'b' has only one subelement (NA), I receive the following error when trying to extract the second subelement:

Error in FUN(X[[2L]], ...) : subscript out of bounds

My goal is for the output to be: 7, NA, 9. In other words, I want to ignore and retain the NAs so that the output is the same length as the number of elements in the list. I would like the solution to be general enough to also be able to apply it to a different subelement, n, from each list.

Answer

beginneR picture beginneR · Oct 1, 2013

This should do what you want:

sapply(mylist,function(x) x[2])

Related questions

Convert a list to a data frame

I have a nested list of data. Its length is 132 and each item is a list of length 20. Is there a quick way to convert this structure into a data frame that has 132 rows and 20 columns of data? Here is …

Read More
Append value to empty vector in R?

I'm trying to learn R and I can't figure out how to append to a list. If this were Python I would . . . #Python vector = [] values = ['a','b','c','d','e','f','g'] for i in range(0,len(values)): vector.append(…

Read More
How can I remove an element from a list?

I have a list and I want to remove a single element from it. How can I do this? I've tried looking up what I think the obvious names for this function would be in the reference manual and I …

Read More