基本的なリッジラインプロット

提供されたコードは、曜日ごとにスピード違反の割合（制限超過率）で停車させられたドライバーをリッジラインプロットで可視化するものです。

コードを修正して、カーネル幅（bandwidth）を指定値に設定し、ロングテールを切り落とすために x 軸の表示範囲を変更し、さらに使用した帯域幅を読者に伝えるための subtitle を追加してください。

この演習はコースの一部です

R による可視化ベストプラクティス

コースを見る

演習の手順

geom_density_ridges() の bandwidth を 3.5 に変更します。
x スケールの limits を 0 から 150 に設定します。
プロットにサブタイトル 'Gaussian kernel SD = 3.5' を付けます。

実践的なインタラクティブ演習

このサンプルコードを完成させて、この演習に挑戦してみましょう。

library(ggridges)

md_speeding %>% 
    mutate(day_of_week = factor(day_of_week, levels = c("Mon","Tues","Wed","Thu","Fri","Sat","Sun") )) %>% 
    ggplot(aes( x = percentage_over_limit, y = day_of_week)) + 
    # Set bandwidth to 3.5
    geom_density_ridges() +
    # add limits of 0 to 150 to x-scale
    scale_x_continuous() 
    # provide subtitle with bandwidth

コードを編集して実行