R/notex.R

In mikew93/cooltools: Bioinformatics Helper Functions

#' Tells If Not Extant
#' @param first An object
#' @param second An object
#' @return A boolean
#' @export

notex <- function(object)
{
  if(class(object) != "character")
  {
    stop('~~~object must be a string "like this"~~~')
  }else{
    judgement <- exists(object) == F
  }
  return(judgement)
}

# (GNU3 c) 2019 John Michael Adrian Wojahn