UVADS · AustinB2319 · Jan 21, 2026 · Jan 21, 2026
diff --git a/hot-dog-survey-data/Analysis Plan.pdf b/hot-dog-survey-data/Analysis Plan.pdf
diff --git a/hot-dog-survey-data/Cleaned Hotdog Data.csv b/hot-dog-survey-data/Cleaned Hotdog Data.csv
@@ -0,0 +1,77 @@
+Year,Hotdog a Sandwich?
+3rd,No
+4th,No
+4th,No
+4th,Yes
+4th,Yes
+4th,Yes
+3rd,Yes
+3rd,No
+3rd,No
+4th,Yes
+4th,No
+2nd,No
+2nd,No
+2nd,No
+4th,No
+3rd,No
+3rd,No
+4th,No
+4th,No
+2nd,No
+2nd,No
+4th,Yes
+4th,No
+4th,No
+4th,No
+4th,No
+4th,Yes
+3rd,No
+4th,Yes
+2nd,Yes
+4th,No
+4th,Yes
+2nd,No
+4th,Yes
+2nd,No
+4th,No
+4th,No
+3rd,Yes
+2nd,No
+4th,No
+4th,No
+4th,No
+4th,No
+4th,Yes
+2nd,No
+4th,No
+4th,No
+4th,No
+4th,Yes
+4th,No
+4th,No
+4th,No
+4th,No
+4th,No
+4th,No
+3rd,No
+4th,No
+2nd,No
+4th,No
+4th,Yes
+4th,No
+4th,No
+4th,No
+4th,Yes
+4th,No
+4th,Yes
+4th,No
+4th,No
+4th,No
+4th,Yes
+3rd,No
+4th,No
+4th,No
+4th,No
+4th,No
+4th,No
diff --git a/hot-dog-survey-data/Copy Hotdog Survey Raw Data.xlsx b/hot-dog-survey-data/Copy Hotdog Survey Raw Data.xlsx
diff --git a/hot-dog-survey-data/Copy of Data Dictionary File Spring 2026.xlsx b/hot-dog-survey-data/Copy of Data Dictionary File Spring 2026.xlsx
diff --git a/hot-dog-survey-data/Hotdog Chi-Squared Test.R b/hot-dog-survey-data/Hotdog Chi-Squared Test.R
@@ -0,0 +1,12 @@
+library(stats)
+
+setwd("C:/Users/dinos/OneDrive/Desktop/College/8th Semester")
+getwd()
+
+data <- read.csv("Cleaned Hotdog Data.csv")
+data
+
+contingency_table <- table(data$Year, data$Hotdog.a.Sandwich.)
+contingency_table
+
+chisq.test(contingency_table, simulate.p.value = TRUE, B = 100000)
diff --git a/hot-dog-survey-data/Hotdog Survey (Responses).xlsx b/hot-dog-survey-data/Hotdog Survey (Responses).xlsx
diff --git a/hot-dog-survey-data/README File.docx b/hot-dog-survey-data/README File.docx