How to make random different sizes and shapes text figurs in an image in R

Question

I want to make a picture that has texts with different sizes and colors, how to make such picture: