Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Mandelbrot 2
n<-175 x<-9*ppoints(n)/4-1.75 y<-2*ppoints(n)-1 comb<-function(x,y) complex(real=x,imaginary=y) i<-comb(0,1) z<-outer(x,y,comb) c<-z h<-matrix(rep(2,n^2),n,n) count<-h for (k in 1:30) { z[Mod(z)<=2]<-z[Mod(z)<=2]^2+c[Mod(z)<=2]; count[Mod(z)<=2]<-count[Mod(z)<=2]+1 } z[Mod(z)<=2]<-h[Mod(z)<=2] image(x,y,count-log(log(Mod(z))/log(2)),col=c(rainbow(10),'black'))
run
|
edit
|
history
|
help
0
Abhishek
PROJECT 1:- R AS A CALCULATOR
Análise de Variâncias DIC e teste de Tukey 1
Sensitivity to Escitalopram MACE count
14-09-2020GRam
AjusteNaoLinear
Testing a faked dice
Chapter 1:Hiring Discrimination
practica 2
For loops Example