〓Mathematica〓 - 暇つぶし2ch

〓Mathematica〓 at MATH

537:１３２人目の素数さん
03/07/23 01:12
>>546
漠然としすぎ。

こういうことか？

<< Statistics`DescriptiveStatistics`

data = {x, y} /. (#[[2]] &) /@
　　　　 Flatten[Table[
　　　　　　 FindMinimum[Sin[x + y], {x, i}, {y, j}], {i, 0, 3}, {j, 0, 3}],
　　　　　 1];

Mean /@ Transpose @ data

次ページ

続きを表示

1を表示