From 804ff59a23872db9917d2486c9988bbfee04e837 Mon Sep 17 00:00:00 2001
From: Costa <47926492N@ICO.SCS.local>
Date: Wed, 23 Feb 2022 15:56:48 +0100
Subject: [PATCH] =?UTF-8?q?correcci=C3=B3n=20importar=20grupos.?=
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 243cd29..0016243 100755
--- a/invivos/app.R
+++ b/invivos/app.R
@@ -103,7 +103,7 @@ server <- function(input, output) {
         taula["Volume"]<-((taula$Major*taula$Minor*taula$Minor)*(pi/6))
       }
       dades$taula<-taula
-      dades$groups<-read.xlsx(input$file_sizes$datapath, sheet = 2)[,1]
+      dades$groups<-read.xlsx(input$file_sizes$datapath, sheet = 2, colName=F)[,1]
       dades$sex<-read.xlsx(input$file_sizes$datapath, sheet = 3, sep.names = " ")
     }
   })