plot a normal distribution with a mean of 10 and sd of 2 in r

main.r
# Set mean and standard deviation
mean <- 10
sd <- 2

# Create a sequence of values from mean - 3 * sd to mean + 3 * sd
x <- seq(mean - 3*sd, mean + 3*sd, length=100)

# Use dnorm() to calculate the height of the probability density function at each value of the sequence
y <- dnorm(x, mean, sd)

# Plot the density curve using curve()
curve(dnorm(x, mean, sd), from = mean - 3*sd, to = mean + 3*sd, ylab="Density", xlab="X", main="Normal Probability Density Function")
470 chars
13 lines