From 41a1d17b81cadd653945e799f61e1cf3729a7a33 Mon Sep 17 00:00:00 2001
From: Ian <ian.c.bacher@gmail.com>
Date: Mon, 9 Dec 2024 09:52:37 -0500
Subject: [PATCH] Lower threshold for pre-calculated risk scores

200 seems to be too high as the number of pediatric patients seems to be
around 100-150 / wk; weird that this hasn't triggered issues before...
---
 docker-resources/plumber.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/docker-resources/plumber.R b/docker-resources/plumber.R
index cdb18a2..3ad65e3 100644
--- a/docker-resources/plumber.R
+++ b/docker-resources/plumber.R
@@ -295,7 +295,7 @@ get_week_number <- function(date) {
 predict_risk <- function(.data, cohort, age_category) {
   # arbitrary cut-off, but we expect one big batch per week
   # and several small batches; small batches are handled by this if
-  if (nrow(.data) < 200) {
+  if (nrow(.data) < 50) {
     cutoffs <- DBI::dbGetQuery(
       my_pool,
       DBI::sqlInterpolate(