Nothing
take1 = function(len) {
out = c()
i = 0
while (i < len){
out = c(out, i+sample(1:2))
i = i+2
}
out = out[1:len]
out[seq(1, len, 2)]
}
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.