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
データ不足に数理モデルで立ち向かう / Japan.R 2023
Search
森下光之助
December 02, 2023
Marketing & SEO
10
5.4k
データ不足に数理モデルで立ち向かう / Japan.R 2023
2023年12月2日に行われたJapan.R 2023での発表資料です
https://japanr.connpass.com/event/302622/
森下光之助
December 02, 2023
Tweet
Share
More Decks by 森下光之助
See All by 森下光之助
baseballrによるMLBデータの抽出と階層ベイズモデルによる打率の推定 / TokyoR118
dropout009
1
560
tidymodelsによるtidyな生存時間解析 / Japan.R2024
dropout009
2
1k
回帰分析ではlm()ではなくestimatr::lm_robust()を使おう / TokyoR100
dropout009
57
10k
Counterfactual Explanationsで機械学習モデルを解釈する / TokyoR99
dropout009
3
3k
『機械学習を解釈する技術』の紹介 / Devsumi2022
dropout009
4
3.7k
シンプルな数理モデルでビジネス課題を解決する / Japan.R 2021
dropout009
2
6.4k
テレビCMのユニークリーチを最適化する / PyData.Tokyo24
dropout009
0
1.8k
Accumulated Local Effects(ALE)で機械学習モデルを解釈する / TokyoR95
dropout009
3
9.2k
データ分析手法をシミュレーションを通して理解する / stapy74
dropout009
3
1.8k
Other Decks in Marketing & SEO
See All in Marketing & SEO
Heros Not Villains - Modern SEO in the Generative IR Era
dawnieando
4
1.2k
Crafting winning internal linking strategies
smp_seo
1
490
Tactics vs strategy: why SEO’s shouldn’t focus on industries
petervz
0
270
Topical Authority in the Age of Entity SEO - BrightonSEO San Diego
felipebazon
0
250
SEO Para Visibilidad & Reconocimiento de Marca
aleyda
1
170
(再)ひとり技術広報からの脱却 / Re:Breaking away from one-man technical public relations
seike460
PRO
1
250
Cómo alcanzar el éxito en Ecommerce SEO - #MarketingxValencia
aleyda
0
160
Humanistic SEO | brightonSEO | Megan Roberts
meganjane
0
300
会社説明資料|株式会社トライバルメディアハウス
tribal
0
2.4k
WaytoAGI Tokyo 2025 - MarketDev of Creative AI from Local to Global – The Challenge of AICU: AI Creators Union
o_ob
0
210
The End of SEO As We Know It
ipullrank
3
1.9k
250404 CultureDeck_Bizibl Technologies_v1.0
yoheihanatani
0
370
Featured
See All Featured
GraphQLとの向き合い方2022年版
quramy
49
14k
Mobile First: as difficult as doing things right
swwweet
224
9.9k
Building an army of robots
kneath
306
46k
GitHub's CSS Performance
jonrohan
1032
460k
XXLCSS - How to scale CSS and keep your sanity
sugarenia
248
1.3M
Chrome DevTools: State of the Union 2024 - Debugging React & Beyond
addyosmani
7
840
個人開発の失敗を避けるイケてる考え方 / tips for indie hackers
panda_program
112
20k
Creating an realtime collaboration tool: Agile Flush - .NET Oxford
marcduiker
31
2.2k
Balancing Empowerment & Direction
lara
3
620
RailsConf & Balkan Ruby 2019: The Past, Present, and Future of Rails at GitHub
eileencodes
139
34k
JavaScript: Past, Present, and Future - NDC Porto 2020
reverentgeek
51
5.6k
The Invisible Side of Design
smashingmag
301
51k
Transcript
2023/12/02 Japan.R 2023 #JapanR @dropout009
REVISIO CDO X: @dropout009 Speaker Deck: dropout009 Blog: https://dropout009.hatenablog.com/
None
None
CM • • CM ⾒ • CM
• GRP TRP • CM ⾒ • CM ⾒ •
• CM 1 ⾒ • CM 2 1 2 3 4 5 A 1 0 1 0 1 B 0 1 0 1 0 C 1 1 1 0 1 D 0 0 1 0 0 E 0 0 0 0 0 2 (40%) 4 (80%) 7 (140%) 8 (160%) 10 (200%) 2 (40%) 3 (60%) 4 (80%) 4 (80%) 4 (80%)
• • CM × 1% 1 1
• 206% 10 2,060 69.7%
• • 0 0 頻 ⾒ 100% lm(y ~ 0
+ x) lm(y ~ 0 + log1p(x))
• •
None
l 𝑔 l CM 𝐹 Pr 𝐹 = 𝑓 ∣
𝑔 l CM 1 ⾒ 𝑟 𝑔 = Pr 𝐹 ≥ 1 ∣ 𝑔 = 1 − Pr 𝐹 = 0 ∣ 𝑔 Pr 𝐹 = 𝑓 ∣ 𝑔 𝑟 𝑔 CM
l Poisson 𝑓 𝜆 = 1 Γ 𝑓 + 1
𝜆!𝑒"# l 𝜆 𝑔 𝜆 = 𝑔 𝑟 𝑔 = 1 − Pr 𝐹 = 0 ∣ 𝑔 = 1 − 1 Γ 0 + 1 𝑔$𝑒"% = 1 − 𝑒"% dpois(f, lambda) Poisson(𝑓 ∣ 𝜆 = 5) Poisson(𝑓 ∣ 𝜆 = 3) 1 - dpois(0, g) Poisson(𝑓 ∣ 𝜆 = 2)
l 𝑟 𝑔 = 1 − 𝑒"%
l CM ⾒ CM CM CM CM Poisson(𝑓 ∣ 𝜆
= 2.06) CM
None
l CM CM CM l CM 𝜆 CM 𝜆 CM
⾒ 𝜆 Poisson(𝑓 ∣ 𝜆 = 2) Poisson(𝑓 ∣ 𝜆 = 3) Poisson(𝑓 ∣ 𝜆 = 5)
l ⾒ ⾒ 𝜆 l 𝜆 頻 𝜆 l 𝜆
Gamma 𝜆 ∣ 𝜈, 𝜈 𝜇 = 𝜈 𝜇 & Γ 𝜈 𝜆&"'𝑒" & (# E 𝜆 = 𝜇 𝜆 dgamma(nu, nu / mu) Gamma 𝜆 ∣ 1, 1 2 Gamma 𝜆 ∣ 4, 4 2 Gamma 𝜆 ∣ 16, 16 2 𝜆 𝜆
l 𝜆 ⾒ 𝜆 Pr 𝐹 = 𝑓 ∣ 𝜇,
𝜈 = ; $ ) Pr 𝐹 = 𝑓 ∣ 𝜆 𝑝 𝜆 𝜇, 𝜈 𝑑𝜆 = ; $ ) Poisson 𝑓 ∣ 𝜆 Gamma 𝜆 𝜈, 𝜈 𝜇 𝑑𝜆 = ; $ ) 1 Γ 𝑓 + 1 𝜆!𝑒"# 𝜈 𝜇 & Γ 𝜈 𝜆&"'𝑒" & (# 𝑑𝜆 = 𝜈 𝜇 & Γ 𝑓 + 1 Γ 𝜈 ; $ ) 𝜆&*!"'𝑒" &"( ( # 𝑑𝜆 = 𝜈 𝜇 & Γ 𝑓 + 1 Γ 𝜈 Γ 𝜈 + 𝑓 𝜈 + 𝜇 𝜇 &*! ; $ ) 𝜈 + 𝜇 𝜇 &*! Γ 𝜈 + 𝑓 𝜆&*!"'𝑒" &*( ( # 𝑑𝜆 = Γ 𝜈 + 𝑓 Γ 𝑓 + 1 Γ 𝜈 𝜈 𝜈 + 𝜇 & 𝜇 𝜈 + 𝜇 ! = , ! " Gamma 𝜆 𝜈 + 𝑓, 𝜈 + 𝜇 𝜇 𝑑𝜆 = 1
l ⾒ Negative Binomial Distribution; NBD NB 𝑓 𝜇, 𝜈
= Γ 𝜈 + 𝑓 Γ 𝑓 + 1 Γ 𝜈 𝜈 𝜈 + 𝜇 & 𝜇 𝜈 + 𝜇 ! NB 𝑓 2.06,1 NB 𝑓 2.06,3 NB 𝑓 2.06,10 dnbinom(f, mu = mu, size = nu)
l ⾒ 𝑟 𝑔, 𝜈 = 1 − Pr 𝐹
= 0 ∣ 𝑔, 𝜈 = 1 − Γ 𝜈 + 0 Γ 0 + 1 Γ 𝜈 𝜈 𝜈 + 𝑔 & 𝑔 𝜈 + 𝑔 $ = 1 − 𝜈 𝜈 + 𝑔 & l 𝜈 1 - dnbinom(0, mu = g, size = nu) 𝑟 𝑔, 1 𝑟 𝑔, 3 𝑟 𝑔, 10
l 𝑟 𝑔, 𝜈 𝜈 𝜈 l 𝑟+ 𝑔+ ̂
𝜈 ̂ 𝜈 = argmin & 1 − 𝜈 𝜈 + 𝑔+ & − 𝑟′ l ̂ 𝜈 𝑟 𝑔, ̂ 𝜈 = 1 − ̂ 𝜈 ̂ 𝜈 + 𝑔 , & CM CM
l 1 ⾒ CM 3 CM ⾒ l CM 𝑓
⾒ 𝑓 + l 𝑓 + 𝑟!* 𝑔, 𝜈 = Pr 𝐹 ≥ 𝑓 ∣ 𝑔, 𝑣 = 1 − Pr 𝐹 ≤ 𝑓 − 1 ∣ 𝑔, 𝜈 = 1 − E !!-$ !"' Γ 𝜈 + 𝑓+ Γ 𝑓+ + 1 Γ 𝜈 𝜈 𝜈 + 𝑔 & 𝑔 𝜈 + 𝑔 !! 𝑓 𝑓 + 𝑟!" 𝑟#" 𝑟$" 1 - pnbinom(f - 1, mu = g, size = nu)
None
l l l l ⾒
• Goerg, Georg M. "Estimating reach curves from one data
point." (2014).