MikuHatsune https://blog.hatena.ne.jp/MikuHatsune/ 驚異のアニヲタ社会復帰の予備 https://mikuhatsune.hatenadiary.com/ R Rpackage Rを使いこなす sankey plotというものを見た。 RでもrCharts, googleVis, riverplotパッケージあたりでできるらしいがこれを知る前に2時間くらいかかって作った。 つなぐのはロジスティクス関数で曲線を補完する。 4つの県と6つの高校でやってみたらこんな感じ。 声優の誕生月と誕生日の分布でやってみたけど長くなっただけできもかった。 barplotしてみた結果。各日で11人くらいの誕生日がいる。 最大は12月12日の21人。 a1 <- c(6, 12, 18, 24) a2 <- rbind(c(6, 1, 0, 3), c(0, 2, 7, 1), c(0, 0, 0, 10… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fmikuhatsune.hatenadiary.com%2Fentry%2F20140813%2F1407935184" title="sankey plotと声優の誕生日 - 驚異のアニヲタ社会復帰の予備" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> https://cdn-ak.d.st-hatena.com/diary/MikuHatsune/2014-08-13.png Hatena Blog https://hatena.blog 2014-08-13 22:06:24 rich https://mikuhatsune.hatenadiary.com/entry/20140813/1407935184 1.0 100%