# install.packages("ragg")
# install.packages("tidyverse")
# install.packages("ggplot2")

library(ggplot2)

setwd("~/Documents/PlatformIO/Projects/Robot_Go_West/arduino-photometrics/exec")

# solar <- read.csv("../data/solar_pos_data/solar_data_2026-06-01_to_2026-06-15.csv", header=TRUE)
photo <- read.csv("../data/arduino_data_package_auto_20260105_151537.csv", header=TRUE)

photo$time <- as.POSIXct(photo$Epoch)
ggplot(data = photo, aes(x = time))+
  geom_line(aes(y = Photo_sensor0, color = "Sensor 0"))+
  geom_line(aes(y = Photo_sensor1, color = "Sensor 1"))+
  geom_line(aes(y = Photo_sensor2, color = "Sensor 2"))+
  geom_line(aes(y = Photo_sensor3, color = "Sensor 3"))+
  geom_line(aes(y = Photo_sensor4, color = "Sensor 4"))+
  geom_line(aes(y = Photo_sensor5, color = "Sensor 5"))+
  theme_minimal()

ggplot(data = photo, aes(x = time, y = Temp_sensor0))+
  geom_line()+
  theme_minimal()