From f441828a08da2146ffee3bfe2fb5ba8874cd4705 Mon Sep 17 00:00:00 2001
From: Ivan Svetunkov <ivan@svetunkov.com>
Date: Sun, 1 Dec 2024 15:27:08 +0000
Subject: [PATCH] Fixed a typo

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

diff --git a/R/adam-sma.R b/R/adam-sma.R
index 35d44daf..3389af62 100644
--- a/R/adam-sma.R
+++ b/R/adam-sma.R
@@ -144,7 +144,7 @@ sma <- function(y, order=NULL, ic=c("AICc","AIC","BIC","BICc"),
             stop("The provided model is not Simple Moving Average!",call.=FALSE);
         }
         else{
-            order <- model$order[1];
+            order <- model$orders[1];
         }
     }