R/is-vector.R

In twolodzko/twextras: twextras

#' Check for being THE vector
#' 
#' Check if object is what ordinary R user considers as a vector,
#' i.e. unidimensional non-list collection of elements of the same kind.  
#' 
#' @param x object to be tested.
#' 
#' @export

is.simple.vector <- function(x) {
  is.atomic(x) && !is.recursive(x) && !is.array(x)
}