[R]tibbleから指定の列だけをベクトルで抜き出す
tidyverse(dplyr)パッケージに含まれるpull関数を使う。以下のような中身のCSVファイルをmeibo.csvと保存しておく。
no, sei, mei, age, weight
1, あいう, えお, 11, 101.1
2, かきく, けこ, 22, 202.2
3, さしす, せそ, 22, 303.3
4, あいう, けこ, 33, 404.4
meibo.csvを読み込んで、条件を指定して行を抜き出してみる。%>%演算子も使える。
> library(tidyverse)
> tbl <- read_csv("meibo.csv", show_col_types = FALSE, progress = FALSE)
> pull(tbl, 2)
[1] "あいう" "かきく" "さしす" "あいう"
> pull(tbl, mei)
[1] "えお" "けこ" "せそ" "けこ"
> tbl %>% pull(4)
[1] 11 22 22 33
> tbl %>% pull(weight)
[1] 101.1 202.2 303.3 404.4
[[ ]]記号や$記号を使う場合と全く同じである。
> tbl[[4]]
[1] 11 22 22 33
> tbl$weight
[1] 101.1 202.2 303.3 404.4
« [R]read_delim関数使用時の画面表示を抑制する | トップページ | [R]文字列から各文字の文字コードを得る »
« [R]read_delim関数使用時の画面表示を抑制する | トップページ | [R]文字列から各文字の文字コードを得る »

コメント