
114
5
章 散布図
図5-25で確認できるように、男性のデータの線は女性のデータの線と同じように右側まで伸びてい
ます。ただし、過去のデータを外挿するのは必ずしも正しいことではないという点は注意しておくべき
です。それが正当化されるかどうかは、扱うデータの特性やあなたが仮定している前提によります。
レシピ
5.9
注釈とモデルの係数を追加する
問題
プロットにモデルについての数値的な情報を追加したい。
解決策
プロットにシンプルなテキストを追加する場合、単純に注釈を追加します。この例では、線形モデ
ルを作成し、「レシピ5.7 既存のモデルをフィットさせる」で定義した
predictvals()
関数を使ってモ
デルから予測値の線を作ります。その後、注釈を追加します。
library(gcookbook) # heightweight
データセットを使うため
gcookbook
を読み込む
model <- lm(heightIn ~ ageYear, heightweight)
summary(
model)
#>
#> Call:
#> lm(formula = heightIn ~ ageYear, data = heightweight)
#>
#> Residuals:
#> Min 1Q Median 3Q Max
#> -8.3517 -1.9006 0.1378 1.9071 8.3371
#>
#> Coefficients:
#> Estimate Std. Error t value Pr(>|t|)
#> (Intercept) ...