R/SampsPopsTax.R

In MorphoTools2: Multivariate Morphometric Analysis

Defines functions taxa populations samples

Documented in populations samples taxa

#' @rdname read.morphodata
#' @export
samples <- function(object) {
  .checkClass(object, "morphodata")

  return(levels(object$ID))
}


#' @rdname read.morphodata
#' @export
populations <- function(object) {
  .checkClass(object, "morphodata")

  return(levels(object$Population))
}


#' @rdname read.morphodata
#' @export
taxa <- function(object) {
  .checkClass(object, "morphodata")

  return(levels(object$Taxon))
}

Try the MorphoTools2 package in your browser