TSparseMtx.Mean Method

function Mean: Double;

Average of all non-zero elements.

Returns: Double

Examples

var a: Matrix;
    b: double;
begin
    a.SetIt(4,1,False,[1,2,3,4]);
    b := a.Mean; // b = 2.5
end;

var
    a: Matrix;
    result: double;
begin
    a := [[1.0, 2.0], [3.0, 4.0]];
    result := a.Mean;
    if Abs(result - 2.5) > 1e-10 then
        raise Exception.Create('Matrix.Mean: expected 2.5, got ' + result.ToString);
end;