Вы имеете в виду что-то вроде ниже?
x <- seq(-5,5,by = 0.1)
y <- dnorm(x)
Я полагаю, вы пытаетесь вычислить интеграл от нормального распределения за интервал от -5 до 5, поэтому вот некоторые подходы
> sum(y)*0.1 #(not recommended) this method achieves relatively precise integral only if you have fine steps
[1] 0.9999996
или
> integrate(dnorm,-5,5)
0.9999994 with absolute error < 8.7e-10
или
> pnorm(5)-pnorm(-5)
[1] 0.9999994