STAT158_FinalProject_CODE

library(dplyr)

Attaching package: 'dplyr'

The following objects are masked from 'package:stats':

    filter, lag

The following objects are masked from 'package:base':

    intersect, setdiff, setequal, union

library(tidyverse)

── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
✔ forcats   1.0.1     ✔ readr     2.2.0
✔ ggplot2   4.0.2     ✔ stringr   1.6.0
✔ lubridate 1.9.5     ✔ tibble    3.3.1
✔ purrr     1.2.1     ✔ tidyr     1.3.2

── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
✖ dplyr::filter() masks stats::filter()
✖ dplyr::lag()    masks stats::lag()
ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors

library(gt)

cookies |>
  gt() |>
  tab_style(
    style = list(cell_fill(color = blocking_col)),
    locations = cells_body(columns = cookie_id)
  ) |>
  tab_style(
    style = list(cell_fill(color = factor_col)),
    locations = cells_body(columns = c(brand, temperature, time))
  ) |>
  tab_style(
    style = list(cell_fill(color = response_col)),
    locations = cells_body(columns = c(color, density, milk_dissolution, prebake_weight, postbake_weight))
  ) |>
  tab_style(
    style = list(cell_text(align = "center")),
    locations = cells_body()
  ) |>
  tab_style(
    style = list(cell_text(align = "center")),
    locations = cells_column_labels()
  )

