4 png and R codes