Changeset 0afebdc in tol

Timestamp:

Sep 17, 2009, 11:27:56 AM (17 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

cd15fee

Parents:

8107325

Message:

Fixes #746

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@1389 be4846ae-f051-483a-831f-b64e7d08527f

File:

• tol/btol/bmodel/estim.cpp (modified) (3 diffs)

tol/btol/bmodel/estim.cpp

@@ -1017 +1017 @@
 {
   BUserTimeSerie* z      = Tsr(Arg(1));
-  BSerieTable   zTable; zTable.AddSerie(z);
-
+  if(!z->IsStochastic())
+  {
+    Error(I2
+    (
+     "Cannot apply BoxCoxTrans to an infinite time series.",
+     "No se puede aplicar BoxCoxTrans a una serie infinita"
+    ));
+    return;
+  }
+  BSerieTable   zTable; 
+  zTable.AddSerie(z);
+  zTable.Fill(z->FirstDate(), z->LastDate());
   BInt period = 10;
   if(Arg(3)) { period = (BInt)Real(Arg(3)); }
@@ -1035 +1045 @@
     ));
   }
-
+  if(zTable.NumDates()<=3*period)
+  {
+    Error(I2
+    (
+     "Cannot apply BoxCoxTrans to a time series with length ",
+     "No se puede aplicar BoxCoxTrans a una serie temporal de longitud "
+    )+
+    zTable.NumDates()+" <= 3*intervalLength = "+(3*period));
+  }
   if(Arg(2))
   {
@@ -1052 +1070 @@
       Warning(I2
       (
-       "Empty options parameter in BoxCoxTransfunction. "
+       "Empty options parameter in BoxCoxTrans function. "
        "It is assumed the defect value :",
        "Parámetro de opciones vacío en función BoxCoxTrans. "