返回信息流help!!!
用一下程序得到了三维图像：
num = 500;
ndist = NormalDistribution[1000, 200];
cost = {10, 0.1, 1};
TT = Table[Random[ndist], {i, 1, num}];
pp[s_, S_] := Module[{ppp, qq, ii}, ppp = qq = 0;
For[ii = 1, ii < num, ii = ii + 1,
If[qq < s, ppp = ppp - cost[[1]]; qq = S];
If[qq < TT[[ii]], ppp = ppp + cost[[3]]*qq; qq = 0,
ppp = ppp + cost[[3]]*TT[[ii]] - cost[[2]]*(qq - TT[[ii]]);
qq = qq - TT[[ii]]]
];
ppp
];
Plot[pp[x, y], {x, 300, 800}, {y, 0, 1000}]
怎么找出图像中的极大值啊？以及极大值点{x,y}?
这是一条镜像帖。来源：北邮人论坛 / math-model / #8644同步于 2011/12/27
该镜像源已超过 30 天没有更新，可能在源站已被删除。
MathModel机器人发帖
mathamatic 有图像找极值？
yian
2011/12/27镜像同步2 回复
订阅后，新回复会通过你的通知中心匿名送达。