Extrahieren Sie Elemente aus der verschachtelten Liste nur mit Funktionen aus dem Paket purrr

Question

Wie extrahiere ich Elemente aus einer verschachtelten Liste nur mit dem Paket purrr? In diesem Fall möchte ich nach dem Aufteilen eines Datenrahmens einen Vektor von Abschnitten erhalten. Ich habe erreicht, was ich brauche mit lapply(), aber ich möchte nur Funktionen purrr Paket verwenden.

Ich habe versucht map() und at_depth() aber nichts schien für mich zu arbeiten.

Answer 1

Die map Funktionen verfügen über eine Kurzschrift für die Indizierung von verschachtelten Listen. Ein hilfreiches Codefragment von der Hilfeseite:

Um tief in eine verschachtelte Liste zu indizieren, verwenden Sie mehrere Werte. c ("x", "y") entspricht z [["x"]] [["y"]].

Also für verschachtelten Indizes unter Verwendung von Code zusammen mit map_dbl, die auf einen Vektor reduziert, können Sie einfach tun:

mtcars %>% 
    split(.$cyl) %>% 
    map(~lm(mpg ~ wt, data = .)) %>% 
    map_dbl(c(1, 1)) 

     4  6  8 
39.57120 28.40884 23.86803 

Ich fand auch diese blog post purrr 0.1.0 nützliche Einführung, da es eine gab ein paar mehr Beispiele für die Kurzschrift, die ich benutzt habe.