R/check_names.R

In pfrater/LogbooksTranslate: Translator for Logbooks package

#' Check Icelandic or English names in Logbooks
#' 
#' \code{logbook_names} returns both the English and Icelandic words for a name found in 
#' package Logbooks
#'
#' @param ... One or more quoted or unquoted expression separated by commas. These should be
#' column names in any one of the data.frames found in package Logbooks and may be a mixture of 
#' English and Icelandic names.
#'
#' @return
#' Returns a data.frame of the names listed in \code{...} for both English and Icelandic.
#' @export
#'
#' @examples
#' logbooks_names("faeri")
#' logbooks_names(leggpokki, deep.redfish)
#' logbooks_names("veman", legggluggi, blalanga)
logbooks_names <- function(...) {
    nameList <- as.list(sys.call())
    name <- unlist(as.character(nameList[2:length(nameList)]))
    return(subset(checkNames, icelandic %in% name | english %in% name))
}