Nothing
# random replacement mutation
randmut = function(y, lb, ub, ...){
m = length(y)
if(missing(lb) | missing(ub))
stop("randmut requires lb and ub!")
j = sample(1:m, 1)
y[j] = runif(1, lb[j], ub[j])
return(list(mutant=y, mutgen=j))
}
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.