ฮิสโตแกรมแบบถ่วงน้ำหนักด้วยการสำรวจ

# Create a histogram with a set binwidth
ggplot(data = ___,
       mapping = aes(___)) + 
	geom_histogram(binwidth = ___,
                   color = "white") +
	labs(x = "Hours of Sleep")