"clean.dataset" <- function(x) { x[abs(x) < .Machine$double.eps] <- 0 x[is.na(x)] <- 0 x }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.