student_sleep <-
structure(list(hours = c(6.0899999999999999, 7.2400000000000002, 
9.0500000000000007, 5.8600000000000003, 6.9400000000000004, 7.1799999999999997, 
7.8700000000000001, 6.7699999999999996, 9.6300000000000008, 6.8799999999999999, 
7.5199999999999996, 8.2200000000000006, 6.5999999999999996, 5.9500000000000002, 
9.3300000000000001, 4.8399999999999999, 8.0899999999999999, 7.0700000000000003, 
8.2599999999999998, 7.54, 9.8000000000000007, 5.7999999999999998, 
9.0500000000000007, 9.5899999999999999, 7.04, 4.7300000000000004, 
7.5899999999999999, 6.3899999999999997, 7.9800000000000004, 7.3700000000000001, 
7.9100000000000001, 7.4000000000000004, 8.3499999999999996, 6.7199999999999998, 
6.21, 6.3899999999999997, 5.3200000000000003, 6.0800000000000001, 
6.4299999999999997, 6.7599999999999998, 6.6100000000000003, 5.1200000000000001, 
6.1399999999999997, 9.5099999999999998, 7.7699999999999996, 9.6400000000000006, 
6.7000000000000002, 6.9299999999999997, 6.8300000000000001, 5.7999999999999998, 
6.1500000000000004, 9.7599999999999998, 6.4299999999999997, 8.6099999999999994, 
5.9400000000000004, 5.1200000000000001, 6.6799999999999997, 8.1600000000000001, 
8.4299999999999997, 9.1699999999999999, 5.2699999999999996, 9.6999999999999993, 
6.2800000000000002, 7.21, 7.6200000000000001, 6.1699999999999999, 
5.0899999999999999, 6.5099999999999998, 7.1299999999999999, 6.0899999999999999, 
6.0700000000000003, 7.4100000000000001, 6.8799999999999999, 7.54, 
6.9699999999999998, 6.0800000000000001, 8.6500000000000004, 7.9500000000000002, 
8.3200000000000003, 5.5999999999999996, 8.2400000000000002, 5.3499999999999996, 
6.46, 5.6399999999999997, 4.9199999999999999, 9.3900000000000006, 
6.3300000000000001, 6.7199999999999998, 6.6100000000000003, 7.4800000000000004, 
9.0700000000000003, 9.1799999999999997, 5.8099999999999996, 5.6500000000000004, 
5.5099999999999998, 5.75, 9.5999999999999996, 7.04, 6.1399999999999997, 
6.3899999999999997, 11.880000000000001, 10.06, 8.9399999999999995, 
8.1699999999999999, 7.9800000000000004, 14.470000000000001, 11.56, 
14.359999999999999, 8.7400000000000002, 8.8699999999999992)), row.names = c(NA, 
-110L), class = c("tbl_df", "tbl", "data.frame"))