掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
相乗平均、調和平均を求めたいのですが・・・ (ID：10232)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
//相乗平均 対数で和をとり、最後に逆対数変換すればN乗根が不要になります。 function GeometricalMean(Value: array of Extended): Extended; var Ans: Extended; i: integer; begin Ans := 0; for i := 0 to High(Value) do Ans := Ans +Ln(Value[i]); Ans:=Ans/((High(Value)+1); Result := Exp(Ans); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.