ruidvec(x, start = 0L)
"character"
"numeric"
For a vector strings, assigns each continuous run of particular string a unique ID.
ruidvec(c("One","One","Two","Three","Three","Two","Three","Three","One")) [1] 1 1 2 3 3 4 5 5 6