R/GrammarIsTerminal.R

Defines functions GrammarIsTerminal

Documented in GrammarIsTerminal

GrammarIsTerminal <- function(x) {
  
  if (class(x) != "GEPhenotype") {
    stop("Invalid Phenotype Class")
  }

  return (x$type == "T")
}

Try the gramEvol package in your browser

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

gramEvol documentation built on July 18, 2020, 5:07 p.m.