fill_strange <- function(x,fill=0){ x[is.na(x)] = fill x[is.nan(x)] = fill x[is.infinite(x)] = fill x }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.