Update tshirt_code.R

I added a simple ggplot2 t-shirt image.