aa <- c("one,I,i", "two,II", "three", NA, "", Inf, "2 ,3, 4,_5", 15, ",a,,b")
Ttcols(aa, split=" *, *")
bb <- c("one,I,i", "two,II", "three")
Ttcols(bb, split=",")
Ttcols(row.names(mtcars), split=" ", missed="")
Run the code above in your browser using DataLab