2020-01-06 用R画等高线图（有趣而无用😝）
2020-01-06 本文已影响0人
iColors
来自http://a-blog-from-sydney.blogspot.com/2020/01/complex-coloring-and-contour-levels.html
fz <- function(z) z^3+(-0.2+0.11*1i)/z^3
fz3 <-function(z) fz(fz(fz(z)))
f3 <- function(x,y) fz3(x+1i*y)
x <- seq(-1.08,1.08,len=1001)
y <- seq(-1.3,1.3,len=1001)
m <- outer(x,y,f3)
contour(x,y,Re(m),levels=c(-2,0,2),drawlabels=F,axes=F)
image.png
