typo

ForModLabUHel · Apr 20, 2020 · a99bc98 · a99bc98
1 parent 06eb57b
commit a99bc98
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/multiSitePrebas.r b/R/multiSitePrebas.r
@@ -49,7 +49,7 @@ InitMultiSite <- function(nYearsMS,
   # nSp <- siteInfo[,9]
   climIDs <- siteInfo[,2]
   # if(all(is.na(multiInitVar)) & all(is.na(nSp)) nSp <- rep(3,nSites)
-  allSp = dim(pCROBAS)[2]#max(siteInfo[,9])#ncol(pCROBAS)
+  allSp = ncol(pCROBAS)
   varNam <- getVarNam()
   nVar <- length(varNam)