res <- read.table("output",header=FALSE)
plot(res)