#I need to remove NA values that are missing. My output will be a weight column without NAs
#'
#'
#'@param . is a piped surveys.csv file
#'@param weight is the weight column of surveys.csv
#'@return Returns a surveys.csv without NA values in weight column
#'@export
no_na_weight <- function(., weight){
if(any(!is.na(surveys$weight)))
scrub_weight_na <- surveys%>%
filter(!is.na(weight))
return(scrub_weight_na)
}
#'
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.