R/checkdatastr.R

Defines functions checkdatastr

Documented in checkdatastr

checkdatastr <-
function (dat) 
  {
    cn <- names(dat)
    fn <- c("ID", "x", "y", "Species", "x_original", "y_original", 
            "Correction", "Modified", "Exclude","Reason")
    m <- rep(0, length(fn))
    for (i in 1:length(fn)) {
      m[i] <- match(fn[i], cn, nomatch = 0)
    }
    present <- m > 0
    n <- data.frame(Field = fn, Present = present)
    return(n)
  }

Try the biogeo package in your browser

Any scripts or data that you put into this service are public.

biogeo documentation built on May 29, 2017, 10:55 a.m.