diff --git a/R/Nancy Clarin/excel_to_csv.R b/R/Nancy Clarin/excel_to_csv.R
new file mode 100644
index 0000000..6e9661a
--- /dev/null
+++ b/R/Nancy Clarin/excel_to_csv.R	
@@ -0,0 +1,3 @@
+slx <- read_excel("/home/clarinnancy/tickets/Hamilton2016/Alaska_place_time_16b (1).xls")
+slx <- as.data.frame(slx)
+write.csv(slx,"/home/clarinnancy/tickets/Hamilton2016/alaska_place_time.csv", row.names = FALSE)
\ No newline at end of file