From a983f6c5ca940730cb316c5efb8d76c7093476c4 Mon Sep 17 00:00:00 2001
From: m-kolomanski <m.kolomanski@yahoo.com>
Date: Fri, 24 Jan 2025 08:20:48 +0100
Subject: [PATCH] fix: require `mydata` for `profiles_per_patient` calculation

---
 inst/shiny/tabs/nca.R | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/inst/shiny/tabs/nca.R b/inst/shiny/tabs/nca.R
index b7bf247..65248c1 100644
--- a/inst/shiny/tabs/nca.R
+++ b/inst/shiny/tabs/nca.R
@@ -288,6 +288,8 @@ output$datatable <- renderReactable({
 
 # Define a profiles per patient
 profiles_per_patient <- reactive({
+  req(mydate())
+
   # Check if res_nca() is available and valid
   if (!is.null(res_nca())) {
     res_nca()$result %>%