fix issue #1732

paul-buerkner · Jan 31, 2025 · e10ab04 · e10ab04
1 parent 75cde6a
commit e10ab04
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/stanvars.R b/R/stanvars.R
@@ -98,7 +98,7 @@ stanvar <- function(x = NULL, name = NULL, scode = NULL,
         if (length(x) == 1L) {
           scode <- paste0("int ", name)
         } else {
-          scode <- paste0("int ", name, "[", length(x), "]")
+          scode <- paste0("array[", length(x), "] int ", name)
         }
       } else if (is.vector(x)) {
         if (length(x) == 1L) {