［R］パイプラインを使ってリストの要素を取り出す

magrittrパッケージのextract関数かextract2関数を使う。それぞれ|>演算子（%>%演算子）を使用したパイプラインにおいて、extract関数は[ ]の、extract2関数は[[ ]]のエイリアスとして機能する。

> chara <- c("アストラ", "ヴィタ", "リフ")
> seiyu <- c("遠藤綾", "日笠陽子", "瀬戸麻沙美")
> sakuhin <- c("ゼンレスゾーンゼロ", "崩壊3rd", "スノウブレイク")
> lis <- list(sakuhin = sakuhin, chara = chara, seiyu = seiyu)
> print(lis)
$sakuhin
[1] "ゼンレスゾーンゼロ" "崩壊3rd"            "スノウブレイク"    
$chara
[1] "アストラ" "ヴィタ"   "リフ"    
$seiyu
[1] "遠藤綾"     "日笠陽子"   "瀬戸麻沙美"
> lis[3]
$seiyu
[1] "遠藤綾"     "日笠陽子"   "瀬戸麻沙美"
> lis |> extract(3)
$seiyu
[1] "遠藤綾"     "日笠陽子"   "瀬戸麻沙美"
> lis |> extract(3) |> typeof()
[1] "list"
> lis[[3]]
[1] "遠藤綾"     "日笠陽子"   "瀬戸麻沙美"
> lis |> extract2(3)
[1] "遠藤綾"     "日笠陽子"   "瀬戸麻沙美"
> lis |> extract2(3) |> typeof()
[1] "character"

リストに[ ]を使うと、指定した要素だけからなるリストを返す。[[ ]]は指定した要素を取り出して、その要素の自体を返す。