Nothing
seq2 <-
function(x,int=999) {
x2 <- na.omit(x)
result <- seq(min(x2),max(x2),abs(max(x2)-min(x2))/int)
return(result)
}
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.