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

效果图如下:

R语言画图,根据正负值画不同颜色,并且画水平线或者垂直线-LMLPHP

04-20 14:07