使用 mixtools 时出现曲线绘图问题
使用以下 R 代码
require(mixtools)
x <- c(rnorm(10000,8,2),rnorm(10000,18,5))
xMix <- normalmixEM(x, lambda=NULL, mu=NULL, sigma=NULL)
plot(xMix, which = 2, nclass=25)
我得到了一个很好的直方图,其中叠加了从模型估计的 2 条正态曲线。
问题在于默认颜色(即红色和绿色),我需要将其更改为黑色和灰色的出版物。
我认为这样做的一种方法是首先生成直方图
hist(xMix$x, freq=FALSE, nclass=25)
然后使用“曲线”功能添加线条。
.......但我迷路了,无法解决
我将不胜感激任何指示或实际解决方案
谢谢
PS。请注意,使用 ggplot 可以解决此问题的另一种解决方法: 关于如何使用 ggplot2 绘制 mixEM 类型数据的任何建议, 但由于各种原因,我需要继续使用基本图形