Xenograft Tumor Growth And Body Weight Graphs

library(ggplot2)
ggplot(Xen, aes(x = Day)) +
  geom_line(aes(y = `Left.tumor.volume..mm.3.`, color = "Left Flank Tumor")) +
  geom_line(aes(y = `Right.tumor.volume..mm.3.`, color = "Right Flank Tumor")) +
  scale_color_manual(values = c("blue", "red")) +
  labs(
    title = "Tumor Growth of 1593",
    x = expression(bold("Day")), 
    y = expression(bold("Tumor Volume (mm"^3*")")), 
    color = "") +
  ylim(0, 2000) + 
  theme(plot.title = element_text(hjust = 0.5, face = "bold"),
        panel.grid.major = element_line(color = "gray", linewidth = 0.35),
        panel.grid.minor = element_line(color = "gray", linewidth = 0.1),
        panel.background = element_rect(fill = "white"))

library(ggplot2)
ggplot(Xen, aes(x = Day)) +
  geom_line(aes(y = Weight, color = "Weight")) +
  scale_color_manual(values = c("brown")) +
  labs(
    title = "Body Weight of 1593",
    x = expression(bold("Day")), 
    y = expression(bold("Weight (g)")), 
    color = "") +
  ylim(15, 35) +
  theme(plot.title = element_text(hjust = 0.5, face = "bold"),
        panel.grid.major = element_line(color = "gray", linewidth = 0.35),
        panel.grid.minor = element_line(color = "gray", linewidth = 0.1),
        panel.background = element_rect(fill = "white"))