method defaults

seroanalytics · Sep 15, 2024 · 864f79d · 864f79d
1 parent eaba00d
commit 864f79d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/api.R b/R/api.R
@@ -160,7 +160,7 @@ read_dataset <- function(req, name, scale) {
   list(data = dat, xcol = xcol)
 }
 
-model_out <- function(dat, xcol, method, span, k) {
+model_out <- function(dat, xcol, method, span = 0.75, k = 10) {
   n <- nrow(dat)
   if (n == 0) {
     return(list(x = list(), y = list()))