Update plot2.R

add comment