R/qw.R

qw <- function (s, sep="\\s+", names=FALSE) {
  y <- unlist(strsplit(s, split=sep, perl=TRUE))
  if (names) names(y) <- y
  y
}

Try the corpora package in your browser

Any scripts or data that you put into this service are public.

corpora documentation built on Aug. 21, 2023, 1:07 a.m.