R: how to plot random distributed character