How to add a standard normal distribution curve on my histogram?

[fcas80]

x <- seq(-4., 4., by = .01)
y <- dnorm(x, mean = 0, sd = 1)
plot(x,y, col="blue")