Любая идея, как я могу построить этот усеченный нормальный PDF в R. Среднее значение равно 0 с дисперсией 1, поэтому PDF: exp((-x^2)/2)) * I{x>=2}, где I - функция индикатора. Любая помощь будет оценена. Спасибо.
exp((-x^2)/2)) * I{x>=2}
I
Нет ничего проще.Попробуйте:
x <- seq(-5, 5, by=0.01) plot(x[x >= 2], exp((-x^2)/2)[x >= 2])