msir.slices function

Slice a vector into slices of approximately equal size