操作 URL

使用 purrr 的函数式编程进阶

Colin Fay

Data Scientist & R Hacker at ThinkR

创建映射器

as_mapper()

library(purrr)
mult <- as_mapper(~ .x * 2)
map(list(airquality, mtcars), 
    mult)

[[1]]
    Ozone Solar.R Wind Temp Month Day
1      82     380 14.8  134    10   2
2      72     236 16.0  144    10   4
3      24     298 25.2  148    10   6
4      36     626 23.0  124    10   8
5      NA      NA 28.6  112    10  10
6      56      NA 29.8  132    10  12
...

stringr::str_detect()

模式检测：

library(stringr)
lyrics <- c("Is this the real life?", 
            "Is this just fantasy?", 
            "Caught in a landslide", 
            "No escape from reality")
str_detect(lyrics, "life")

TRUE FALSE FALSE FALSE

逻辑值小贴士

对逻辑值求和：

sum(FALSE, TRUE, TRUE, FALSE, TRUE)

让我们练习吧！

使用 purrr 的函数式编程进阶