ఉదాహరణ 4 దశలు, ఒకే సెషన్లో క్రమంగా నడుస్తాయి. ప్రతి దశా ఇంజిన్పై అమలు చేయబడింది, కింది అవుట్పుట్ అది ఇచ్చినదే.
Plot[x Cos[x], {x, 0, 20}]-Graphics-min = FindMinimum[x Cos[x], {x, 2}]{-3.2883713955908966, {x -> 3.4256184594817283}}pt = Reverse[Cases[min, _ ? NumberQ, Infinity]]{3.4256184594817283, -3.2883713955908966}Plot[x Cos[x], {x, 0, 20}, Epilog -> {PointSize[Medium], Point[pt]}]-Graphics-అన్ని రెసిపీలు · ఫంక్షన్ రిఫరెన్స్ · దీన్ని MCP క్లయింట్ నుండి వాడండి