Update sequence.R

changed distance model to number of different bases