Nothing
"%!=%"<- function(a,b){
if (length(a)==1){
(1:length(b))[a != b]
}else if(length(a) > 1){
for (i in 1:length(a)) {
if (i==1){location=c()}
location.i=(1:length(b))[a[i] != b]
location=c(location,location.i)
}
location[duplicated(location)]
}
}
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.