col=ifelse(x<0, "blue", "red") #如果x值为负值，用蓝色表示，反之，用红色表示
abline(v=0,col="grey",lwd=2,lty=6) #用灰色画出垂直线x=0，如果将v=0用h=0代替，表示画水平线y=0
效果图如下：
col=ifelse(x<0, "blue", "red") #如果x值为负值，用蓝色表示，反之，用红色表示
abline(v=0,col="grey",lwd=2,lty=6) #用灰色画出垂直线x=0，如果将v=0用h=0代替，表示画水平线y=0
效果图如下：