R/is.string.R

In decisionpatterns/nameit: Functions for Working with Names

#' Test if an object is a string
#' 
#' A string is a one element character vector
#' 
#' @param x
#' 
#' Equivalent to: \cr
#'   \code{ is.character(x) && length(x) == 1 }
#' 
# @export
   
is.string <- function(x) is.character(x) && length(x) == 1