［R］tibbleを特定の列だけのtibbleに変換する

select関数を使う。引数に抜き出したい列を指定すればよい。列の指定は列名でも番号（1～）でも指定できる。接頭辞として！を付けるとその列を除くという意味になる。！の指定には列番号にも使える。：（コロン）を使うことで、その列からその列までという範囲指定もできる。

以下の例では簡潔な表示にするため、表示の際にtibbleはデータフレームに変換している。

> library(tidyverse)
> no <- 1:5
> mei <- c("カナメ", "フレイア", "美雲", "マキナ", "レイナ")
> sei <- c("バッカニア", "ヴィオン", "ギンヌメール", "中島", "プラウラー")
> seiyu <- c("安野希世乃", "鈴木みのり", "小清水亜美", "西田望見", "東山奈央")
> tib <- tibble(no, mei, sei, seiyu)
> tib %>% select(mei, sei) %>% as.data.frame()
       mei          sei
1   カナメ   バッカニア
2 フレイア     ヴィオン
3     美雲 ギンヌメール
4   マキナ         中島
5   レイナ   プラウラー
> tib %>% select(!no) %>% as.data.frame()
       mei          sei      seiyu
1   カナメ   バッカニア 安野希世乃
2 フレイア     ヴィオン 鈴木みのり
3     美雲 ギンヌメール 小清水亜美
4   マキナ         中島   西田望見
5   レイナ   プラウラー   東山奈央
> tib %>% select(2, 3) %>% as.data.frame()
       mei          sei
1   カナメ   バッカニア
2 フレイア     ヴィオン
3     美雲 ギンヌメール
4   マキナ         中島
5   レイナ   プラウラー
> tib %>% select(!1) %>% as.data.frame()
       mei          sei      seiyu
1   カナメ   バッカニア 安野希世乃
2 フレイア     ヴィオン 鈴木みのり
3     美雲 ギンヌメール 小清水亜美
4   マキナ         中島   西田望見
5   レイナ   プラウラー   東山奈央
> tib %>% select(!(1:3)) %>% as.data.frame()
       seiyu
1 安野希世乃
2 鈴木みのり
3 小清水亜美
4   西田望見
5   東山奈央