1
$\begingroup$

I am trying to run the following line:

Animate[ComplexPlot[Zeta[z + t], {z, -3 (1 + I), 3 (1 + I)}, 
  ColorFunction -> "CyclicReImLogAbs"], {t, 0, 1}, 
 AnimationRunning -> False]

In Mathematica 12.2, but it unfortunately I just get $Aborted:

enter image description here

Is there some way to prevent this?

$\endgroup$
3
  • $\begingroup$ Runs in MMA version 12.1 $\endgroup$ – Daniel Huber Apr 21 at 10:56
  • $\begingroup$ It aborted on my machine with 12.1. However, how about setting the decrement dt such as {t,0,1,1/10}. This way it does not abort. Or you could generate 100 plots in a table with dt=1/100 separately then Animate or Manipulate the table of plots. $\endgroup$ – Dominic Apr 21 at 12:03
  • $\begingroup$ Is there anyway to specify a higher timeout for the kernel so it doesn't abort? $\endgroup$ – jippyjoe4 Apr 21 at 14:14
5
$\begingroup$
Clear["Global`*"]

Do not do computations inside the Animate unless absolutely necessary.

plts = Table[ComplexPlot[Zeta[z + t],
    {z, -3 (1 + I), 3 (1 + I)},
    ColorFunction -> "CyclicReImLogAbs",
    MaxRecursion -> 5],
   {t, 0, 1, 0.025}];

With pre-computed images the animation runs smoothly.

Animate[plts[[n]], {n, 1, Length[plts], 1}, AnimationRunning -> False]

enter image description here

$\endgroup$

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Not the answer you're looking for? Browse other questions tagged or ask your own question.