数学 - JavaScript - 確からしさをみる - 確率 – 条件つき確率と確率の乗法定理 - いくつかの例(余事象)

数学読本〈4〉

学習環境

• Surface 3 (4G LTE)、Surface 3 タイプ カバー、Surface ペン(端末)
• Windows 10 Pro (OS)
• 数式入力ソフト(TeX, MathML): MathType
• MathML対応ブラウザ: Firefox、Safari
• MathML非対応ブラウザ(Internet Explorer, Google Chrome...)用JavaScript Library: MathJax

数学読本〈4〉数列の極限，順列/順列・組合せ/確率/関数の極限と微分法(松坂 和夫(著)、岩波書店)の第16章(確からしさをみる - 確率)、16.2(条件つき確率と確率の乗法定理)、いくつかの例、問27、28.を取り組んでみる。

27. 1. 
       $\begin{array}{l}P\left(A\cap B\right)\\ =P_A\left(B\right)·P\left(A\right)\\ =\frac{3}{10}·\frac{1}{2}=\frac{3}{20}\end{array}$
    2. 
       $\begin{array}{l}P\left(A\cup B\right)\\ =P\left(A\right)+P\left(B\right)-P\left(A\cap B\right)\\ =\frac{1}{2}+\frac{2}{5}-\frac{3}{20}\\ =\frac{15}{20}\\ =\frac{3}{4}\end{array}$
    3. 
       $\begin{array}{l}P\left(A^{\prime }\cap B\right)\\ =P\left(A\cup B\right)-P\left(A\right)\\ =\frac{3}{4}-\frac{1}{2}\\ =\frac{1}{4}\end{array}$
    4. 
       $\begin{array}{l}{P}_B\left(A\right)\\ =\frac{P\left(A\cap B\right)}{P\left(B\right)}\\ =\frac{\frac{3}{20}}{\frac{2}{5}}\\ =\frac{3}{8}\end{array}$
28. 
    $\frac{39·13+13·12}{52·51}=\frac{1}{4}$

コード(Emacs)

HTML5

<div id="graph0"></div>
<pre id="output0"></pre>
ÂõûÊï∞: <input id="n0" type="number" min="1" step="1" value="1000">
<br>
<button id="run0">run</button>
<button id="clear0">clear</button>

<script type="text/javascript" src="https://cdnjs.cloudflare.com/ajax/libs/d3/4.2.6/d3.min.js" integrity="sha256-5idA201uSwHAROtCops7codXJ0vja+6wbBrZdQ6ETQc=" crossorigin="anonymous"></script>
<script src="sample27.js"></script>    

JavaScript

let pre0 = document.querySelector('#output0'),
    input_n = document.querySelector('#n0'),
    btn0 = document.querySelector('#run0'),
    btn1 = document.querySelector('#clear0'),
    div0 = document.querySelector('#graph0'),
    width = 600,
    height = 600,
    padding = 50,
    p = (x) => pre0.textContent += x + '\n';

let range = (n) => {
    let result = [];
    for (let i = 0; i < n; i += 1) {
        result.push(i);
    }
    return result;
};

let suit = range(13).map(() => 0)
    .concat(range(13).map(() => 1))
    .concat(range(13).map(() => 2))
    .concat(range(13).map(() => 3)),
    spade = 0,
    club = 1,
    dia = 2,
    heart = 3;

let f = () => {
    let suit0 = suit.slice(),
        i = Math.floor(Math.random() * suit0.length);

    suit0.splice(i, 1);

    return suit0[Math.floor(Math.random() * suit0.length)] === heart;
};
let output = () => {
    p('28.');
    let n = parseInt(input_n.value, 10),
        results = range(n).map(() => f()),
        points = [];

    points = range(n).map((i) => {
        return [i + 1,
                range(i + 1)
                .map(() => f())
                .filter((b) => b)
                .length / (i + 1)]
    });
    
    let t = points[points.length - 1][1],
        result = 1 / 4;
    p(t ===  result);
    p(t);
    p(result);
    p(Math.abs(t - result));

    let xscale = d3.scaleLinear()
        .domain([1, n])
        .range([padding, width - padding]);
    let yscale = d3.scaleLinear()
        .domain([0, 1])
        .range([height - padding, padding]);

    let xaxis = d3.axisBottom().scale(xscale);
    let yaxis = d3.axisLeft().scale(yscale);
    div0.innerHTML = '';
    let svg = d3.select('#graph0')
        .append('svg')
        .attr('width', width)
        .attr('height', height);

    svg.selectAll('circle')
        .data(points)
        .enter()
        .append('circle')
        .attr('cx', (d) => xscale(d[0]))
        .attr('cy', (d) => yscale(d[1]))
        .attr('r', 1)
        .attr('fill', 'red');

    svg.append('g')
        .attr('transform', `translate(0, ${height - padding})`)
        .call(xaxis);

    svg.append('g')
        .attr('transform', `translate(${padding}, 0)`)
        .call(yaxis);
};

input_n.onchange = output;
btn0.onclick = output;
btn1.onclick = () => pre0.textContent = '';

output();

回数: