#' Read CSV
#'
#' Import CSV File and convert missing values in form of spaces, empty value, character NA and na into logical NAs
#'
#' @param path "path/filename.csv"
#'
#' @return Second sample data
#' @export
#' @importFrom utils read.csv
#'
#' @examples
#' csv = system.file("extdata", 'nadata.csv', package = "nacleanR")
#' read_data(csv)
read_data <- function(path){
read.csv(path, header=T, sep=",", na.strings = c(" ","","NA","na"))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.