[R言語] tibbleでのデータの読み込み

今日は，mtcarsとテキストファイルのデータをtibble形式で読み込みます。
tibbleの説明についてはこちらのページに譲ります。

mtcarsを読み込んでみます

まずは普通にmtcarsを読み込みます。

head(mtcars)

結果 こんな感じで出力されます。data.frame形式ですね。

> head(mtcars)
                   mpg cyl disp  hp drat    wt  qsec vs am gear carb
Mazda RX4         21.0   6  160 110 3.90 2.620 16.46  0  1    4    4
Mazda RX4 Wag     21.0   6  160 110 3.90 2.875 17.02  0  1    4    4
Datsun 710        22.8   4  108  93 3.85 2.320 18.61  1  1    4    1
Hornet 4 Drive    21.4   6  258 110 3.08 3.215 19.44  1  0    3    1
Hornet Sportabout 18.7   8  360 175 3.15 3.440 17.02  0  0    3    2
Valiant           18.1   6  225 105 2.76 3.460 20.22  1  0    3    1

tibble形式で読みます

今度はこれを打つ。 read_csv関数がtibbleに変えてくれます。

library(tidyverse)
library(readr)

mtcars <- read_csv(readr_example("mtcars.csv"))
head(mtcars)

結果 tibble形式になりました.

> head(mtcars)
# A tibble: 6 × 11
    mpg   cyl  disp    hp  drat    wt  qsec    vs    am  gear  carb
  <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
1  21       6   160   110  3.9   2.62  16.5     0     1     4     4
2  21       6   160   110  3.9   2.88  17.0     0     1     4     4
3  22.8     4   108    93  3.85  2.32  18.6     1     1     4     1
4  21.4     6   258   110  3.08  3.22  19.4     1     0     3     1
5  18.7     8   360   175  3.15  3.44  17.0     0     0     3     2
6  18.1     6   225   105  2.76  3.46  20.2     1     0     3     1

いやこれでいいじゃん...

as_tibble関数を使えば短くて良いです。（後から知った）

mtcars <- as_tibble(mtcars)
head(mtcars)

結果 上記と同じです

テキストファイルもtibbleで読み込めます

方法1. read_csv関数の中にテキストファイルの名前を書きます。

d <- read_csv("data.txt") # ""の中身は自前のテキストファイル名
head(d)

方法2. as_tibble関数でも同じように書けます。

d <- read.csv("data.txt") # ""の中身は自前のテキストファイル名
d <- as_tibble(d)
head(d)

両者の結果 tibble形式になりました。

> head(d)
# A tibble: 6 × 2
      X     Y
  <dbl> <dbl>
1    24   472
2    24   403
3    26   454
4    32   575
5    33   546
6    35   781

それではよい日を！