plots + read.R