Merge pull request #36 from sbegueria/devel

spi(): adding verbose to the list of parameters
sbegueria · May 26, 2022 · 6202848 · 6202848
2 parents f4952c5 + 308275b
commit 6202848
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/.DS_Store b/.DS_Store
diff --git a/R/spi.R b/R/spi.R
@@ -7,9 +7,9 @@ spi <- function(x, y,...) UseMethod('spi')
 #' 
 spi <- function(data, scale, kernel=list(type='rectangular',shift=0),
 	distribution='Gamma', fit='ub-pwm', na.rm=FALSE,
-	ref.start=NULL, ref.end=NULL, x=FALSE, params=NULL, ...){
+	ref.start=NULL, ref.end=NULL, x=FALSE, params=NULL, verbose=TRUE, ...){
 	sol <- spei(data, scale, kernel, distribution, fit, na.rm,
-		ref.start, ref.end, x, params)
+		ref.start, ref.end, x, params, verbose)
 	sol$call <- match.call(expand.dots=FALSE)
 
 	return(sol)