如何计算具有最大值的不完全矩阵的平均值?
how to calculate the mean value of an incomplete matrix with maxima?
也许我错过了显而易见的,但我如何获得以下矩阵的平均值?
matrix( [ , , ],
[7.5133, , 5.3 ],
[4.93 , 5.7667 , 2.9067 ] );
我试过 mean、geometric_mean、...和描述包中的其他命令,但它们不适用于缺失值。
此致,
马库斯
我认为必须实施它。例如
M: matrix(
[ und , und, und],
[7.5133, und, 5.3],
[4.93 , 5.7667 , 2.9067] ) $
ulength(x):=block([n: 0], matrixmap(lambda([e], if e#'und then n: n + 1), x), n) $
usum(x):=block([s: 0], matrixmap(lambda([e], if e#'und then s: s + e), x), s) $
umean(x):=usum(x)/ulength(x) $
umean(M);
也许我错过了显而易见的,但我如何获得以下矩阵的平均值?
matrix( [ , , ],
[7.5133, , 5.3 ],
[4.93 , 5.7667 , 2.9067 ] );
我试过 mean、geometric_mean、...和描述包中的其他命令,但它们不适用于缺失值。
此致, 马库斯
我认为必须实施它。例如
M: matrix(
[ und , und, und],
[7.5133, und, 5.3],
[4.93 , 5.7667 , 2.9067] ) $
ulength(x):=block([n: 0], matrixmap(lambda([e], if e#'und then n: n + 1), x), n) $
usum(x):=block([s: 0], matrixmap(lambda([e], if e#'und then s: s + e), x), s) $
umean(x):=usum(x)/ulength(x) $
umean(M);