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$ Apr 21, 2021 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, 2021 at 12:03
  • $\begingroup$ Is there anyway to specify a higher timeout for the kernel so it doesn't abort? $\endgroup$ Apr 21, 2021 at 14:14

1 Answer 1

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 and acknowledge that you have read and understand our privacy policy and code of conduct.

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