Hi Justin, it still does not work. All points become red. I use this skript with your modifications:
TOC_NI<-read.csv2("C:/Users/hilliges/Desktop/Master/Daten/Statistik/TOC-NI.csv", sep=";", dec=",", encoding="UTF-8") circ<-TOC_NI[order(TOC_NI$NI,decreasing=T),][1:4,] plot(NI~TOC,data=TOC_NI,col="blue", pch=16, xlim=c(0,4500000)) abline(lm(NI~TOC,data=TOC_NI),col = "red",lwd=3) points(NI~TOC,data=TOC_NI,col='red',pch=1,size=3) Maybe the the Sourcefile will help to solve the prob? http://r.789695.n4.nabble.com/file/n4291954/TOC-NI.csv TOC-NI.csv Thank you so muich! GeO -- View this message in context: http://r.789695.n4.nabble.com/colored-outliers-tp4282207p4291954.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.