only <- function(x, target, compare){ x <- x[x != target] !any(x %in% compare) & (target %in% compare) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.