Services & ResourcesWolfram ForumsMathGroup Archive

[Date Index] [Thread Index] [Author Index]

Flashing Graphs With Manipulate

• To: mathgroup at smc.vnet.net
• Subject: [mg88672] Flashing Graphs With Manipulate
• From: bobbaillie at frii.com
• Date: Mon, 12 May 2008 04:46:25 -0400 (EDT)

If the coefficient of x is < 0 and the constant term is > 0,
this graph flashes as you drag the sliders.

Why?  NSolve can't be taking that much longer in this case.

What can be done to prevent the flashing?

Manipulate[
 With[ { func = b x + c },
  Module[ { rts },
   rts = NSolve[func == 0, x];
   ListPlot[
   {Re[x], Im[x]} /. rts,
   PlotStyle -> PointSize[0.03],
   PlotRange -> {{-10, 10}, {-10, 10}}, ImageSize -> {300, 300},
   AspectRatio -> 1, PlotLabel -> func]
  ]
 ],
  { {b, -1, "coefficient of x"}, -9, 9, .1, Appearance -> "Labeled"},
  { {c, 3, "constant term"}, -10, 10, .1, Appearance -> "Labeled"}
]

• Follow-Ups:
  • Re: Flashing Graphs With Manipulate
    • From: "W_Craig Carter" <ccarter@mit.edu>
  • Re: Flashing Graphs With Manipulate
    • From: Christopher Carlson <carlson@wolfram.com>