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
Befriending Kurtosis with R
Search
bk
October 07, 2023
Programming
1
770
Befriending Kurtosis with R
bk
October 07, 2023
Tweet
Share
More Decks by bk
See All by bk
tidy_rpart
bk_18
1
1.1k
dotdotdot_in_predict_function
bk_18
1
710
Introduction_of_GoogleAnalytics_with_R
bk_18
2
850
web scraping with polite package
bk_18
2
620
start-salesforce-with-r
bk_18
0
700
Missspell Detection
bk_18
1
120
About Missing Values
bk_18
1
330
Other Decks in Programming
See All in Programming
デフォルトにして至高、RubyMineの大好きな所
ruzia
0
820
Node.js v22 で変わること
yosuke_furukawa
PRO
11
3.9k
CDKコントリビュートの最初の壁を越えよう! -簡単issueの見つけ方-
badmintoncryer
3
220
Tailwind CSSを本気でカスタマイズする方法
fsubal
14
5.5k
PHP8.3の機能を振り返る / Review of PHP 8.3 features
seike460
PRO
1
120
『Railsオワコン』と言われる時代に、なぜブルーモ証券はRailsを選ぶのか
free_world21
1
360
What We Can Learn From OSS
inouehi
0
440
サイコロで理解する統計的仮説検定の考え方
tatamiya
4
1k
R言語の環境構築と基礎 Tokyo.R 112
bob3bob3
0
280
DMMプラットフォームがTiDB Cloudを採用した背景
pospome
9
4.2k
PHPの次期バージョンはこの時期どうなっているのか - Internalsの開発体制について - PHPカンファレンス小田原
youkidearitai
PRO
1
220
はてなにおける CSS Modules、及び CSS Modules に足りないもの / CSS Modules in Hatena, and CSS Modules missing parts
mizdra
7
970
Featured
See All Featured
Happy Clients
brianwarren
92
6.4k
How To Stay Up To Date on Web Technology
chriscoyier
782
250k
Exploring the Power of Turbo Streams & Action Cable | RailsConf2023
kevinliebholz
7
3.4k
Facilitating Awesome Meetings
lara
43
5.6k
Adopting Sorbet at Scale
ufuk
69
8.6k
Designing the Hi-DPI Web
ddemaree
276
33k
Learning to Love Humans: Emotional Interface Design
aarron
267
39k
jQuery: Nuts, Bolts and Bling
dougneiner
59
7.2k
Fight the Zombie Pattern Library - RWD Summit 2016
marcelosomers
228
16k
Building Flexible Design Systems
yeseniaperezcruz
320
37k
GraphQLの誤解/rethinking-graphql
sonatard
55
9.3k
Art, The Web, and Tiny UX
lynnandtonic
290
19k
Transcript
ʙ ՄࢹԽύοέʔδͰઑͱٔΕΔʙ ઑͱྑ͘ͳΓ͍ͨ
࣍ 2 ઑͱ ϕʔλͱ ઑΛՄࢹԽͯ͠ΈΔ ·ͱΊ ࢀߟจݙ ɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾ p.3,4 p.5-7
p.8-16 p.17,18 ɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾ ɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾ ɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾ ɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾɾ p.19 B
ઑͱ
ઑͱ 4 ֬ͷ, ઑΓͷఔΛද͢ࢦඪఆٛͰ͖Δ. ͢ͳΘͪ, ࢛ͷظ , த৺ͷपғͷ෦ͷઑΓ۩߹Λද͢. α4 =
E(x − μ)4 σ4 ౦ژେֶڭཆֶ෦౷ܭֶڭࣨ. ʰ౷ܭֶೖʱ. ౦ژେֶग़൛ձ, 1991-07-10 *ਖ਼نͷઑͰ͋Δ3ΛҾ͍ͯɺ0Λج४ʹ͢Δ߹͋Δɻ ࠓճ3ΛҾ͔ͣɺ্هͷࢦඪΛͦͷ··༻͢Δɻ
B ϕʔλͱ
ϕʔλͱ 6 ۩ମతͳઑΛࢉग़͢ΔͨΊʹɺઑΛٻΊΔΛஔ͘ɻ ࠓճ2ͭͷΛ࣋ͪɺܗঢ়͕ॊೈͳϕʔλΛѻ͏ɻ ͔ΒͬΆͷ͠ΐ͜. ʮʲRʳϕʔλͷ࡞ਤʯ. https://www.anarchive-beta.com/entry/2022/07/02/210203
ϕʔλͷύϥϝʔλมԽͱઑ 7 alphaͱઑʢkurtosisʣͷؔΛਤࣔɻ y࣠ʹுΓ͍ͨܗͷઑେ͖͍͕ɺҰҰ༷ʹ͍ۙͮͯখ͘͞ͳΓɺ ͦͷޙਖ਼نʹ͖ۙͮͳ͕Β؇͔ʹେ͖͘ͳΔɻ
ઑΛՄࢹԽͯ͠ΈΔ
ઑͷࣜΛղ 9 ϕʔλͷઑΛՄࢹԽͰ͖ΔΑ͏ʹղ͢Δɻ ࢠฏۉपΓͷ4࣍Ϟʔϝϯτɻੵͷܗʹ͢Δͱภࠩͷ4ͱ֬ີؔɻ ࢄͷ2ɻࠓճ͋·Γ৮Εͳ͍ɻ E[(x − μ)4] σ4 =
∫ (x − μ)4 f(x) dx σ4
alpha=6.1ͷ 10 alpha=6.1ɺbeta=2ͷϕʔλͰઑΛՄࢹԽ͍ͯ͘͠ɻ
alpha=6.1ͷภࠩͷ4ͱ֬ີؔ 11 ઑͷࢠʹ͋Δภࠩͷ4ͱ֬ີؔΛਤࣔɻ ࢠ͜ΕΒͷֻ͚߹ΘͤʹͳΔɻ (x − μ)4 f(x) ∫ (x
− μ)4 f(x) dx σ4 f(x) (x − μ)4
alpha=6.1ͷภࠩͷ4ͱ֬ີؔ 12 ࢠͷܭࢉΛਐΊͯɺภࠩͷ4ͱ֬ີؔΛֻ͚ͨؔΛϓϩοτɻ ฏۉपΓภࠩͷ4͕0ʹۙͮͨ͘Ίɺ͕খ͘͞ͳΔɻ ฏۉ͔ΒΕɺ֬ີؔߴΊͳ0.25ʙ0.5͋ͨΓͷ͕େ͖͘ͳΔɻ mean ∫ (x − μ)4
f(x) dx σ4 (x − μ)4 f(x) (x − μ)4 f(x)
alpha=0.14ͷ 13 ࣍ʹalpha=0.14ɺbeta=2ͷϕʔλͰઑΛՄࢹԽ͢Δɻ ࢄઌ΄Ͳͷalpha=6.1ͷͱɺ0.02લޙͰ΄΅มΘΒͳ͍ɻ
alpha=0.14ͷภࠩͷ4ͱ֬ີؔ 14 alpha=6.1Ͱݟ͖ͯͨͷͱಉ༷ʹɺ֬ີؔͱภࠩͷ4ΛՄࢹԽɻ ภࠩͷ4ͷมԽ͕ݟ͍͢Α͏ʹɺॎ࣠ͷεέʔϧΛ0ʙ3ʹௐ͍ͯ͠Δɻ (x − μ)4 f(x) ∫ (x
− μ)4 f(x) dx σ4 f(x) (x − μ)4
alpha=0.14ͷภࠩͷ4ͱ֬ີؔ 15 ภࠩͷ4ͱ֬ີؔΛֻ͚ͨͷΛਤࣔɻ ฏۉ0͔Βগ͠ΕΔͨΊɺy࣠ۙͰ͕ٸʹ্͕Δɻ ·ͨɺฏۉ͔ΒΕͨП0.5ʙ1.0ͷؒͷ͕େ͖͍ɻ (x − μ)4 f(x) mean
∫ (x − μ)4 f(x) dx σ4 (x − μ)4 f(x)
alpha=6.1ͱalpha=0.14ͷൺֱ 16 alpha=6.1ͱ0.14ͷภࠩͷ4ͱ֬ີؔΛֻ͚ͨͷΛಉ࣌ʹՄࢹԽɻ alpha=0.14ͷฏۉ͔ΒΕͨ0.75ۙͰ͕େ͖͍ɻ શମͰɺalpha=6.1ΑΓalpha=0.14ͷํ͕ઑ͕େ͖͍ͱ͍͏݁Ռʹɻ ∫ (x − μ)4 f(x)
dx σ4 (x − μ)4 f(x)
·ͱΊ
·ͱΊ 18 ɾઑ͕େ͖͍ɺͱʁ ͷฏۉपΓͷີ͕ബ͘ɺ ฏۉ͔ΒΕͨ෦ͷີ͕ް͍͜ͱ ɾRݴޠͷՄࢹԽύοέʔδͰཧղΛਂΊΔ ɾggplot2 ɾgganimate ɾgghighlight
ࢀߟจݙ 19 •౦ژେֶڭཆֶ෦౷ܭֶڭࣨ. ʰ౷ܭֶೖʱ. ౦ژେֶग़൛ձ, 1991-07-10 • ͔ΒͬΆͷ͠ΐ͜, ʮʲRʳϕʔλͷ࡞ਤʯ, https://www.anarchive-beta.com/entry/2022/07/02/210203
• ౷ܭֶʮઑʯ Kurtosis, https://www.youtube.com/watch?v=iEOE3OCuB8U • ֬ ߨٛ #003 Ϟʔϝϯτؔ, https://www.youtube.com/watch?v=tZl8M96m46Y • ΞΠίϯૉࡐμϯϩʔυαΠτʮicooon-monoʯ, https://icooon-mono.com/
Eɹnɹjɹoɹyɹ