Nothing
JuliaIterate <-
function(z,C) {
#
# Return number of iterations before
# the value escapes to infinity
#
i <- 1
ins <- 1
while(i < 51) {
i <- i+1
z <- z*z + C
if(abs(z) > 2 ) { ins <- i; break; }
}
return(ins);
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.