R file which produces the png image MPattersonShirtImage

Added two files -- an R file with code, and an accompanying png image