R/NAfilter.R

In shineshen007/shine: Data analysis tools collection

Defines functions NAfilter

Documented in NAfilter

#' NA filter
#' @export

NAfilter <- function(){
  filter <- data[!is.na(data$compound.name),]
  write.csv(filter, "filter.NA.csv", row.names = FALSE)
}