Update plot2.R

tolto path assoluto