Не могу добавить кривую вероятности на гистограмме
Я пытаюсь отобразить несколько гистограмм на одном графике с помощью пакета решеток.
Тот'мой код до сих пор:
histogram(~ X1 + X2 + X3 + X4 + X5 + X6 + X7 + X8 + X9 + X10, data=mydata,
type = "density",layout=c(5,2),
panel=function(x, ...) {
panel.histogram(x, ...)
panel.mathdensity(dmath=dnorm, col="black",
args=list(mean=mean(x), sd=sd(x)), ...)
})
Проблема в том, что он выигралt построить график вероятности. Это неЯ не вернул ошибку, поэтому я думаю, что код выглядит хорошо.
Я также попробовал это только с одной переменной, и это нелибо не работает:
histogram(~ X1, data=mydata,
type = "density",layout=c(5,2),
panel=function(x, ...) {
panel.histogram(x, ...)
panel.mathdensity(dmath=dnorm, col="black",
args=list(mean=mean(x), sd=sd(x)), ...)
})
Кто-нибудь видит ошибку в моем коде? Или что-то не так в моих данных?
Я рад за любой совет!