Corretgir error.

2022-11-18 15:48:20 +01:00
parent 5c9e525517
commit 3959731ebb
1 changed files with 1 additions and 1 deletions
@@ -109,7 +109,7 @@ server <- function(input, output) {
        taula["Volume"]<-taula$`TS-Deep`*taula$`TS-Length`*taula$`TS-Width`*pi/6
      }
      dades$taula<-taula
-      dades$groups<-read.xlsx(input$file_sizes$datapath, sheet = 2, colName=F)[,1]
+      dades$groups<-read.xlsx(input$file_sizes$datapath, sheet = 2, colNames=F)[,1]
      if (readxl::excel_sheets(input$file_sizes$datapath) %>% length > 2){
        dades$sex<-read.xlsx(input$file_sizes$datapath, sheet = 3, sep.names = " ")
      }