ifelsem <- function(test, yes, no) { out <- no out[test, ] <- yes[test, ] out }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.