Added base function isspace()

R/isspace.R

@@ -0,0 +1,11 @@
+#' @title Determine space characters
+#' @description Determine which characters are space characters
+#' @param A a character array or a string scalar
+#' @return  a vector TF such that the elements of TF are logical 1 (true) where corresponding characters in A are space characters, and logical 0 (false) elsewhere
+#' @note Recognized whitespace characters are ` ` and `\\t`.
+#' @author Waldir Leoncio
+isspace <- function(A) {
+	A_split <- unlist(strsplit(A, ''))
+	TF <- A_split %in% c(' ', '\t')
+	return(as.numeric(TF))
+}