このディレクトリの索引

標準偏差(_標本ならび,_標準偏差) :-
        length(_標本ならび,_標本数)
        相加平均(_標本ならび,_相加平均),
        標準偏差(_標本ならび,_標本数,_相加平均,0.0,_標準偏差).

標準偏差([],N,M,S,V) :-
        V is sqrt(S / (N - 1)),!.
標準偏差([A|R],N,M,S,V) :-
        S1 is (A - M) ^ 2,
        S2 is S + S1,
        標準偏差(R,N,M,S2,V).

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

相加平均([],N,S,M) :-
        M is S / N,!.
相加平均([A|R],N,S,M) :-
        S1 is S + A,
        相加平均(R,N,S1,M).