Update mod_viewData.R

bug fixed
YonghuiDong · Sep 10, 2023 · 2f69006 · 2f69006
1 parent 3b65c6e
commit 2f69006
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/mod_viewData.R b/R/mod_viewData.R
@@ -1116,7 +1116,7 @@ mod_viewData_server <- function(id, global){
 
     output$predictionTable <- DT::renderDT({
       shiny::req(ISQuan$fit)
-      shiny::validate(need(input$mzValues != "", message = "Intensities are missing."))
+      shiny::validate(need(input$quanInt != "", message = "Intensities are missing."))
       ISQuan$prediction <- getQuan(mod = ISQuan$fit, Intensity = text2Num(input$quanInt))
       DT::datatable(ISQuan$prediction,
                     caption = "Quantification table",