У меня проблема с графиком кривых при использовании 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: Любые предложения о том, как я могу построить данные типа mixEM с помощью ggplot2, но по разным причинам мне нужно продолжать использовать базовую графику