From 0887ab933ae34b90e8deb1094f57769c2dcaab22 Mon Sep 17 00:00:00 2001
From: marcelcosta <marcelcosta@mcosta.cat>
Date: Wed, 25 Sep 2024 15:46:01 +0200
Subject: [PATCH] =?UTF-8?q?An=C3=A1lisis-Randomizaci=C3=B3n.=20Evitar=20la?=
 =?UTF-8?q?=20desaparici=C3=B3n=20de=20ratones=20sin=20grupo=20(excluidos)?=
 =?UTF-8?q?.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 invivos/app.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/invivos/app.R b/invivos/app.R
index 1db5d31..7f06859 100755
--- a/invivos/app.R
+++ b/invivos/app.R
@@ -332,7 +332,7 @@ server <- function(input, output) {
       # timepoint<-c(7,10,13,16,19,22,25)
       
       if (!is.null(input$file_sizes)){
-        template<-dades$db %>% filter(!is.na(Group)) %>% 
+        template<-dades$db %>%
           select(Animal, Group) %>% unique()
         dtemplate<-merge(dades$taula %>% select(-Group), template) %>% 
           arrange(DayPostInoc, Animal, Side) %>%