motifs.seqs: a function to get all unique k mers in a list of seqs.
In muhligs/Regmex: Motif discovery in ranked lists of sequences

1	motifs.seqs(seqs, k)

`seqs`
`k`

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (seqs, k) 
{
    vec <- c()
    for (i in seqs) vec <- c(vec, mot.chop(i, k, unique = TRUE))
    return(unique(vec))
  }