Hello folks,

When I use the lines function below it connects all my points but then
draws a line back to the start point.  Any suggestions on what is going on??

mydata <-read.csv("http://doylesdartden.com/R/test_data.csv", sep=",")

attach(mydata)

plot(EMD~Year,data=mydata, subset = Well.ID %in% c("MW-1", "D_EMD"),
col=ifelse(D_EMD, "black", "red"), pch=ifelse(D_EDM, 19, 17), cex = 1.5)

lines(EMD~Year)

Thank you for your time.

David

	[[alternative HTML version deleted]]


