Update plot1.R

try read.table