R/printme.R

Defines functions printme

printme <- function(x, SEP=" "){
    if(length(x)==1)return(maybeQuote(x))
    if(length(x) > 1){
		X <- maybeQuote(x)
		res <- paste(paste(X, SEP, sep=""), collapse="")
		return(res)
		}
}
RemkoDuursma/Maeswrap documentation built on Nov. 5, 2019, 1:30 p.m.