Не могу добавить кривую вероятности на гистограмме

Я пытаюсь отобразить несколько гистограмм на одном графике с помощью пакета решеток.

Тот'мой код до сих пор:

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)), ...)
  })

Кто-нибудь видит ошибку в моем коде? Или что-то не так в моих данных?

Я рад за любой совет!

Ответы на вопрос(2)

Ваш ответ на вопрос