From 637fdb3179b9f670c66a5304e604187898ce8d0e Mon Sep 17 00:00:00 2001
From: Kai Aragaki <adamaragaki@gmail.com>
Date: Mon, 13 Nov 2023 11:31:27 -0500
Subject: [PATCH] feat: check for cols in dil_summary

---
 R/qp_report.R | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/R/qp_report.R b/R/qp_report.R
index cc8e603..820cf80 100644
--- a/R/qp_report.R
+++ b/R/qp_report.R
@@ -233,6 +233,11 @@ make_well_circles_plot <- function(df) {
 }
 
 dil_summary <- function(qp) {
+  check_has_cols(qp, c(
+    ".sample_name", ".pred_conc_mean", ".target_conc",
+    ".target_vol", "sample_type"
+  ))
+
   qp |>
     dplyr::summarize(
       .by = c(