Search All of the Math Forum:
Views expressed in these public forums are not endorsed by
Drexel University or The Math Forum.



Re: Plot3D progress
Posted:
Jun 17, 2012 3:59 AM


Hi dude,
This example seems to work (I changed Integrate to NIntegrate for efficiency reasons and used Sin[x] Sin[y] instead of your unknown (to me) function):
data = {}; Plot3D[NIntegrate[Sin[x] Sin[y], {x, 0, xMax}, {y, 0, yMax}], {xMax, 0, 1}, {yMax, 0, 1}, EvaluationMonitor :> AppendTo[data, {xMax, yMax}]]
In the end the values of {xMax, yMax} are included in list called data.
I hope this helps. If you are interested have a look at this cool example of using EvaluationMonitor+Contourplot: https://groups.google.com/d/msg/comp.softsys.math.mathematica/xUKwUoXsgt4/EgQBdUBM5nYJ
Cheers



