2021年12月4日に行われたJapan.R 2021 での発表資料です。 https://japanr.connpass.com/event/230381/
資料で使っているRコードはこちらになります。 https://github.com/dropout009/japanr2021
2021/12/4Japan.R 2021@dropout009
View Slide
TVISION INSIGHTSTwitter: @dropout009Speaker Deck: dropout009Blog: https://dropout009.hatenablog.com/
CM
0 してない1 してない2 してる2 してる… …0 20%1 50%2 70%3 80%… …
TVISION INSIGHTS CMCM•• CM CM
CM0122…してないしてないしてるしてる…
CM• 𝑖 𝑖 = 1, … , 𝑁• 𝐴!𝑖 CM 1 0• 𝑎 CM𝑎 =1𝑁%!"#$𝐴!CM
CM𝔼 𝑎 = 𝔼1𝑁*!"#$𝐴!=1𝑁*!"#$𝔼 𝐴!=1𝑁*!"#$Pr(𝐴! = 1)=1𝑁*!"#$*%"&'(Pr(𝐴! = 1 ∣ 𝐹! = 𝑓) Pr(𝐹! = 𝑓)𝑖 CM 𝑓CM𝐹!𝑖 CM 𝐹!= 1, … , 2𝐹𝑖 CM 𝑓
𝔼 𝑎 = *%"&'(Pr(𝐴 = 1 ∣ 𝐹 = 𝑓) Pr(𝐹 = 𝑓)CM 𝑓 CM CM 𝑓CM••𝔼 𝑎 ∣ 𝑆 = 𝑠 = ∑%"&'( Pr(𝐴 = 1 ∣ 𝐹 = 𝑓, 𝑆 = 𝑠) Pr(𝐹 = 𝑓 ∣ 𝑆 = 𝑠)）
CM𝑎)= *%"&'(𝛽%𝑠%,)+ 𝜖)• 𝑡 𝑡 = 1, … , 𝑇• 𝑎) 𝑡 CM• 𝑠%,) 𝑡 𝑓• 𝛽%𝑓 CM• 𝜖)CM 𝑇𝔼 𝑎 = $!"#$%Pr(𝐴 = 1 ∣ 𝐹 = 𝑓) Pr(𝐹 = 𝑓)
min+!,…,+"#*)"#-𝑎) − *%"&'(𝛽%𝑠%,).s. t. 0 ≤ 𝛽&≤ 𝛽#≤ ⋯ ≤ 𝛽'(≤ 1• 𝛽%0 1• CM𝛽& ≤ 𝛽# ≤ ⋯ ≤ 𝛽'(
Pr 𝐴 = 1 ∣ 𝐹 = 𝑓 = 1 − 1 − 𝜃 1 − 𝜋 #CM• 𝜃• CM 1 CM 𝜋𝑓 1 − 𝜋 %• CM 1
𝑎)= *%"&'(1 − 1 − 𝜃 1 − 𝜋 % 𝑠%,)+ 𝜖)= 1 − 1 − 𝜃 *%"&'(1 − 𝜋 %𝑠%,) + 𝜖)• 𝑡 𝑡 = 1, … , 𝑇• 𝑎) 𝑡 CM• 𝑠%,) 𝑡 𝑓• 𝜃• 𝜋 CM 1 CM• 𝜖)𝔼 𝑎 = $!"#$%Pr(𝐴 = 1 ∣ 𝐹 = 𝑓) Pr(𝐹 = 𝑓)
# A tibble: 20 × 8t awareness_prop s_0 s_1 s_2 s_3 s_4 s_5 1 1 0.446 0.500 0.500 0 0 0 02 2 0.639 0.247 0.499 0.254 0 0 03 3 0.746 0.122 0.373 0.376 0.128 0 04 4 0.814 0.0624 0.249 0.370 0.249 0.0692 05 5 0.852 0.0353 0.156 0.303 0.308 0.163 0.0342
min&!,…,&"#$)"*+𝑎)− $!"#$%𝛽!𝑠!,),s. t. 0 ≤ 𝛽# ≤ 𝛽* ≤ ⋯ ≤ 𝛽$%≤ 1
NLSawareness_prop ~ 1 – (1 - theta) * (1 - pi)^0 * s_0- (1 - theta) * (1 - pi)^1 * s_1- (1 - theta) * (1 - pi)^2 * s_2- (1 - theta) * (1 - pi)^3 * s_3- (1 - theta) * (1 - pi)^4 * s_4- (1 - theta) * (1 - pi)^5 * s_5𝑎! = 1 − 1 − 𝜃 )"#$%&1 − 𝜋 "𝑠",! + 𝜖!
• NLS•• 5• 1 − 1 − 0.2 1 − 0.3 !
• NLS•• 20• 0.1, 0.8, 0.85, 0.9, 0.95, 1
• CM•CM••
𝑎! = 1 − 1 − 𝜃 )"#$%&1 − 𝜋 "𝑠",! + 𝜖!𝜃 ∼ Beta 𝛼(, 𝛽(𝜋 ∼ Beta 𝛼), 𝛽)𝜖! ∼ 𝒩(0, 𝜎*)Beta 1, 1
R
dropout009
koheishinden
ghtaro
chemical_tree
tatsui
hiroki13
kitachan_black
gaelvaroquaux
5g_digitalservicetmg
yumulab
shuntaros
shunk031
notwaldorf
shlominoach
jnunemaker
caitiem20
dotmariusz
maggiecrowley
jponch
maltzj
paigeccino
bkeepers
holman
mclloyd