Changing rmultinom from .External to .Call (distn.R).