R/comparenames.R

In soilcarbon: Tools to Analyze Soil Carbon Database Created by Powell Center Working Group

#' comparenames
#'
#' Compares the names at names between hierarchical levels, used in dataQC
#'
#' @param names names oject, outout from getnames()
#' @import utils
#' @export
#'
#'

comparenames<-function(names){
  if(length(names)>1){
 return(apply(combn(seq_along(names), 2), 2, function(n) names[[n[1]]] %in% names[[n[2]]]))
  } else return(c(T))

}