robert function

FUNCTION to produce a Robertsonian translocation