From 49159067e2c430b81ca77108128d0d94a7a2f9a8 Mon Sep 17 00:00:00 2001
From: Adam Kucharski <adam.kucharski@lshtm.ac.uk>
Date: Wed, 29 May 2024 14:52:10 +0100
Subject: [PATCH] Export epinow2_cmdstan_model() function (#684)

* Export epinow2_cmdstan_model() function

* undo breaking

* update documentation

---------

Co-authored-by: Sebastian Funk <sebastian.funk@lshtm.ac.uk>
---
 NAMESPACE                    | 1 +
 R/stan.R                     | 2 +-
 man/epinow2_cmdstan_model.Rd | 1 -
 3 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/NAMESPACE b/NAMESPACE
index b477eeea6..9f562113c 100644
--- a/NAMESPACE
+++ b/NAMESPACE
@@ -38,6 +38,7 @@ export(dist_fit)
 export(dist_skel)
 export(dist_spec)
 export(epinow)
+export(epinow2_cmdstan_model)
 export(estimate_delay)
 export(estimate_infections)
 export(estimate_secondary)
diff --git a/R/stan.R b/R/stan.R
index 63ad24495..204134793 100644
--- a/R/stan.R
+++ b/R/stan.R
@@ -15,7 +15,7 @@
 #' @param ... Additional arguments passed to [cmdstanr::cmdstan_model()].
 #'
 #' @return A `cmdstanr` model.
-#' @keywords internal
+#' @export
 epinow2_cmdstan_model <- function(model = "estimate_infections",
                                   dir = system.file(
                                     "stan", package = "EpiNow2"
diff --git a/man/epinow2_cmdstan_model.Rd b/man/epinow2_cmdstan_model.Rd
index ddd496399..c87c5772f 100644
--- a/man/epinow2_cmdstan_model.Rd
+++ b/man/epinow2_cmdstan_model.Rd
@@ -30,4 +30,3 @@ A \code{cmdstanr} model.
 The function has been adapted from a similar function in the epinowcast
 package (Copyright holder: epinowcast authors, under MIT License).
 }
-\keyword{internal}