ワーキングディレクトリの確認と設定
getwd() # ワーキングディレクトリを確認
setwd("directory/name/as/character") # ワーキングディレクトリを変更13 データの読み込みと書き出し（I/O）
統計に用いるデータは、通常Excelのような表計算ソフトや、データベースなどで作成されます。Rを用いてデータ解析・統計解析を行うためには、まずRに表計算ソフトやデータベースからデータを読み込む必要があります。
データ解析・統計解析が終われば、Rでの解析結果を書き出し、Excelなどで取り扱う必要があります。
このように、Rで解析を行うためには、データの読み込み・書き出しが必須となります。Rはこのような、データの読み込み・書き出し（Input/Output、I/O）のための関数を多数備えています。
13.1 ディレクトリの操作
データを読み込み、書き出すためには、まず読み込む・書き出すためのフォルダが必要となります。フォルダのことをディレクトリとも呼びます。Rでは、ワーキングディレクトリ（working directory）というものが設定されています。Rからはこのワーキングディレクトリの中のファイルを確認することができます。
ワーキングディレクトリは通常、RStudioを起動した時に、右下のカラムのFilesタブに表示されています。
このfilesタブでは、任意のフォルダに移動することができます。上図の右上、…と記載されている部分をクリックするとウインドウが開きます。このウインドウ上で任意のフォルダに移動すれば、filesタブに示されるフォルダが変わります。ただし、表示するフォルダを変えるだけではワーキングディレクトリを変更することはできません。
filesタブに表示されたフォルダをワーキングディレクトリに設定するには、filesタブの右上、「More」から「Set As Working Directory」を選択します。
Fileに表示されているディレクトリをワーキングディレクトリに変更する場合には、同じ「More」から「Go To Working Directory」を選択します。
ワーキングディレクトリの変更は、上の「Session」から「Set Working Directory」を選択することでも変更できます。
デフォルトのワーキングディレクトリ（Rstudioを開いた時に設定されているワーキングディレクトリ）を変更する場合には、「Tools」→「Option」を選択し、「Default working directory」に任意のフォルダを指定します。
13.1.1 getwd関数とsetwd関数
上記のように、RStudioの機能を使えばワーキングディレクトリを簡単に変更することができます。ただし、データのフォルダ構造によっては、Rでの演算中にワーキングディレクトリを変更したい、といった場合もあります。
ワーキングディレクトリの確認と設定は、getwd関数とsetwd関数を用いて行うことができます。
getwd関数は現在のワーキングディレクトリを確認するための関数です。getwd関数は引数を取らず、実行すると現在のワーキングディレクトリのアドレスを文字列で返します。
setwd関数はワーキングディレクトリを変更するための関数です。setwd関数は文字列のディレクトリのアドレスを引数に取ります。setwd関数を実行すると、アドレスで指定したフォルダにワーキングディレクトリが変更されます。
13.1.2 絶対パスと相対パス
ディレクトリを指定する際には、ディレクトリのアドレスを用います。Windowsでは、フォルダを開き、上のアドレスバーを右クリックすると、アドレスをテキストとしてコピーすることができます。この方法でコピーできるアドレスのことを絶対パスと呼びます。絶対パスには、ルートディレクトリ（大元のフォルダ）からそのフォルダまでのアドレスが全て記載されています。
ディレクトリのアドレスには、相対パスと呼ばれるものもあります。相対パスは、現在のディレクトリの上位や下位といった、現在のディレクトリからの位置を相対的に表すものです。
setwd関数は、この絶対パス、相対パスのいずれも使用することができます。絶対パスの場合には、ルートからのすべてのアドレスを文字列で指定します。一方、相対パスの場合は、.（ピリオド）を用いて、現在のディレクトリからの位置を以下のように指定します。
- 「./」は今のディレクトリのアドレスを示す記号
- 「../」は今のディレクトリの一つ上位のディレクトリを示す記号
上の記号を用いて、一つ下位にあるディレクトリは以下のように示すことができます。
“./一つ下のフォルダ名”
また、setwd関数は、下位のフォルダであれば、そのフォルダまでのパスを記載するだけでもディレクトリを指定することができます。ただし、Windowsではフォルダのつなぎ文字がバックスラッシュ（\）になっています。Rでのつなぎ文字はスラッシュ（/）ですので、Windowsではアドレスの記法が異なることに注意が必要です。
相対パスと絶対パス
setwd("../") # 一つ上のフォルダにワーキングディレクトリを移動
setwd("./NameF") # 一つ下の「NameF」というフォルダにワーキングディレクトリを移動
setwd("NameF") # 上と同じ
setwd("NameF/NameF2") # NameFフォルダ内のNameF2というフォルダに移動13.2 ディレクトリ内のファイルの確認
ワーキングディレクトリ内のファイルやフォルダは、Rで開いたり、確認したりすることができます。dir関数とlist.files関数はワーキングディレクトリ内のファイル・フォルダの一覧を表示するための関数です。いずれもファイル・フォルダ名の一覧を文字列のベクターとして返します。list.dirs関数はワーキングディレクトリ内にあるフォルダのアドレスの一覧を文字列のベクターとして返します。
ディレクトリ内のファイル・フォルダの確認
dir() # ディレクトリ名とファイル名が返ってくる
list.files() # dir関数と同じ
list.dirs() # ディレクトリ名のみ返ってくる13.3 フォルダとファイルの作成
現在のワーキングディレクトリにフォルダを作成する際には、dir.create関数を用います。dir.create関数は作成するフォルダ名の文字列を引数に取ります。ワーキングディレクトリ内にファイルを作成する関数はいくつもあります。単にファイルを作るのであればfile.create関数を、文字列をテキストで保存する場合にはcat関数を用います。
ディレクトリとファイルの作成
dir.create("tmp") # 現在のワーキングディレクトリに「tmp」というフォルダを作成
setwd("tmp") # 作成したフォルダにワーキングディレクトリを移動
file.create("filename.txt") # 空のテキストファイルを作成
cat("Hello world", file="helloworld.txt") # Hello worldと書き込まれたテキストファイルを作成13.4 ワークスペースイメージ（.Rdata）の保存
ワークスペースとは、Rを実行している時に取り扱っているオブジェクトなどの環境のことです。RGUIやRStudioを閉じるときには、下の図のようなウインドウが表示され、ワークスペースのイメージを保存するかどうか尋ねられます。ワークスペースを保存すると、現在のワーキングディレクトリに「.RData」というファイルが作成されます。この.RDataがワークスペースのイメージです。
.RDataファイルはRStudioを閉じるときだけでなく、RStudioのメニューから「Session → Save Workspace As…」を選ぶことでも保存できます。また、save.image関数を用いても、.RDataファイルを作成することができます。
現在のワークスペースの情報は、RStudio右上のパネルの「Environment」で確認できます。このパネルでは、現在Rで取り扱っている変数（オブジェクト）の一覧を確認することができます。
このパネルに表示されているのと同じ、オブジェクトのリストをR上で取得する場合には、ls関数を用います。
Rを閉じると、オブジェクトはメモリから削除されます。次にRStudioを起動したときには、デフォルトのワーキングディレクトリに存在する.RDataから自動的にワークスペースのイメージが読み込まれます。別途、.RDataファイルを指定してワークスペースを読み込む場合には、load関数を用います。load関数で.RDataファイルを読み込むことで、.RDataファイルを保存した際に使用していたオブジェクトがメモリ上に展開されます。
このように、ワークスペースを保存・読み込むことで、以前のデータ分析環境を読み込み、データ分析の続きを行うことができます。
ワークスペースの保存と読み込み
ls() # 現在メモリ上にある全てのオブジェクトを表示
save.image() # ワークスペースのイメージを保存する
load(".Rdata") # ワークスペースのイメージを読み込む13.5 オブジェクトの保存と読み込み
ワークスペース全体ではなく、個別のオブジェクトも、一時的に保存し、読み込むことができます。オブジェクトの保存と読み込みには、save関数とload関数を用います。
save関数はオブジェクトと文字列のファイル名の2つを引数に取り、オブジェクトを引数で指定したファイル名で保存する関数です。ファイル名は何でもよく、ファイルの拡張子にも特に指定はないのですが、「.rda」を拡張子としたファイル名とするのが一般的です。
保存したオブジェクトを読み込む関数が、load関数です。load関数はファイル名の文字列を引数に取り、save関数で保存した.rdaファイルを読み込みます。load関数で読み込むと、Rのワークスペースには保存したオブジェクトが現れます。
save・load関数と同様の関数として、dput関数とdget関数というものもあります。dput関数で保存したファイルはload関数で読み込めず、save関数で保存したファイルはdget関数で読み込めないため、dput関数でオブジェクトを保存した場合には、dget関数で読み込む必要があります。dget関数はオブジェクトを返す関数ですので、ワークスペースにオブジェクトが再現されるわけではありません。
オブジェクトの保存と読み込み
x <- c(1, 2, 3)
save(x, file = "Robject.rda") # オブジェクトを保存
rm(x) # xを削除する
load("Robject.rda") # オブジェクトの読み込み
x # xが読み込まれている
dput(x, "Robject_dput.rda") # オブジェクトを保存
dget("Robject_dput.rda") # オブジェクトが返ってくる
dget("Robject.rda") # エラー。saveで保存するとdgetで読み込めない
load("Robject_dput.rda") # エラー。dputで保存するとloadで読み込めない13.5.1 プログラムを呼び出す
保存したプログラムを他のプログラムで呼び出すときには、source関数を用います。source関数の引数はファイル名の文字列です。2章で説明した通り、Rのプログラムは通常「.R」の拡張子を付けて取り扱いますので、拡張子を含めたファイル名を指定します。現在のワーキングディレクトリに保存されているファイルを呼び出す場合はそのファイル名を、他のディレクトリに保存されているファイルを呼び出す場合はそのファイルのパスを含む文字列をsource関数の引数に取ります。。source関数でプログラムを呼び出すと、プログラムが実行されます。複雑なプログラムでは、関数などを別ファイルで定義しておいて、そのファイルを呼び出して用いることもあります。
source関数でプログラムの呼び出し
source("code_hello_world.R")13.6 データの読み込み
13.6.1 Excelからデータを読み込む（古典的な方法）
統計を行うデータは、通常Excelのような表計算ソフトか、データベースで準備するのが一般的です。このようなデータをRで取り込む際には、一昔前までは「テキストファイルに変換」してから読み込むのが一般的でした。
最近ではライブラリを使用することでExcelやデータベースのファイルから直接データを読み込むことができますが、ライブラリなしのRではこのような読み込みはできません。ライブラリが使用できないときには、以下のような方法でExcelファイルをテキストで保存し、Rで読み込むことになります。
また、Web上に保存されているデータがテキストである場合も少なくありません。このような、Web上のテキストファイルの読み込みにも、以下に示すテキスト読み込みの方法を用いることができます。
13.6.1.1 Excel：csv・タブ切りテキストへの変換
まずは、Excelでのテキストファイルの変換について説明します。Rで読み込むことができるテキストは、大きく分けると以下の4種類です。
- コンマ切りテキスト（comma-separated values, csv）
- タブ切りテキスト（tab-separated values, tsv）
- スペース切りテキスト
- 固定幅テキスト
これらのうち、スペース切りテキストについてはデータにスペースが入っていると読み込みが難しくなるため、通常は避けられます。固定幅テキストはやや取り扱いにくいため、Excelからの変換には用いません。したがって、Excelファイルは主にコンマ切りテキストかタブ切りテキストに変換して、Rで読み込むことになります。
Excelファイルからコンマ切り・タブ切りテキストへの変換はExcel上で行います。Excelの「ファイル」メニューから「名前を付けて保存」を選択し、ファイル名の下のドロップダウンリストから「CSV UTF-8 (コンマ区切り)(*.csv)」もしくは「テキスト (タブ区切り)(*.txt)」を選択します。拡張子である「.csv」や「.txt」は自動的に付与されます。
エンコーディング
テキストにはエンコーディングというものがあり、日本語テキストはUTF-8、Shift-JIS（CP932）、EUC-JPのいずれかのエンコーディングを持ちます。エンコーディングが異なると文字化けを起こします。RのデフォルトのエンコーディングはUTF-8です。WindowsではShift-JISが用いられている場合があるため、エンコーディングに注意が必要となります。
Excelの空欄データ
Excelには「データをセルから消したのに何らかのデータが残る」という謎仕様があります。 空のExcelファイルを作成し（Book1）、G7までを1で埋めます（Book2、下図9）。数値をバックスペースで消して保存すると（Book3）、何故かBook1よりBook3の方がファイルサイズが大きくなります（下図10）。Rからテキスト変換したファイルを読み込むと、この「無いけど残っているデータ」を読み込んでしまうので、エラーが生じることがあります。データをDeleteで削除、もしくは右クリックから削除を選ぶと、この残ったデータを削除することができます。
長い歴史を持つ、代々受け継がれたExcelファイルではこのような謎データがファイルサイズを大きくし、動作を遅くしている場合もありますので、データ数に比べてファイルサイズが大きいExcelファイルがあれば空欄をDeleteしてみることをおすすめします。
13.6.2 scan関数
まずは、1行のデータを読み込む場合について説明します。1行のデータであれば、scan関数を用いて読み込むことができます。scan関数の第一引数は文字列のファイル名です。ファイル名を指定するときには、必ず拡張子を含めて記載します。scan関数には、「sep」という引数を指定することができます。sepはデータ間の区切り文字を指定するものです。コンマ切りテキスト、CSVであれば「sep = ","」、タブ切りテキストであれば「sep = "\t"」を指定します。scan関数の返り値はベクターとなります。
ただし、whatという引数を設定すると、返り値をリストにすることができます。whatは空のリストを指定する引数で、リストの要素の個数に従い、scanで読み取った結果が代入されます。代入の順番は、1つ目がリストの1要素目、2つ目がリストの2要素目…となります。リストの長さより多い要素は再びリストの1要素目に代入されます。
scan関数でテキストファイルを読み込む
scan("./data/scansample.txt", sep = ",") # コンマ切りテキストを読み込む
## [1] 1 2 3 4 5 6 7 8
scan("./data/scansample.txt", sep = ",", what = list("", "")) # 出力をリストにする
## [[1]]
## [1] "1" "3" "5" "7"
##
## [[2]]
## [1] "2" "4" "6" "8"13.6.3 read.table関数
Excelから読み込む表は、通常行と列を持つ、テーブルの形をしていますので、データフレームにできると便利です。テキストに変換したExcelの表をデータフレームとして読み込む関数がread.table関数です。read.table関数は第一引数にテキストファイルのファイル名を取ります。scan関数と同様に、ファイル名には拡張子を含める必要があります。
read.table関数はscan関数と同じく、「sep」引数を取ります。sep引数には、コンマ切りテキスト、CSVであれば「sep = ","」、タブ切りテキストであれば「sep = "\t"」を指定します。
read.table関数はさらに、「header」という引数を取ります。この引数にTRUEを指定すると（「header = T」）、読み込むテキストの1行目を列名として、データを読み込みます。
read.table関数でよく用いられる引数はファイル名、sep、headerの3つですが、その他たくさんの引数を取ることができます。read.table関数の引数の一覧を以下の表1に示します。
| 引数 | データ型 | 意味 | デフォルト値 |
|---|---|---|---|
| file | 文字列 | ファイル名 | ー |
| header | 論理型 | 1行目を列名とするか | FALSE |
| sep | 文字列 | 区切り文字（コンマやタブ) | ー |
| quote | 文字列 | 文字列が囲まれている文字（“など） | “"’” |
| dec | 文字列 | 小数点の文字 | “.” |
| numerals | 文字列 | 文字列を数値に変換するときの正確性 | ー |
| row.names | 文字列ベクター | 行名 | ー |
| col.names | 文字列ベクター | 列名 | ー |
| as.is | 文字列 | 文字列を因子に変えるときのルール | !stringAsFactors |
| tryLogical | 論理型 | TRUEなどを論理型に変換するか | TRUE |
| na.strings | 文字列 | NAとして取り扱う文字列 | “NA” |
| colClasses | 文字列 | 列のクラスを指定 | NA |
| nrows | 数値 | 読み込む行数 | -1 |
| skip | 数値 | 読み込まない行数 | 0 |
| check.names | 論理型 | 列名をチェックするか | TRUE |
| fill | 論理型 | 空きになっている要素をスペースで埋めるか | !blank.lines.skip |
| strip.white | 論理型 | スペースを取り除くか | FALSE |
| blank.lines.skip | 論理型 | 空行をスキップするか | TRUE |
| comment.char | 文字列 | コメントの開始文字 | “#” |
| allowEscapes | 論理型 | エスケープ記号を変換するか | FALSE |
| flush | 論理型 | 1行1データかどうか | FALSE |
| stringAsFactors | 論理型 | 文字列を因子に自動変換するか | FALSE |
| fileEncoding | 文字列 | エンコーディングの指定 | “” |
| encoding | 文字列 | エンコーディング（変更はしない） | “unknown” |
| text | 文字列 | fileから読み込まず，直接データを入力 | ー |
| skipNul | 論理型 | 空データをスキップするか | FALSE |
13.6.4 read.csv関数、read.delim関数
read.table関数の仲間として、csvの読み込み用のread.csv関数、タブ切りテキスト読み込み用のread.delim関数、固定幅テキストの読み込み用のread.fwf関数がRには準備されています。read.csv関数はsep引数にコンマ、read.delim関数はsep引数にタブがデフォルト値として設定されており、sep引数を入力することなくデータを読み込むことができます。
テキストファイルの読み込み
read.table("filename.txt", sep="\t", header=T)
read.table("filename.txt", sep="\t", header=T, stringAsFactors = T)
read.csv("filename.csv")
read.csv2("filename.csv") # ヨーロッパ仕様
read.delim("filename.tsv")
read.delim2("filename.tsv") # ヨーロッパ仕様
read.fwf("filename.txt") # 固定幅テキスト
ヨーロッパで準備されたファイルのデータ読み込み
ヨーロッパではコンマ（,）をセミコロン（;）、小数点（ピリオド .）をコンマ（,）で記載するため、通常のread.csv関数、read.delim関数ではテキストファイルをまともに読み込むことができません。ヨーロッパで生成されるテキストファイルの読み込みには、専用の関数（read.csv2、read.delim2）が設けられています。
13.6.4.1 stringAsFactorsとfileEncoding
read.table関数の「stringAsFactors」という引数は、昔はTRUEがデフォルトとされており、read.table関数で読み込んだ文字列はすべて因子に変換されていました。Rのバージョン4.0.0よりstringAsFactorsのデフォルト値がFALSEに変更されたため、現在のread.table関数では、文字列は文字列のまま読み込まれます。
WindowsではテキストファイルのエンコーディングがShift JIS（CP932）になっている場合がありますので、「fileEncoding = "CP932"」を引数に指定しないと読み込めないことがあります。エンコーディングがUTF-8であれば、fileEncodingを指定する必要はありません。
13.6.5 クリップボードからの読み込み
Rでは、コピーしたテキストをクリップボードから読み込むこともできます。Ctrl+Cなどでコピーしたテキストを読み込む場合には、read.table関数の引数に"clipboard"を指定します。
クリップボードの内容を読み込む
read.table("clipboard")13.7 データの書き出し
Rからのデータの書き出しでは、通常テキストファイルが書き出されます。Excelファイルに直接書き出すこともできなくは無いのですが（xlsxパッケージ (Dragulescu and Arendt 2020)を利用する）、それほど一般的ではありません。データの書き出しに用いられる関数には、write関数、write.table関数などがあります。
13.7.1 write・cat関数
ベクターや行列などのデータの書き出しには、write関数・cat関数を用います。write関数はcat関数のラッパーで、2つの関数の間には大きな差はありません。cat関数はオブジェクトをコンソールに表示するために用いられますが、ファイルを出力する事もできます。print関数を用いてもコンソールへ表示することはできますが、ファイルを保存することはできません。
cat関数、write関数は、オブジェクトとファイル名を引数に取ります。共にsep引数で区切り文字を指定することができます。
cat・write関数でのオブジェクトの表示
vec <- c(1, 2, 3)
cat(vec) # consoleにvecを表示
write(vec, "") # cat関数と同じ（第2引数が無いとファイル保存が行われる）
print(vec) # print関数でも表示できるcat・write関数でのファイルの保存
cat(vec, file="cat.txt")
write(vec, file="vector.txt", sep="\t")
print(vec, "print.txt") # エラー13.7.2 write.table関数
Rでは、データ処理の多くはデータフレームを用いて行います。テキストファイルをデータフレームとして取り込むread.table関数とは逆に、データフレームをテキストファイルとして書き出す関数がwrite.table関数です。
write.table関数はデータフレームとファイル名を引数に取り、データフレームをそのファイル名のテキストファイルとして書き出します。
write.table関数の代表的な引数は、sep、col.names、row.names、quoteの4つです。sepはread.table関数と同じく区切り文字を指定する引数です。col.namesとrow.namesは論理型を取り、TRUEであれば列名・行名を保存し、FALSEであれば列名・行名を省いて保存します。quoteも論理型を取り、文字列・因子をダブルクオーテーションで囲むするかどうかを指定します。
read.table関数にread.csv関数があったように、write.table関数にはCSV用のwrite.csv関数があります。write.csv関数はsepのデフォルト値にコンマが設定されています。ヨーロッパ仕様のwrite.csv2関数もありますが、日本で使用することはまれです。
write.table関数
write.table(df_obj, "filename.txt", sep = "\t")
# 列名あり、行名なし、ダブルクオーテーションなしで保存
write.table(df_obj, "filename.txt", sep = "\t", col.names = T, row.names = F, quote = F)
write.csv(df_obj, "filename.csv")
write.csv2(df_obj, "filename.csv") # ヨーロッパ仕様13.8 readr
RのデフォルトのI/Oは上記の通りですが、read.table関数、write.table関数を用いると、指定する引数が多かったり、読み込んだ列のデータ型が思うように設定されなかったりすることがよく起こります。また、デフォルトの関数群ではその実行速度が遅く、大きなデータを取り扱う場合には読み込みにとても時間がかかる、という問題もあります。
これらの不都合を解決するI/Oに関するライブラリがreadrパッケージ (Wickham, Hester, and Bryan 2023)です。readrパッケージは、Rのデフォルトの関数名のピリオドをアンダースコア（_）に変換した関数群を備えており、列の型をうまく設定してくれる仕組みを備えています。また、デフォルトの関数よりも実行速度が速いため、大きなデータを取り扱う場合には、readrの関数群を用いたほうが良いでしょう。
readrパッケージはtidyverse (Wickham et al. 2019)を構成するライブラリの一つであり、インストール・ロードはtidyverseライブラリのインストール・ロードと同時に行うことができます。
readrの読み込み
pacman::p_load(tidyverse)13.8.1 readr：テキストデータの読み込み
readrでのテキストデータの読み込みには、read_table関数を用います。read_table関数の使い方はread.table関数とほぼ同じです。read.table関数と同じく、read_table関数も区切り文字をsep引数で設定します。read_table関数のデフォルトの区切り文字はスペースですので、sepを設定しない場合にはスペース切りテキストの読み込みに対応しています。読み込まれたファイルは、tibbleというデータ型の、データフレームに変換されます。
コンマ切りテキスト（CSV）の読み込みには、read_csvが、タブ切りテキスト（TSV）の読み込みにはread_tsv関数が準備されています。これらの他に、ヨーロッパ仕様のCSVを読み込むread_csv2関数、区切り文字を指定する必要があるread_delim関数、固定幅テキストの読み込みを行うread_fwf関数などがあります。
readrパッケージの読み込み関数は圧縮ファイルの読み込みにも対応しており、gzip（.gz）、bzip2（.bz2）、lzma（.xz）、zip（.zip）などの圧縮ファイルを直接読み込むことができます。また、インターネットからテキストファイルを直接読み込むこともできます。インターネットから直接読み込む場合には、テキストファイルが保存されているwebアドレス（http://, https://, ftp:// など）をファイル名として設定します。
readrでテキストファイルを読み込む
read_table("filename.txt") # sep=" "（スペース切り）がデフォルト
read_csv("filename.csv") # コンマ切りテキスト
read_tsv("filename.tsv") # タブ切りテキスト
read_delim("filename.txt", delim="\t") # delim引数に区切りを指定
read_fwf("filename.txt") # 固定幅テキスト
read_csv2("filename.csv") # ヨーロッパ仕様
read_delim(clipboard()) # クリップボードの読み込み
read_table("filename.zip") # zipファイルも直接読み込める13.8.2 tibble
readrの読み込み関数は、読み込んだデータをtibbleというデータ型に変換します。このtibbleは概ねデータフレームと同じで、取り扱いもデータフレームと同様に行うことができます。
tibbleはtibble関数で、データフレームと同じように作成することができます。また、as_tibble関数を用いることで、行列や通常のデータフレームをtibbleに変換することができます。
readrに限らず、tidyverseのライブラリ群の関数では返り値をtibbleとするものが多いです。tibbleのデータフレームは、表示した時に列のデータ型を表示する、10行以上の行は省略する、列も省略する等の特徴があります。tibbleについては、16章で詳しく説明します。
tibble
pacman::p_load(tidyverse)
tibble(x = 1:3, y = c("a", "b", "c"), z = c(T, F, T))
## # A tibble: 3 × 3
## x y z
## <int> <chr> <lgl>
## 1 1 a TRUE
## 2 2 b FALSE
## 3 3 c TRUE
as_tibble(iris)
## # A tibble: 150 × 5
## Sepal.Length Sepal.Width Petal.Length Petal.Width Species
## <dbl> <dbl> <dbl> <dbl> <fct>
## 1 5.1 3.5 1.4 0.2 setosa
## 2 4.9 3 1.4 0.2 setosa
## 3 4.7 3.2 1.3 0.2 setosa
## 4 4.6 3.1 1.5 0.2 setosa
## 5 5 3.6 1.4 0.2 setosa
## 6 5.4 3.9 1.7 0.4 setosa
## 7 4.6 3.4 1.4 0.3 setosa
## 8 5 3.4 1.5 0.2 setosa
## 9 4.4 2.9 1.4 0.2 setosa
## 10 4.9 3.1 1.5 0.1 setosa
## # ℹ 140 more rows13.8.3 readr：テキストファイルの書き出し
readrパッケージはwrite.table関数に当たる、テキスト書き出しの関数を備えています。readrが備えている関数は、データフレームをCSVとして保存するwrite_csv関数、タブ切りテキストとして保存するwrite_tsv関数、スペース切りテキストとして保存するwrite_delim関数があります。
read_table関数と同様に、write_関数もテキストの圧縮ファイルの保存に対応しています。対応している圧縮ファイルはgzip（.gz）、bzip2（.bz2）、lzma（.xz）です。
readrでのファイル書き出し
write_csv(x, "filename.csv") # コンマ切り
write_tsv(x, "filename.tsv") # タブ切り
write_delim(x, "filename.txt") # スペース切り
write_csv2(x, "filename.csv") # ヨーロッパ仕様
write_csv(x, "filename.gz") # gzipで圧縮して出力
write_csv(x, "filename.bz2") # bzip2で圧縮して出力
write_csv(x, "filename.xz") # lzmaで圧縮して出力13.9 readxl
私のようなヘボいR使いは昔から上記のようにExcelをテキストファイルに変換してはRに読み込むというステップを踏み続けてきました。このExcelからテキストへの変換の手間を無くすライブラリがreadxlパッケージ (Wickham and Bryan 2023)です。
readxlパッケージもtidyverseと同じく、Posit Softwareが開発しているライブラリですが、tidyverseには含まれていません。tidyverseとは別に、readxlパッケージを独立に読み込む必要があります。
readxlパッケージで使用する関数は、ほぼread_excel関数だけです。read_excel関数は、.xlsおよび.xlsxファイルの読み込みに対応しており、ファイル名で指定したExcelファイルからテーブルをtibbleとして読み込みます。read_excel関数ではsheetという引数を設定することができます。read_excel関数はsheetに設定した番号（もしくはシート名）のシートを読み込みます。
readxlパッケージはread_excel関数以外に、Excelファイルのメタデータ読み込みのための関数などを備えています。
readxlでExcelファイルを読み込む
pacman::p_load(readxl)
read_excel("filename.xlsx", sheet = 1) # read_xlsxが読み込まれる
read_excel("filename.xls", sheet = 1) # read_xlsが読み込まれる13.10 Excelファイルの種類
Excelには昔使用されていたファイルである.xlsファイルと、Excel2007から使われている.xlsxファイルがあります。
.xlsファイルはバイナリファイルで、内部的には1と0でデータが表現されています。
.xlsxファイルは実際にはzipファイルで、xmlというフォーマットで記載されたデータがzipファイルのフォルダ内に含まれています。.xlsxファイルは拡張子を.zipに書き換えるとzipファイルとして解凍することができ、中身を確認することができます。
.xlsと.xlsxは全然違うファイルですが、read_excel関数は拡張子によって.xlsを読み込むread_xls関数と.xlsxを読み込むread_xlsx関数を切り替えて呼び出しています。
13.10.0.1 その他のデータ読み込みライブラリ
Posit Softwareはreadxlの他にも、多数のデータ読み込み用ライブラリを開発しています。以下に示したライブラリを利用することで、様々なデータ型のファイルをRで読み込み、統計に用いることができます。
googlesheets4：Googleスプレッドシートの読み込み (Bryan 2023)haven：SAS、SPSS、Stataファイルの読み込み (Wickham, Miller, and Smith 2023)jsonlite：jsonファイルの読み込み (Ooms 2014)httr2：Webからの読み込み (Wickham 2023)rvest：スクレイピング用ライブラリ (Wickham 2022)DBI：データベースの読み込み (R Special Interest Group on Databases (R-SIG-DB), Wickham, and Müller 2024)
13.11 data.table
近年のデータサイエンスでは、時に数百万～数千億程度のデータを取り扱うこともあります。個人のPCでRを使ってこのような超大規模のデータを取り扱うのは現実的ではありませんが、数万～数十万行ぐらいのデータをPCで取り扱うことは増えてきています。例えば、生物分野ではマイクロアレイや高速シークエンサーのデータは数万～数十万行で、分析を個人が、自分のPCで取り扱うこともあるかと思います。自分でマイクロアレイやシークエンサーを使ってデータを出さなくても、GEO Datasetなどからデータを取得して、解析してみることも一般的に行われています。
このような超巨大データを取り扱う場合、R謹製のread.table関数では手に余りますし、read_table関数を用いても、読み込んだ後のデータ処理が重く、取り扱いに苦労します。このような大規模データの読み込みに特化したライブラリが、data.tableパッケージ (Barrett, Dowle, and Srinivasan 2023)です。
data.tableパッケージは、大規模データを読み込み、Rで高速に利用できるよう設計されたライブラリです。
data.tableパッケージでデータを読み込むときには、fread関数を用います。fread関数はhtmlからの読み込みにも対応しています。読み込んだデータはdata.tableクラスのオブジェクトとなります。
data.tableパッケージのfread関数でファイルを読み込む
pacman::p_load(data.table)
# flights14（NYのフライトデータ、25万行11列）をinputとする
input <- "https://raw.githubusercontent.com/Rdatatable/data.table/master/vignettes/flights14.csv"
# freadで読み込む
flights <- fread(input) # 219MBのデータ読み込み
class(flights)
dim(flights)data.tableの取り扱いの方法はほぼデータフレームと同じです。data.tableはインデックスからデータの要約ができる機構を備えています。ただし、後の章で説明するtidyr・dplyrの関数も適用できますので、データの要約はtidyr・dplyrで行ってもよいでしょう。
data.tableクラスの取り扱い
flights[5, 1] # 通常のインデックスに対応
flights[1:5] # 行列を指定しない場合は、行のインデックスになる
flights[1:5, 2:5] # ベクターでの読み出しにも対応
head(flights[origin == "JFK", ]) # originがJFKの行を選択
head(flights[, .(month, day)]) # monthとdayの列を選択
head(flights$origin) # originの列を抽出
data.tableでのデータ取り扱い
data.tableが使われ始めた頃は、data.tableオブジェクトの取り扱い方がデータフレームとは大きく異なっており、かなりとっつきにくかったのですが、現在ではデータフレームとほぼ同じ取り扱いができるようになっています。