Provide the 4 R code and their associated png