\int_1^2=\sum_1^\infty
c = 0.7411 + 0.52147 I;
p1 = Solve[(x^7 + c)^7 + c == x, x];
t = x /. p1;
R = ListPlot[(Tooltip[{Re[#1], Im[#1]}] &) /@ t, AspectRatio -> 1,
PlotStyle -> {Red}];
Show[JuliaSetPlot[z^7 + c, z, ColorFunction -> None,
PlotStyle -> Opacity[0.05, Black],
Epilog -> {Blue, PointSize[Medium], Point[{Re[c], Im[c]}]}] , R,
PlotRange -> All
hernan pino galvao
\[\int_1^2\]
CTA BN: 04401141273
CTA INTERBANK: *********2508