3482
правки
Изменения
м
→Пакет stats
{{r-code|code=
<nowiki>> xfit <- seq(min(x), max(x), length = 100)# Координаты по оси X> yfit <- dnorm(xfit, mean = mean(x), sd = sd(x))# Вычисление координат по оси Y
> hist(x, freq = FALSE)
> lines(density(x), col = "red")