最大値を持つ不完全な行列の平均値を計算する方法は？

Question

多分私は明らかに間違っていますが、次のマトリックスの平均値はどのようにして得られますか？

matrix([  ,  ,   ], 
     [7.5133,  , 5.3  ], 
     [4.93 , 5.7667 , 2.9067 ]); 

私は平均、geometric_mean、...と記述パッケージから他のコマンドを試してみましたが、彼らは欠損値では動作しません。

に関して、 マーカス

Answer 1

私は1つは、それを実装するために持っていると思います。たとえば、

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);