このディレクトリの索引

分散(L,V) :-
        length(L,N),
        相加平均(L,M),
        分散(L,N,M,0.0e+00,V).

分散([],N,M,S,V) :-
        V is S / N,!.
分散([A|R],N,M,S,V) :-
        S1 is (A - M) ^ 2,
        S2 is S + S1,
        分散(R,N,M,S2,V).

標本分散(_標本ならび,_標本分散) :-
        標本平均(_標本ならび,_標本平均),
        length(_標本ならび,_標本数),
        findsum(U,(
                    member(_標本,_標本ならび),
                    U is (_標本 - _標本平均) ^ 2),
                S),
        _標本分散 is S / (_標本数 - 1).

標本平均(_標本ならび,_標本平均) :-
        相加平均(_標本ならび,_標本平均).

不偏分散(_標本ならび,_分散) :-
        不偏分散とは標本の二乗の相加平均から相加平均の二乗を引いた数(_標本ならび,_分散).

不偏分散とは標本の二乗の相加平均から相加平均の二乗を引いた数(_標本ならび,_分散) :-
        標本の二乗の相加平均(_標本ならび,_標本の二乗の相加平均),
        相加平均の二乗(_標本ならび,_相加平均の二乗),
        _分散 is _標本の二乗の相加平均 - _相加平均の二乗.

標本の二乗の相加平均(_標本ならび,_標本の二乗の相加平均) :-
        findavg(V,(
                    標本の二乗(_標本ならび,_標本の二乗)),
                _標本の二乗の相加平均).

標本の二乗(_標本ならび,_標本の二乗) :-
        member(_標本,_標本ならび),
        _標本の二乗 is _標本 * _標本.

相加平均の二乗(_標本ならび,_相加平均の二乗) :-
        相加平均(_標本ならび,_相加平均),
        _相加平均の二乗 is _相加平均 * _相加平均.