![](https://cdn-ak-scissors.b.st-hatena.com/image/square/fdca047eb93f6d154997047f31fd319a3d0c0742/height=288;version=1;width=512/https%3A%2F%2Fqiita-user-contents.imgix.net%2Fhttps%253A%252F%252Fcdn.qiita.com%252Fassets%252Fpublic%252Farticle-ogp-background-412672c5f0600ab9a64263b751f1bc81.png%3Fixlib%3Drb-4.0.0%26w%3D1200%26mark64%3DaHR0cHM6Ly9xaWl0YS11c2VyLWNvbnRlbnRzLmltZ2l4Lm5ldC9-dGV4dD9peGxpYj1yYi00LjAuMCZ3PTk3MiZoPTM3OCZ0eHQ9JUUzJTgzJTg3JUUzJTgzJUJDJUUzJTgyJUJGJUUzJTgxJUFFaGlzdG9ncmFtJUUzJTgxJUE4JUU3JUEyJUJBJUU3JThFJTg3JUU1JUFGJTg2JUU1JUJBJUE2JUU5JTk2JUEyJUU2JTk1JUIwJUUzJTgyJTkyJUU1JTkwJThDJUU2JTk5JTgyJUUzJTgxJUFCJUU2JThGJThGJUUzJTgxJThEJUUzJTgxJTlGJUUzJTgxJTg0JnR4dC1jb2xvcj0lMjMyMTIxMjEmdHh0LWZvbnQ9SGlyYWdpbm8lMjBTYW5zJTIwVzYmdHh0LXNpemU9NTYmdHh0LWFsaWduPWxlZnQlMkN0b3Amcz02Mjk5MDQ1YTg2NThjYTk1YmExZGIzZTlmY2U1MTE1Yg%26mark-x%3D142%26mark-y%3D57%26blend64%3DaHR0cHM6Ly9xaWl0YS11c2VyLWNvbnRlbnRzLmltZ2l4Lm5ldC9-dGV4dD9peGxpYj1yYi00LjAuMCZoPTc2Jnc9NzcwJnR4dD0lNDBob3hvX2ImdHh0LWNvbG9yPSUyMzIxMjEyMSZ0eHQtZm9udD1IaXJhZ2lubyUyMFNhbnMlMjBXNiZ0eHQtc2l6ZT0zNiZ0eHQtYWxpZ249bGVmdCUyQ3RvcCZzPTFiM2FmZjRlZGY5ZTEwYzg3ZmQ0ZTJhZmQ1NTBkY2Vk%26blend-x%3D142%26blend-y%3D436%26blend-mode%3Dnormal%26txt64%3DaW4g5qCq5byP5Lya56S-44Ob44Kv44K944Ko44Og%26txt-width%3D770%26txt-clip%3Dend%252Cellipsis%26txt-color%3D%2523212121%26txt-font%3DHiragino%2520Sans%2520W6%26txt-size%3D36%26txt-x%3D156%26txt-y%3D536%26s%3D5efc290a0d4be35b70343e40bbed872c)
エントリーの編集
![loading...](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/common/loading@2x.gif)
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
記事へのコメント1件
- 注目コメント
- 新着コメント
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
![アプリのスクリーンショット](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/entry/app-screenshot.png)
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
データのhistogramと確率密度関数を同時に描きたい - Qiita
Q. histogramと確率密度関数を同時に描きたいのですが。 A. 縦軸を確率密度にする(確率密度関数にあわ... Q. histogramと確率密度関数を同時に描きたいのですが。 A. 縦軸を確率密度にする(確率密度関数にあわせる)場合 以下のように書きます。 library(ggplot2) dens <- density(faithful$waiting) bw <- diff(range(faithful$waiting))/20 ggplot(faithful, aes(x=waiting)) + geom_histogram(aes(y=..density..), binwidth=bw, fill='white', color='black') + geom_density(fill='black', alpha=0.3) + xlim(range(dens$x))
2021/03/25 リンク