Nothing
#' No NAs
#'
#' Converts NAs to 0s
#' @param vec Required. Character or Numeric vector.
#' @return Character vector.
#' @export
#' @examples
#' x <- c(NA, 1, 0); nona(x)
#' x <- c(NA, "dk", 0); nona(x)
nona <- function(vec = NULL)
{
vec[is.na(vec)] <- 0
vec
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.