RG#9: Drawing basic normal curve

# data
# generate 600 numbers in sequence between -4 to 4
x <- seq(-4, 4, length=600)
# calculate normal density
ds <- dnorm(x)

# plot
plot(x, ds, type="l", lty=1, col = 2, xlab="x value", ylab="Density", main="standarized normal distribution curve")