x<-seq(1,10)
z<-sin(x)
zz<-cos(x)
plot(x,z,col=5,type="l")
lines(x,zz,col=1)
points(x,z,pch=2)
points(x,zz,pch=8)
legend(4,1,c("z","zz"),col=c(5,1),
text.col="green4",pch=c(2,8),
merge=TRUE,bg='gray90')
自己解决了一部分,但是编译时出现了【错误于legend(4, 1, c("z", "zz"), col = c(5, 1), text.col = "green4", :
找不到这个对象"seg.len"】
请问是什么意思呢?