Upgrade to Pro
— share decks privately, control downloads, hide ads and more …
Speaker Deck
Features
Speaker Deck
PRO
Sign in
Sign up for free
Search
Search
TokyoR#93
Search
soriente
July 03, 2021
Technology
0
220
TokyoR#93
TokyoR#93の初心者セッション可視化パートです。
soriente
July 03, 2021
Tweet
Share
Other Decks in Technology
See All in Technology
DevOpsメトリクスとアウトカムの接続にトライ!開発プロセスを通して計測できるメトリクスの活用方法
ham0215
2
220
SIEMを用いて、セキュリティログ分析の可視化と分析を実現し、PDCAサイクルを回してみた
coconala_engineer
0
270
プラットフォームってつくることより計測することが重要なんじゃないかという話 / Platform Engineering Meetup #8
taishin
0
310
SPI原点回帰論:事業課題とFour Keysの結節点を見出す実践的ソフトウェアプロセス改善 / DevOpsDays Tokyo 2024
visional_engineering_and_design
4
1.8k
オーナーシップを持つ領域を明確にする
konifar
13
3k
コンテナセキュリティの基本と脅威への対策
kyohmizu
3
740
検証を通して見えてきたTiDBの性能特性
lycorptech_jp
PRO
6
3.7k
データベース02: データベースの概念
trycycle
0
130
ServiceNow Knowledge Learning Rise up
manarobot
0
180
ユーザーストーリーのレビューを自動化したみたの
bun913
1
380
VS CodeでAWSを操作しよう
smt7174
7
1.5k
反実仮想機械学習とは何か
usaito
PRO
8
2.9k
Featured
See All Featured
For a Future-Friendly Web
brad_frost
171
8.9k
RailsConf 2023
tenderlove
2
530
Building a Scalable Design System with Sketch
lauravandoore
455
32k
How To Stay Up To Date on Web Technology
chriscoyier
782
250k
Creatively Recalculating Your Daily Design Routine
revolveconf
209
11k
StorybookのUI Testing Handbookを読んだ
zakiyama
11
4.6k
Build your cross-platform service in a week with App Engine
jlugia
225
17k
Infographics Made Easy
chrislema
237
18k
Dealing with People You Can't Stand - Big Design 2015
cassininazir
356
22k
Practical Orchestrator
shlominoach
181
9.7k
Navigating Team Friction
lara
177
13k
WebSockets: Embracing the real-time Web
robhawkes
59
7k
Transcript
5PLZP3σʔλՄࢹԽ ॳ৺ऀηογϣϯ
ࣗݾհ w TPSJFOUF w *5اۀۈ w 3ྺ ࡉͬͯ͘͘·͢ɻ w
ͱ͍ͬͯ࠷ۙ1ZUIPO͕ϝΠϯ w 1)1ॻ͍ͯͨ࣌ظ͋Γ·ͨ͠ɻ
ՄࢹԽͱ w จࣈͷ௨Γɺݟ͑ΔԽ͢Δɻ σʔλੳͷจ຺ͰɺσʔλͷؔੑΛݟ͑ ΔԽ͢Δɻ w ՄࢹԽΛ͚ͨͩ͠ͰΘ͔Δ͜ͱଟ͍ɻ w ՄࢹԽΛ͢ΔͱɺΘ͔Γ͍͢ɻ
w ՄࢹԽΛͨ͋͠ͱʹԿΒ͔ͷҙࢥܾఆΛߦ͏͜ͱ͕ଟ͍ɻ ੳऀ͕ࣗҙࢥ ܾఆ͢Δ͜ͱɺ୭͔ʹҙࢥܾఆͯ͠Β͏͜ͱ͋Δɻ
None
HHQMPUͷجຊ
HHQMPUͱ w ՄࢹԽͷͨΊͷϥΠϒϥϦ w UJEZWFSTFͷϥΠϒϥϦ܈ͷҰͭ w ʰ5IF(SBNNBSPG(SBQIJDTʱΛϕʔεʹ࡞ΒΕ͍ͯΔ ˠҰ؏ੑͷ͋Δจ๏Ͱ߹ཧతʹॻ͚Δʂ
ࠓճ͏σʔλQFOHVJOT JOTUBMMQBDLBHFT QBMNFSQFOHVJOT MJCSBSZ QBMNFSQFOHVJOT IFBE QFOHVJOT
TQFDJFT JTMBOE CJMM@MFOHUI@NN CJMM@EFQUI@NN fl JQQFS@MFOHUI@NN CPEZ@NBTT@H TFY ZFBS "EFMJF 5PSHFSTFO NBMF "EFMJF 5PSHFSTFO GFNBMF "EFMJF 5PSHFSTFO GFNBMF "EFMJF 5PSHFSTFO /" /" /" /" /" "EFMJF 5PSHFSTFO GFNBMF "EFMJF 5PSHFSTFO NBMF
QFOHVJOT
HHQMPUΠϯετʔϧಡΈࠐΈ JOTUBMMQBDLBHFT HHQMPU JOTUBMMQBDLBHFT UJEZWFSTF ͰՄ MJCSBSZ HHQMPU MJCSBSZ UJEZWFSTF
ͰՄ
ࠓճॻ͘άϥϑͷछྨ w ࢄਤ w άϥϑ w ંΕઢάϥϑ
ࠓճ͏σʔλQFOHVJOT JOTUBMMQBDLBHFT QBMNFSQFOHVJOT MJCSBSZ QBMNFSQFOHVJOT IFBE QFOHVJOT
TQFDJFT JTMBOE CJMM@MFOHUI@NN CJMM@EFQUI@NN fl JQQFS@MFOHUI@NN CPEZ@NBTT@H TFY ZFBS "EFMJF 5PSHFSTFO NBMF "EFMJF 5PSHFSTFO GFNBMF "EFMJF 5PSHFSTFO GFNBMF "EFMJF 5PSHFSTFO /" /" /" /" /" "EFMJF 5PSHFSTFO GFNBMF "EFMJF 5PSHFSTFO NBMF
ࠓճ͏σʔλQFOHVJOT JOTUBMMQBDLBHFT QBMNFSQFOHVJOT MJCSBSZ QBMNFSQFOHVJOT IFBE QFOHVJOT
TQFDJFT JTMBOE CJMM@MFOHUI@NN CJMM@EFQUI@NN fl JQQFS@MFOHUI@NN CPEZ@NBTT@H TFY ZFBS "EFMJF 5PSHFSTFO NBMF "EFMJF 5PSHFSTFO GFNBMF "EFMJF 5PSHFSTFO GFNBMF "EFMJF 5PSHFSTFO /" /" /" /" /" "EFMJF 5PSHFSTFO GFNBMF "EFMJF 5PSHFSTFO NBMF
ࢄਤ ॻ͖ํओʹ3ύλʔϯ > ggplot(penguins, aes(x = bill_length_mm, y = bill_depth_mm))
+ geom_point() > ggplot(penguins) + geom_point(aes(x = bill_length_mm, y = bill_depth_mm)) > ggplot() + geom_point( data = penguins, aes(x = bill_length_mm, y = bill_depth_mm) )
ࠓճॻ͘άϥϑͷछྨ w ࢄਤ w ંΕઢάϥϑ w άϥϑ
ࠓճ͏σʔλQFOHVJOT JOTUBMMQBDLBHFT QBMNFSQFOHVJOT MJCSBSZ QBMNFSQFOHVJOT IFBE QFOHVJOT
TQFDJFT JTMBOE CJMM@MFOHUI@NN CJMM@EFQUI@NN fl JQQFS@MFOHUI@NN CPEZ@NBTT@H TFY ZFBS "EFMJF 5PSHFSTFO NBMF "EFMJF 5PSHFSTFO GFNBMF "EFMJF 5PSHFSTFO GFNBMF "EFMJF 5PSHFSTFO /" /" /" /" /" "EFMJF 5PSHFSTFO GFNBMF "EFMJF 5PSHFSTFO NBMF
ࠓճ͏σʔλQFOHVJOT JOTUBMMQBDLBHFT QBMNFSQFOHVJOT MJCSBSZ QBMNFSQFOHVJOT IFBE QFOHVJOT
TQFDJFT JTMBOE CJMM@MFOHUI@NN CJMM@EFQUI@NN fl JQQFS@MFOHUI@NN CPEZ@NBTT@H TFY ZFBS "EFMJF 5PSHFSTFO NBMF "EFMJF 5PSHFSTFO GFNBMF "EFMJF 5PSHFSTFO GFNBMF "EFMJF 5PSHFSTFO /" /" /" /" /" "EFMJF 5PSHFSTFO GFNBMF "EFMJF 5PSHFSTFO NBMF
σʔλूܭ MJCBSBSZ EQMZS QFOHVJOT@GPS@MJOFQFOHVJOT HSPVQ@CZ ZFBS TVNNBSJTF NFBO@NBTTNFBO
CPEZ@NBTT@H OBSN536& QFOHVJOT@GPS@MJOF ZFBS NFBO@NBTT
ંΕઢάϥϑ ॻ͖ํओʹ3ύλʔϯ > ggplot(penguins_for_line, aes(x = year, y = mean_mass))
+ geom_line() > penguins_for_line %>% ggplot() + geom_line(aes(x = year, y = mean_mass)) > ggplot(penguins_for_line) + geom_line(aes(x = year, y = mean_mass)) > ggplot() + geom_line( data = penguins_for_line, aes(x = year, y = mean_mass) )
άϥϑ ॻ͖ํ3ύλʔϯ > ggplot(penguins_for_line, aes(x = year, y = mean_mass))
+ geom_bar(stat = "identity") > ggplot(penguins_for_line) + geom_bar(aes(x = year, y = mean_mass), stat = "identity") > ggplot() + geom_bar( data = penguins_for_line, aes(x = year, y = mean_mass), stat = "identity") ҎԼͰՄ > ggplot() + geom_bar( data = penguins, aes(x = year, y = body_mass_g), stat = "summary", fun = "mean" )
ͦͷଞͷάϥϑɻɻɻ w άάΔ w ެࣜνʔτγʔτ IUUQTHJUIVCDPNSTUVEJPDIFBUTIFFUTCMPCNBTUFSEBUB WJTVBMJ[BUJPOQEG w 4MBDLͷSXBLBMBOH࣭
͍͔ͭ͘άϥϑॻ͍ͯΈͯ w λΠτϧ͚͍ͭͨɻ w ͕࣠ؾʹͳΔɻ
> ggplot() + geom_line( data = penguins_for_line, aes(x = year,
y = mean_mass) ) + ggtitle("ંΕઢάϥϑ") + theme_gray(base_family = "HiraKakuPro-W3") λΠτϧઃఆ
λΠτϧઃఆ > ggplot() + geom_line( data = penguins_for_line, aes(x =
year, y = mean_mass) ) + ggtitle("ંΕઢάϥϑ") + theme_gray(base_family = "HiraKakuPro-W3")
Y࣠ > ggplot() + geom_line( data = penguins_for_line, aes(x =
year, y = mean_mass)) + ggtitle("ંΕઢάϥϑ") + theme_gray(base_family = "HiraKakuPro-W3") + scale_x_continuous(breaks=seq(2007,2009,1))
Z࣠ > ggplot() + geom_line( data = penguins_for_line, aes(x =
year, y = mean_mass) ) + ggtitle("ࢄਤ") + theme_gray(base_family = "HiraKakuPro-W3") + scale_x_continuous( breaks = seq( min(penguins_for_line$year), max(penguins_for_line$year), 1 ) ) + ylim(0, 4300)
ࢄਤ छྨʹΑͬͯ৭͚͍ͨ > ggplot() + geom_point( data = penguins, aes(x
= bill_length_mm, y = bill_depth_mm, color = species) )
·ͱΊ w ՄࢹԽ͔ͳΓधཁͳύʔτ͕ͩɺ͍͠ɻ w άϥϑHHQMPU ͱHFPN@YYY Λ͏ͱॻ͘͜ͱ͕Ͱ͖Δɻ w ؔϓϥεͰͭͳ͙ɻ w
Γ͍ͨ͜ͱΛάάͬͯΈͯɺࢼͯ͠ΈͯɺΘ͔Βͳ͚Εɺ4MBDLͷSXBLBMBOHʹ࣭ͯͯ͠ Έ·͠ΐ͏ʂ
&/+0: