更改线条颜色

Question

我已经运行fitdist并存储在：

params = fitdist(data, dist,method="mle") 
results[[i]]<-params 

我的问题是，当我使用：

plot(results[[1]]) 

我得到几个图形，包括qqplot 。我想改变qqplot线的颜色。我怎样才能做到这一点？

感谢

Answer 1

如果创建一步与功能denscomp，qqcomp，cdfcomp和ppcomp也包含在fitdistrplus包此图的步骤，你可以影响颜色：

# sample dataset: 
data <- rnorm(1000, 0, 1) 

# calculate fitting: 
fitting <- fitdist(data, "norm") 

# the original plot: 
par(mfrow=c(1,1)) 
plot(fitting) 

# create it graph by graph with different colors: 
par(mfrow=c(2,2)) 
denscomp(fitting, datacol="gray", fitcol="blue") 
qqcomp(fitting, fitpch = 20, fitcol="gray", line01col ="blue") 
cdfcomp(fitting, datacol="gray", fitcol="blue") 
ppcomp(fitting, fitpch = 20, fitcol="gray", line01col = "blue")