overlay a normal distribution to a histogram of non-normally distributed values in ggplot r

I'm trying to overlay a normal bell curve on top of the histogram of these fake data that are intentionally NOT normally distributed. My goal is to show other students how non-normally distributed data look in comparison to a normal distribution.

While I have figured out how to get the bell curve on from other questions that have been asked, my y axis is acting strange. For a density plot, I would assume that the axis would go from 0 to 1, but for some values, it says the density is 2 (see image of screenshot below). I want bars that show the density and a bell curve that shows the normal distribution. Any help would be appreciated!

Here's the fake dataset:

library(dplyr)
tester2 <- tibble(
fake = c(2, 2, 2, 2, 10, 10, 10, 10, 5, 3, 4, 5, 6, 7, 8, 9, 10, 10, 5, 2, 4, 5, 6, 7, 8, 4, 4, 5, 5, 2, 2, 2, 2, 2, 10, 10, 10, 10, 5, 2, 2, 2, 2, 2, 10, 10, 10, 10, 5, 2, 2, 2, 2, 2, 10, 10, 10, 10, 5, 2, 3, 4, 5, 5, 5, 5, 5, 4, 6, 5),
also_fake = c(1, 2, 2, 2, 3, 3, 3.3, 4, 4, 5, 1, 2, 2, 2, 3, 3.6, 3, 4, 4, 5, 1, 2, 2, 2.1, 3, 3, 3, 4, 4, 5, 1, 2, 2, 2, 3.1, 3, 3, 4.6, 4, 5, 1, 2, 2, 2, 3, 3, 3, 4, 4, 5, 1, 2, 2, 2, 3, 3, 3, 4, 4, 5, 1, 2, 2, 2, 3, 3, 3, 4, 4, 5) 
)

Here's my code so far:

testing <- ggplot(tester2, aes(x = also_fake)) +
geom_histogram(aes( y = ..density..)) +
geom_rug() +
stat_function(fun = dnorm,
            color = "blue",
            args=list(mean = mean(tester2$also_fake),
                      sd = sd(tester2$also_fake)))

And here's what it produces:

image of plot with weird y axis

EDIT: This question is different from this question because I do not want a density plot: Superimpose a normal distribution to a density using ggplot in R

It is also different from this question because my values are intentionally non-normally distributed: ggplot2: histogram with normal curve.