失業率モデルをグラフで評価する
この演習では、前の章で unemployment データに当てはめた unemployment_model（男性失業率 male_unemployment から女性失業率 female_unemployment を予測するモデル）を、グラフで評価します。
まず、モデルの予測値を実際の female_unemployment に対してプロットします。コマンドは次の形式です。
ggplot(dframe, aes(x = pred, y = outcome)) +
geom_point() +
geom_abline()
次に残差を計算します。
residuals <- actual outcome - predicted outcome
そして、予測値に対して残差をプロットします。残差のグラフは少し形が異なり、比較対象は直線 \(x=y\) ではなく、水平線 $y=0$（geom_hline() を使用）になります。コマンドは用意されています。
データフレーム unemployment とモデル unemployment_model はあらかじめ読み込まれています。
この演習はコースの一部です
R による Supervised Learning：回帰
実践的なインタラクティブ演習
このサンプルコードを完成させて、この演習に挑戦してみましょう。
# unemployment and unemployment_model are available
summary(unemployment)
summary(unemployment_model)
# Make predictions from the model
unemployment$predictions <- ___
# Fill in the blanks to plot predictions (on x-axis) versus the female_unemployment rates
___(___, aes(x = ___, y = ___)) +
geom_point() +
geom_abline()