Плотность функция сюжет не действительно вертикальный - ggplot2

Question

Я рисую функцию плотности с пакетом ggplot2. Я заметил, что первая и вторая вертикальные линии не совсем прямоугольные, хотя, насколько я понимаю, они должны быть, или? Я также обнаружил, что это так, при построении распределения биномиального распределения, что этапы не являются действительно прямоугольными.

library(ggplot2) 
p_uniform_density <- ggplot(data.frame(x = c(-2, 17.5)), aes(x)) + 
stat_function(fun = dunif, args = list(min = 0, max = 15), size=1.2) + 
theme_bw() + 
labs(y = "f(X)", x = "X") + 
theme(text = element_text(size=20) , panel.grid.major = element_line(size = 0.2, linetype = 'solid', colour = "grey"), 
    panel.grid.minor = element_line(size = 0.1, linetype = 'solid', colour = "grey")) + 
scale_x_continuous(breaks = c(-2:17.5)) 

Answer 1

попробовать с n=1e3 в stat_function