inst/extdata/1_code/strSort.R

strSort <- function(x) {sapply(lapply(strsplit(x, NULL), sort), paste, collapse="")%>% gsub(pattern = " ", replacement = "")}
ShenJianWHy/Exploratory-Data-Analysis documentation built on Dec. 31, 2020, 4:31 p.m.