sm包中的sm.density.compare()函数在做密度比较时，默认第一个密度曲线颜色是从red（红色）开始，后面每条曲线颜色+1即可？attach(mtcars)cyl.f <- factor(cyl,levels=c(4,6,8),labels=c("4 cylinder","6 cylinder","8 cylinder"))
sm.density.compare(mpg,cyl,xlab="miles per gallon")
title(main="mpg distribution by car cylinders")
colfill <- c(2:(1+length(levels(cyl.f))))
legend(locator(1),levels(cyl.f),fill=colfill)
就比如添加图例是，为什么colfill <- c(2:(1+length(levels(cyl.f))))是这个，默认红色开始吗？
求大神指导！！！