mydataln1<-data.frame(mydata$x,mydata$lnmodel1)
mydataln1$class<-"lnmodel1"
names(mydataln1)<-c("x","y","class")
mydataln2<-data.frame(mydata$x,mydata$lnmodel2)
mydataln2$class<-"lnmodel2"
names(mydataln2)<-c("x","y","class")
mydatasum<-rbind(mydataln1,mydataln2)