diff --git a/invivos/app.R b/invivos/app.R
index 5cb22f7..ea11a77 100755
--- a/invivos/app.R
+++ b/invivos/app.R
@@ -895,8 +895,10 @@ server <- function(input, output) {
                 table<-table %>% filter(!Animal %in% deadmice)
               }
             }
+            print("Table")
+            print(head(table))
             
-            g<-ggplot(table, aes(as.numeric(as.character(DayPostInoc)), Volume, color=Group, group=Animal))+
+            g<-ggplot(table, aes(as.numeric(as.character(DayPostInoc)), Volume, color=Group, group=paste0(Animal,Side)))+
               scale_x_continuous(expand = expansion(mult = c(0,0.0)),
                                  breaks=sort(unique(as.numeric(as.character(table$DayPostInoc)))),
                                  limits = c(0,max(as.numeric(as.character(table$DayPostInoc)))*1.1))+