Как использовать кривую функции в [R] для построения графика нормальной кривой?

Я пытаюсь построить гистограмму в [R], и нормальную кривую, которая описывает гистограмму как следующее:

w<-rnorm(1000) 
hist(w,col="red",freq=F,xlim=c(-5,5))
curve(dnorm(w),-5,5,add=T,col="blue")

Но когда я пытаюсь построить нормальную кривую по кривой, функция показывает мне следующую ошибку:

Error en curve(dnorm(w), -5, 5, add = T, col = "blue") : 
  'expr' must be a function, or a call or an expression containing 'x'

Что я делаю не так?