#' Computes mean excluding NA values
#'
#' Version of mean() where default na.rm=TRUE
#' @param x numeric vector
#' @keywords bam stock assessment fisheries
#' @author Nikolai Klibansky
#' @export
#' @examples
#' x <- c(1,2,10,NA)
#' mean(x)
#' mean(x,na.rm=TRUE)
#' mean_noNA(x)
mean_noNA <- function(x){mean(x,na.rm=TRUE)}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.