Extrahieren Sie nicht null Elemente aus einer Liste in R

Habe ich eine Liste wie diese:

    x = list(a = 1:4, b = 3:10, c = NULL)
    x
    #$a
    #[1] 1 2 3 4
    #
    #$b
    #[1]  3  4  5  6  7  8  9 10
    #
    #$c
    #NULL

und ich will zu extrahieren Sie alle Elemente, die nicht null sind. Wie kann das getan werden? Danke.

InformationsquelleAutor der Frage qed | 2013-06-03

  1. 29

    Hier ist eine weitere option:

    Filter(Negate(is.null), x)

    InformationsquelleAutor der Antwort Matthew Plourde

  2. 11

    Was:

    x[!unlist(lapply(x, is.null))]

    Hier ist eine kurze Beschreibung, was Los ist.

    1. lapply sagt uns, welche Elemente NULL

      R> lapply(x, is.null)
$a
[1] FALSE

$b
[1] FALSE

$c
[1] TRUE

    2. Nächsten wir erzielen convect die Liste in einen Vektor:

      R> unlist(lapply(x, is.null)) 
a     b     c 
FALSE FALSE  TRUE

    3. Dann wechseln wir TRUE zu FALSE:

      R> !unlist(lapply(x, is.null))
    a     b     c 
TRUE  TRUE FALSE

    4. Schließlich wählen wir die Elemente mit der üblichen Schreibweise:

      x[!unlist(lapply(x, is.null))]

    InformationsquelleAutor der Antwort csgillespie

  3. 2
    x[!sapply(x,is.null)]

    Dieser Satz verallgemeinert zu einer logischen Aussage über die Liste, nur der sub in der Logik "ist.null".

    InformationsquelleAutor der Antwort ColinTea

  4. 0

    Einfacher und wahrscheinlich schneller, als die oben genannten, die folgenden arbeiten für eine Liste nicht-rekursive (im Sinne von is.recursive) Werte:

    example_1_LST <- list(NULL, a=1.0, b=Matrix::Matrix(), c=NULL, d=4L)
example_2_LST <- as.list(unlist(example_1_LST, recursive=FALSE))

    str(example_2_LST) Drucke:

    List of 3
 $ a: num 1
 $ b:Formal class 'lsyMatrix' [package "Matrix"] with 5 slots
  .. ..@ x       : logi NA
  .. ..@ Dim     : int [1:2] 1 1
  .. ..@ Dimnames:List of 2
  .. .. ..$ : NULL
  .. .. ..$ : NULL
  .. ..@ uplo    : chr "U"
  .. ..@ factors : list()
 $ d: int 4

    InformationsquelleAutor der Antwort Sander Maijers

Schreibe einen Kommentar