ピックアップ ベス

『パティスリープランタン ピックアップ召喚』のベスの期待値

『パティスリープランタン ピックアップ召喚』のベスの期待値

1 ベスの期待値

101*0.0152 = 0.15

0.15 / 0.1900 myc3 = 0.789 / myc

2 十連ガチャN回目でベスが一体も出ない確率

2.1 コード4, 5

import Graphics.Rendering.Chart.Easy
import Graphics.Rendering.Chart.Backend.Diagrams(toFile)

p = 0.015

zyuuren n = ((1 - p)^10)^n

ps i = 100 * zyuuren i : ps (i + 1)

lessThanFivePercent = ceiling $ log(0.05) / (10 * log(1-p)) -- <= (1-p)^10*n ≦ 0.05

qs :: [(Double,Double)]
qs = take (lessThanFivePercent + 10 + 1) $ zip [0..] (ps 0)

rs :: [(Double,Double)]
rs = take (lessThanFivePercent + 10 + 1) $ zip [0..] (repeat 5)

main = toFile def "destiny-pickup-bess.svg" $ do
    layout_title .= "Probability of Not Getting a Bess"
    setColors [opaque blue, opaque red]
    plot (line "probability" [qs])
    plot (line "5%" [rs])

Footnotes:

1

10体

2

ベスの出現率

3

myc = 万クリスタル

4

Haskellで書かれてます

5

Bessというつづりは自信がない

Created: 2019-02-07 木 19:13

Emacs 25.2.1 (Org mode 8.2.10)

Validate

Comments