cookie_id	sheet_id	location_id	brand	temperature	time	density	color	milk_dissolution	prebake_weight	postbake_weight
1	10	1	Pillsbury	350°F	8min	0.6	#F3E5AB	0.25	35	25
2	10	2	Pillsbury	350°F	8min	0.6	#F3E5AB	0.25	35	25
3	10	3	Pillsbury	350°F	8min	0.6	#F3E5AB	0.25	35	25
4	10	4	Pillsbury	350°F	8min	0.6	#F3E5AB	0.25	35	25
5	10	5	Pillsbury	350°F	8min	0.6	#F3E5AB	0.25	35	25
6	10	6	Pillsbury	350°F	8min	0.6	#F3E5AB	0.25	35	25
7	10	7	Pillsbury	350°F	8min	0.6	#F3E5AB	0.25	35	25
8	10	8	Pillsbury	350°F	8min	0.6	#F3E5AB	0.25	35	25
9	10	9	Pillsbury	350°F	8min	0.6	#F3E5AB	0.25	35	25
10	1	1	Pillsbury	350°F	15min	0.6	#F3E5AB	0.25	35	25
11	1	2	Pillsbury	350°F	15min	0.6	#F3E5AB	0.25	35	25
12	1	3	Pillsbury	350°F	15min	0.6	#F3E5AB	0.25	35	25
13	1	4	Pillsbury	350°F	15min	0.6	#F3E5AB	0.25	35	25
14	1	5	Pillsbury	350°F	15min	0.6	#F3E5AB	0.25	35	25
15	1	6	Pillsbury	350°F	15min	0.6	#F3E5AB	0.25	35	25
16	1	7	Pillsbury	350°F	15min	0.6	#F3E5AB	0.25	35	25
17	1	8	Pillsbury	350°F	15min	0.6	#F3E5AB	0.25	35	25
18	1	9	Pillsbury	350°F	15min	0.6	#F3E5AB	0.25	35	25
19	8	1	Pillsbury	450°F	8min	0.6	#F3E5AB	0.25	35	25
20	8	2	Pillsbury	450°F	8min	0.6	#F3E5AB	0.25	35	25
21	8	3	Pillsbury	450°F	8min	0.6	#F3E5AB	0.25	35	25
22	8	4	Pillsbury	450°F	8min	0.6	#F3E5AB	0.25	35	25
23	8	5	Pillsbury	450°F	8min	0.6	#F3E5AB	0.25	35	25
24	8	6	Pillsbury	450°F	8min	0.6	#F3E5AB	0.25	35	25
25	8	7	Pillsbury	450°F	8min	0.6	#F3E5AB	0.25	35	25
26	8	8	Pillsbury	450°F	8min	0.6	#F3E5AB	0.25	35	25
27	8	9	Pillsbury	450°F	8min	0.6	#F3E5AB	0.25	35	25
28	11	1	Pillsbury	450°F	15min	0.6	#F3E5AB	0.25	35	25
29	11	2	Pillsbury	450°F	15min	0.6	#F3E5AB	0.25	35	25
30	11	3	Pillsbury	450°F	15min	0.6	#F3E5AB	0.25	35	25
31	11	4	Pillsbury	450°F	15min	0.6	#F3E5AB	0.25	35	25
32	11	5	Pillsbury	450°F	15min	0.6	#F3E5AB	0.25	35	25
33	11	6	Pillsbury	450°F	15min	0.6	#F3E5AB	0.25	35	25
34	11	7	Pillsbury	450°F	15min	0.6	#F3E5AB	0.25	35	25
35	11	8	Pillsbury	450°F	15min	0.6	#F3E5AB	0.25	35	25
36	11	9	Pillsbury	450°F	15min	0.6	#F3E5AB	0.25	35	25
37	5	1	Nestle	350°F	8min	0.6	#F3E5AB	0.25	35	25
38	5	2	Nestle	350°F	8min	0.6	#F3E5AB	0.25	35	25
39	5	3	Nestle	350°F	8min	0.6	#F3E5AB	0.25	35	25
40	5	4	Nestle	350°F	8min	0.6	#F3E5AB	0.25	35	25
41	5	5	Nestle	350°F	8min	0.6	#F3E5AB	0.25	35	25
42	5	6	Nestle	350°F	8min	0.6	#F3E5AB	0.25	35	25
43	5	7	Nestle	350°F	8min	0.6	#F3E5AB	0.25	35	25
44	5	8	Nestle	350°F	8min	0.6	#F3E5AB	0.25	35	25
45	5	9	Nestle	350°F	8min	0.6	#F3E5AB	0.25	35	25
46	4	1	Nestle	350°F	15min	0.6	#F3E5AB	0.25	35	25
47	4	2	Nestle	350°F	15min	0.6	#F3E5AB	0.25	35	25
48	4	3	Nestle	350°F	15min	0.6	#F3E5AB	0.25	35	25
49	4	4	Nestle	350°F	15min	0.6	#F3E5AB	0.25	35	25
50	4	5	Nestle	350°F	15min	0.6	#F3E5AB	0.25	35	25
51	4	6	Nestle	350°F	15min	0.6	#F3E5AB	0.25	35	25
52	4	7	Nestle	350°F	15min	0.6	#F3E5AB	0.25	35	25
53	4	8	Nestle	350°F	15min	0.6	#F3E5AB	0.25	35	25
54	4	9	Nestle	350°F	15min	0.6	#F3E5AB	0.25	35	25
55	12	1	Nestle	450°F	8min	0.6	#F3E5AB	0.25	35	25
56	12	2	Nestle	450°F	8min	0.6	#F3E5AB	0.25	35	25
57	12	3	Nestle	450°F	8min	0.6	#F3E5AB	0.25	35	25
58	12	4	Nestle	450°F	8min	0.6	#F3E5AB	0.25	35	25
59	12	5	Nestle	450°F	8min	0.6	#F3E5AB	0.25	35	25
60	12	6	Nestle	450°F	8min	0.6	#F3E5AB	0.25	35	25
61	12	7	Nestle	450°F	8min	0.6	#F3E5AB	0.25	35	25
62	12	8	Nestle	450°F	8min	0.6	#F3E5AB	0.25	35	25
63	12	9	Nestle	450°F	8min	0.6	#F3E5AB	0.25	35	25
64	7	1	Nestle	450°F	15min	0.6	#F3E5AB	0.25	35	25
65	7	2	Nestle	450°F	15min	0.6	#F3E5AB	0.25	35	25
66	7	3	Nestle	450°F	15min	0.6	#F3E5AB	0.25	35	25
67	7	4	Nestle	450°F	15min	0.6	#F3E5AB	0.25	35	25
68	7	5	Nestle	450°F	15min	0.6	#F3E5AB	0.25	35	25
69	7	6	Nestle	450°F	15min	0.6	#F3E5AB	0.25	35	25
70	7	7	Nestle	450°F	15min	0.6	#F3E5AB	0.25	35	25
71	7	8	Nestle	450°F	15min	0.6	#F3E5AB	0.25	35	25
72	7	9	Nestle	450°F	15min	0.6	#F3E5AB	0.25	35	25
73	2	1	Betty Crocker	350°F	8min	0.6	#F3E5AB	0.25	35	25
74	2	2	Betty Crocker	350°F	8min	0.6	#F3E5AB	0.25	35	25
75	2	3	Betty Crocker	350°F	8min	0.6	#F3E5AB	0.25	35	25
76	2	4	Betty Crocker	350°F	8min	0.6	#F3E5AB	0.25	35	25
77	2	5	Betty Crocker	350°F	8min	0.6	#F3E5AB	0.25	35	25
78	2	6	Betty Crocker	350°F	8min	0.6	#F3E5AB	0.25	35	25
79	2	7	Betty Crocker	350°F	8min	0.6	#F3E5AB	0.25	35	25
80	2	8	Betty Crocker	350°F	8min	0.6	#F3E5AB	0.25	35	25
81	2	9	Betty Crocker	350°F	8min	0.6	#F3E5AB	0.25	35	25
82	6	1	Betty Crocker	350°F	15min	0.6	#F3E5AB	0.25	35	25
83	6	2	Betty Crocker	350°F	15min	0.6	#F3E5AB	0.25	35	25
84	6	3	Betty Crocker	350°F	15min	0.6	#F3E5AB	0.25	35	25
85	6	4	Betty Crocker	350°F	15min	0.6	#F3E5AB	0.25	35	25
86	6	5	Betty Crocker	350°F	15min	0.6	#F3E5AB	0.25	35	25
87	6	6	Betty Crocker	350°F	15min	0.6	#F3E5AB	0.25	35	25
88	6	7	Betty Crocker	350°F	15min	0.6	#F3E5AB	0.25	35	25
89	6	8	Betty Crocker	350°F	15min	0.6	#F3E5AB	0.25	35	25
90	6	9	Betty Crocker	350°F	15min	0.6	#F3E5AB	0.25	35	25
91	9	1	Betty Crocker	450°F	8min	0.6	#F3E5AB	0.25	35	25
92	9	2	Betty Crocker	450°F	8min	0.6	#F3E5AB	0.25	35	25
93	9	3	Betty Crocker	450°F	8min	0.6	#F3E5AB	0.25	35	25
94	9	4	Betty Crocker	450°F	8min	0.6	#F3E5AB	0.25	35	25
95	9	5	Betty Crocker	450°F	8min	0.6	#F3E5AB	0.25	35	25
96	9	6	Betty Crocker	450°F	8min	0.6	#F3E5AB	0.25	35	25
97	9	7	Betty Crocker	450°F	8min	0.6	#F3E5AB	0.25	35	25
98	9	8	Betty Crocker	450°F	8min	0.6	#F3E5AB	0.25	35	25
99	9	9	Betty Crocker	450°F	8min	0.6	#F3E5AB	0.25	35	25
100	3	1	Betty Crocker	450°F	15min	0.6	#F3E5AB	0.25	35	25
101	3	2	Betty Crocker	450°F	15min	0.6	#F3E5AB	0.25	35	25
102	3	3	Betty Crocker	450°F	15min	0.6	#F3E5AB	0.25	35	25
103	3	4	Betty Crocker	450°F	15min	0.6	#F3E5AB	0.25	35	25
104	3	5	Betty Crocker	450°F	15min	0.6	#F3E5AB	0.25	35	25
105	3	6	Betty Crocker	450°F	15min	0.6	#F3E5AB	0.25	35	25
106	3	7	Betty Crocker	450°F	15min	0.6	#F3E5AB	0.25	35	25
107	3	8	Betty Crocker	450°F	15min	0.6	#F3E5AB	0.25	35	25
108	3	9	Betty Crocker	450°F	15min	0.6	#F3E5AB	0.25	35	25