Atsushi Takayama
July 10, 2017
320

# ggplot.galleryというお遊びウェブアプリケーションを作った話

July 10, 2017

## Transcript

1. ggplot.galleryͱ͍͏
͓༡ͼ΢ΣϒΞϓϦέʔγϣϯΛ࡞ͬͨ࿩
fukuoka.R #08 (ฏ೔൛)

2. ࣗݾ঺հ
• ߴࢁԹ @edvakf
• ϐΫγϒCTO݉෱ԬΦϑΟε্ཱͪ͛୲౰
• େֶӃ࣌୅͸౷ܭ෺ཧͰɺMatLabΛ࢖ͬͯ·ͨ͠
• R͸ͪΐͬͱ࢖ͬͨهԱ͕͋Δ…
• ࢓ࣄͰ͸ओʹ΢ΣϒΞϓϦέʔγϣϯΤϯδχΞ

3. ·ͣ͸σϞ

4. ggplotͱ͸
• ϓϩοτΛඳ͘RͷϥΠϒϥϦ
• The Grammer of Graphicsͱ͍͏ຊͷମܥʹج͍ͮͨ
API
• ៉ྷͳϓϩοτ͕Ͱ͖Δ
• ͱʹ͔͘៉ྷʂ

5. ྫɿώετάϥϜ

6. ൺֱɿmatplotlib
pythonͰղੳͷίʔυॻ͍ͯͯ΋ɺϓϩοτ͚ͩ͸ggplotͰ΍Γͨ͘ͳͬͯ͘Δ…

7. ॻ͖ํ
library(ggplot2)
library(reshape2)
df <- melt(df)
plt <- ggplot(df, aes(x=value, fill=variable))
plt <- plt +
geom_histogram(alpha=0.5, position="identity")
plot()

8. Πέͯͳ͍ͱ͜Ζ
• υΩϡϝϯτʹαϯϓϧίʔυ͕͋Δͷ͸ྑ͍͕ɺσʔ
λ͕ແ͍ͷͰؾܰʹࢼͯ͠ΈΔ͜ͱ͕Ͱ͖ͳ͍
• http://docs.ggplot2.org/current/
• ͦ΋ͦ΋R͕ͭΒ͍
• "<-" Λॻ͘ͷ͕໘౗͍͘͞

9. ggplot.galleryͳΒ
• ϓϩοτʹϑΝΠϧΛఴ෇Ͱ͖Δ
• ίʔυ͸͋Δ͚Ͳσʔλ͕ແ͍͔Β࣮ߦͰ͖ͳ͍ͱ͍
͏͜ͱ͕ͳ͍
• ಈ͘αϯϓϧΛϑΥʔΫͯ͠ࢼߦࡨޡ͠ͳ͕Β޷Έͷϓ
ϩοτΛ࡞ΕΔ

10. ͞Βʹ
• ϓϩοτʹը૾ͷURL͕༩͑ΒΕΔͷͰɺνϟοτʹష
Γ෇͚΍͍͢
• SVG, PNG
• highchairsͳͲͰ͸ແཧ
• API͕ॆ࣮
• ೔ʑͷKPIΛbot͕νϟοτʹషΔ༻్ͳͲΛ૝ఆ

11. RubyͰσʔλ࡞ͬͯggplot.galleryʹ౤͛ͯը૾URLΛSlackʹ౤͛ͯ·͢

12. ggplot.galleryΛࢧ͑Δٕज़
• go
• Docker
• ೚ҙͷRͷίʔυΛ࣮ߦͰ͖ΔͷͰαϯυϘοΫεԽ
• docker run —net=none Ͱ֎෦ΞΫηεΛېࢭ
• nginx
• ը૾ͷΩϟογϡͳͲ
• ansible
• ηοτΞοϓͱσϓϩΠ

13. Fork me on GitHub
• http://ggplot.gallery/
• https://github.com/edvakf/ggallery

14. ࠂ஌ɿpixiv Night #05 Πϥετͷػցֶशٕज़
෱Ԭதܧ΋ϐΫγϒΦϑΟεͰ΍Γ·͢ʢΠϕϯτϖʔδ͸·ͩ…ʣ