Análisis-Randomización. Evitar la desaparición de ratones sin grupo (excluidos).

This commit is contained in:
2024-09-25 15:46:01 +02:00
parent a3eaf3e7a9
commit 0887ab933a
+1 -1
View File
@@ -332,7 +332,7 @@ server <- function(input, output) {
# timepoint<-c(7,10,13,16,19,22,25) # timepoint<-c(7,10,13,16,19,22,25)
if (!is.null(input$file_sizes)){ if (!is.null(input$file_sizes)){
template<-dades$db %>% filter(!is.na(Group)) %>% template<-dades$db %>%
select(Animal, Group) %>% unique() select(Animal, Group) %>% unique()
dtemplate<-merge(dades$taula %>% select(-Group), template) %>% dtemplate<-merge(dades$taula %>% select(-Group), template) %>%
arrange(DayPostInoc, Animal, Side) %>% arrange(DayPostInoc, Animal, Side) %>%