Les multiples variantes de map()

Fondements de la programmation fonctionnelle avec purrr

Auriel Fournier

Instructor

Résultats non listes

# Appliquer à survey_data et déterminer le nombre de lignes
map(survey_data, ~nrow(.x))

$`LakeErieS`
[1] 14

$`LakeErieN`
[1] 14

$`LakeErieW`
[1] 14

$`LakeErieE`
[1] 15

purrr::map_variants

Sortie liste

# Déterminer le nombre de lignes
map(survey_data, ~nrow(.x))

Double, un type numérique

# Déterminer le nombre de lignes
map_dbl(survey_data, ~nrow(.x))

$`LakeErieS`
[1] 14

$`LakeErieN`
[1] 14

$`LakeErieW`
[1] 14

$`LakeErieE`
[1] 15

14 14 14 15

map_lgl()

Liste

# Déterminer le nombre de lignes
map(survey_data, ~nrow(.x))

Logique

# Vérifier si les éléments ont 14 lignes
map_lgl(survey_data, ~nrow(.x)==14)

$`LakeErieS`
[1] 14

$`LakeErieN`
[1] 14

$`LakeErieW`
[1] 14

$`LakeErieE`
[1] 15

TRUE TRUE TRUE FALSE

map_chr()

Sortie liste

# Parcourir la liste species_names
map(species_names, ~.x)

Caractère

# Parcourir la liste species_names
map_chr(species_names, ~.x)

$`LakeErieS`
[1] "Green Frog"

$`LakeErieN`
[1] "American Bullfrog"

$`LakeErieW`
[1] "Gray Treefrog"

$`LakeErieE`
[1] "Mudpuppy"

LakeErieS       LakeErieN 
"Green Frog"    "American Bullfrog" 
LakeErieW       LakeErieE 
"Gray Treefrog" "Mudpuppy"

À vous de jouer !

# Créer une trame de données appelée survey_rows
survey_rows <- data.frame(names = names(survey_data),
                       rows = NA)

# Parcourir survey_data pour obtenir le nombre de lignes de chaque élément
survey_rows$rows <- map_dbl(survey_data, ~nrow(.x))

# Afficher la trame de données survey_rows
survey_rows

    names       rows
1   LakeErieS   14
2   LakeErieN   14
3   LakeErieW   14
4   LakeErieE   15

Purrr-atisons un peu !

Fondements de la programmation fonctionnelle avec purrr