From 9d7b542a1eb1eead875ad7f939936e4d8ac83145 Mon Sep 17 00:00:00 2001
From: Naeem Model <me@nmode.ca>
Date: Wed, 21 Jun 2023 06:17:43 +0000
Subject: Remove input args from output lists

---
 R/WP_known.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'R/WP_known.R')

diff --git a/R/WP_known.R b/R/WP_known.R
index 6b0e2ea..563b7ae 100644
--- a/R/WP_known.R
+++ b/R/WP_known.R
@@ -19,5 +19,5 @@ WP_known <- function(NT, p) {
     }
 
     Rhat <- sum(NT[-1]) / sum(mu_t)
-	return(list(Rhat=Rhat))
+	return(Rhat)
 }
-- 
cgit v1.2.3