Corrección en el gráfico individual, dónde aparecían agrupados los dos laterales cuando no es exp de vacunación.

invivos/app.R

@@ -410,7 +410,7 @@ server <- function(input, output) {
           labs(x="Days after tumor challenge")+
           theme_bw()  
       }else{
-        ggplot(table, aes(Timepoint, Volume, color=Group, group=`ID animal`))+
+        ggplot(table, aes(Timepoint, Volume, color=Group, group=paste0(`ID animal`, `ID tumor`)))+
           # geom_errorbar(stat="summary", width=0.05)+
           geom_line()+
           geom_point()+