Skip to main content
3 events
when toggle format what by license comment
May 21, 2016 at 17:24 comment added J. M.'s missing motivation Only slightly slower: DensityPlot[Log[1 + Log[Length[FixedPointList[Function[z, (2 + 7 z - (2 + 5 z) Cos[Pi z])/4], x + I y, 3*^3, SameTest -> (Abs[#2] > 200. &)]]]], {x, 1/3, 5/2}, {y, -1/2, 1/2}, AspectRatio -> Automatic, ColorFunction -> (ColorData["Rainbow", Sqrt[#]] &), PlotPoints -> 145, PlotRange -> All]
May 21, 2016 at 17:07 vote accept shai horowitz
May 21, 2016 at 17:06 history answered KennyColnago CC BY-SA 3.0