Summary: Still a problem for one-step probabilities in case of quantitative variables

diff --git a/src/imach.c b/src/imach.c
index 38cc7eb60bb1f629eb33d2f1a693820985af0f6e..6e6928e22d44f3f5a60caaabba3e720258bf6c01 100644 (file)
--- a/src/imach.c
+++ b/src/imach.c
@@ -1,6 +1,9 @@
 /* $Id$
   $State$
   $Log$
+  Revision 1.326  2022/07/26 17:33:55  brouard
+  Summary: some test with nres=1
+
   Revision 1.325  2022/07/25 14:27:23  brouard
   Summary: r30
 
@@ -6965,7 +6968,9 @@ To be simple, these graphs help to understand the significativity of each parame
           cov[2+nagesqr+Tage[k]]=nbcode[Tvar[Tage[k]]][codtabm(j1,k)]*cov[2];
           /* cov[++k1]=nbcode[Tvar[Tage[k]]][codtabm(ij,k)]*cov[2]; */
         } else if(Dummy[Tage[k]]==3){ /* quantitative with age */
-          cov[2+nagesqr+Tage[k]]=Tqresult[nres][k];
+          printf("Internal IMaCh error, don't know which value for quantitative covariate with age, Tage[k]%d, k=%d, Tvar[Tage[k]]=V%d, age=%d\n",Tage[k],k ,Tvar[Tage[k]], (int)cov[2]);
+          exit(1);
+            /* cov[2+nagesqr+Tage[k]]=meanq[k]/idq[k]*cov[2];/\* Using the mean of quantitative variable Tvar[Tage[k]] /\* Tqresult[nres][k]; *\/ */
           /* cov[++k1]=Tqresult[nres][k];  */
         }
         /* cov[2+Tage[k]+nagesqr]=nbcode[Tvar[Tage[k]]][codtabm(ij,k)]*cov[2]; */