map() के अलग-अलग उपयोग

purrr के साथ Functional Programming की बुनियाद

Auriel Fournier

Instructor

नॉन-लिस्ट आउटपुट

# survey_data पर map चलाएँ और पंक्तियों की संख्या निकालें
map(survey_data, ~nrow(.x))

$`LakeErieS`
[1] 14

$`LakeErieN`
[1] 14

$`LakeErieW`
[1] 14

$`LakeErieE`
[1] 15

purrr::map_variants

लिस्ट आउटपुट

# पंक्ति संख्या निकालें
map(survey_data, ~nrow(.x))

Double, एक numeric {{1}} टाइप

# पंक्ति संख्या निकालें
map_dbl(survey_data, ~nrow(.x))

$`LakeErieS`
[1] 14

$`LakeErieN`
[1] 14

$`LakeErieW`
[1] 14

$`LakeErieE`
[1] 15

14 14 14 15

map_lgl()

लिस्ट

# पंक्ति संख्या निकालें
map(survey_data, ~nrow(.x))

Logical

# जाँचें कि तत्वों में 14 पंक्तियाँ हैं या नहीं
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()

लिस्ट आउटपुट

# species_names लिस्ट पर map चलाएँ
map(species_names, ~.x)

Character

# species_names लिस्ट पर map चलाएँ
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"

उदाहरण समय!

# survey_rows नाम का डेटा फ्रेम बनाएँ
survey_rows <- data.frame(names = names(survey_data),
                       rows = NA)

# survey_data पर map चलाकर हर तत्व की पंक्तियाँ निकालें
survey_rows$rows <- map_dbl(survey_data, ~nrow(.x))

# survey_rows डेटा फ्रेम प्रिंट करें
survey_rows

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

चलें, purrr-actice करें!

purrr के साथ Functional Programming की बुनियाद