Update plot4.R

Modify date.