log.na <- function (x, ...) { log(ifelse(x > 0, x, NA), ...) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.