R/checkNames.R

In miscTools: Miscellaneous Tools and Utilities

Defines functions checkNames

Documented in checkNames

checkNames <- function( testNames, allNames ) {
   inAllNames   <- testNames %in% allNames
   if( !all( inAllNames ) ) {
      stop( "object(s) '",
         paste( testNames[ !inAllNames ], collapse = "', '" ),
         "' not found." )
   }
}

Try the miscTools package in your browser