おめでとうございます！

purrr で学ぶ中級関数型プログラミング

Colin Fay

Data-Scientist & R-Hacker @ ThinkR

ラムダ関数:

map(1:5, ~ .x*10)

[[1]]
[1] 10

[[2]]
[1] 20

[[3]]
[1] 30

[[4]]
[1] 40

[[5]]
[1] 50

再利用できるマッパー:

ten_times <- as_mapper(~ .x * 10)
map(1:5, ten_times)

[[1]]
[1] 10

[[2]]
[1] 20

[[3]]
[1] 30

[[4]]
[1] 40

[[5]]
[1] 50

関数の操作

ファンクショナル:

map() など
keep() と discard()
some() と every()

関数オペレーター:

safely() と possibly()
partial()
compose()
negate()

より読みやすいコード

library(purrr)
rounded_mean <- compose(
  partial(round, digits = 1),
  partial(mean, trim = 2, na.rm = TRUE))
map(list(airquality, mtcars), 
  ~ map_dbl(.x, rounded_mean))

[[1]]
Ozone Solar.R    Wind    Temp   Month     Day 
 31.5   205.0     9.7    79.0     7.0    16.0 

[[2]]
 mpg   cyl  disp    hp  drat    wt  qsec    vs    am  gear  carb 
19.2   6.0 196.3 123.0   3.7   3.3  17.7   0.0   0.0   4.0   2.0

次のステップ

purrr を実務で試しましょう ;)
DataCamp の tidyverse コース
Advanced R
purrr をさらに探究

またお会いしましょう！

purrr で学ぶ中級関数型プログラミング