R ggplot2 で線形回帰/一般化線形モデルの残差プロット

ggplot2 で出力している他のグラフとデザインを揃えたかったので作ってみた。

インストール

library(devtools)
install_github('sinhrks/ggfortify')

サンプル

デフォルトの plot と (ほぼ) 同じ見た目にしたつもり。

library(ggplot2)
library(ggfortify)
m <- lm(Petal.Width ~ Petal.Length, data = iris)
autoplot(m, which = 1:6)

通常の残差プロット

一般化線形モデル

data(anorexia, package = "MASS")
m <- glm(Postwt ~ Prewt + Treat + offset(Prewt), family = gaussian, data = anorexia)
autoplot(m, which = 1:6)

通常の残差プロット

設定できるオプション

• which : 描画対象のグラフ (1〜6まで、通常の plot と同じ)
• colour : データの色
• label.colour : ラベルの色
• label.size : ラベルの文字サイズ
• label.n : ラベルを表示する数
• smooth.colour : 平滑線の色
• smooth.linetype : 平滑線のスタイル
• ad.colour : 補助線の色
• ad.linetype : 補助線のスタイル
• ad.size : 補助線のサイズ
• nrow : 複数プロットする際の行数
• ncol : 複数プロットする際の列数

Rグラフィックスクックブック ―ggplot2によるグラフ作成のレシピ集