version 1.354, 2023/05/21 05:05:17
|
version 1.356, 2023/05/23 12:08:43
|
Line 1
|
Line 1
|
/* $Id$ |
/* $Id$ |
$State$ |
$State$ |
$Log$ |
$Log$ |
|
Revision 1.356 2023/05/23 12:08:43 brouard |
|
Summary: 0.99r46 |
|
|
|
* imach.c (Module): Fixed PROB_r |
|
|
|
Revision 1.355 2023/05/22 17:03:18 brouard |
|
Summary: 0.99r46 |
|
|
|
* imach.c (Module): In the ILK....txt file, the number of columns |
|
before the covariates values is dependent of the number of states (16+nlstate): 0.99r46 |
|
|
Revision 1.354 2023/05/21 05:05:17 brouard |
Revision 1.354 2023/05/21 05:05:17 brouard |
Summary: Temporary change for imachprax |
Summary: Temporary change for imachprax |
|
|
Line 7623 void varprob(char optionfilefiname[], do
|
Line 7634 void varprob(char optionfilefiname[], do
|
double ***varpij; |
double ***varpij; |
|
|
strcpy(fileresprob,"PROB_"); |
strcpy(fileresprob,"PROB_"); |
strcat(fileresprob,fileres); |
strcat(fileresprob,fileresu); |
if((ficresprob=fopen(fileresprob,"w"))==NULL) { |
if((ficresprob=fopen(fileresprob,"w"))==NULL) { |
printf("Problem with resultfile: %s\n", fileresprob); |
printf("Problem with resultfile: %s\n", fileresprob); |
fprintf(ficlog,"Problem with resultfile: %s\n", fileresprob); |
fprintf(ficlog,"Problem with resultfile: %s\n", fileresprob); |
Line 8443 void printinggnuplot(char fileresu[], ch
|
Line 8454 void printinggnuplot(char fileresu[], ch
|
kvar=Tvar[TvarFind[kf]]; /* variable name */ |
kvar=Tvar[TvarFind[kf]]; /* variable name */ |
/* k=18+Tvar[TvarFind[kf]];/\*offset because there are 18 columns in the ILK_ file but could be placed else where *\/ */ |
/* k=18+Tvar[TvarFind[kf]];/\*offset because there are 18 columns in the ILK_ file but could be placed else where *\/ */ |
/* k=18+kf;/\*offset because there are 18 columns in the ILK_ file *\/ */ |
/* k=18+kf;/\*offset because there are 18 columns in the ILK_ file *\/ */ |
k=19+kf;/*offset because there are 19 columns in the ILK_ file */ |
/* k=19+kf;/\*offset because there are 19 columns in the ILK_ file *\/ */ |
|
k=16+nlstate+kf;/*offset because there are 19 columns in the ILK_ file, first cov Vn on col 21 with 4 living states */ |
for (i=1; i<= nlstate ; i ++) { |
for (i=1; i<= nlstate ; i ++) { |
fprintf(ficgp,"\nset out \"%s-p%dj-%d.png\";set ylabel \"Probability for each individual/wave\";",subdirf2(optionfilefiname,"ILK_"),i,kvar); |
fprintf(ficgp,"\nset out \"%s-p%dj-%d.png\";set ylabel \"Probability for each individual/wave\";",subdirf2(optionfilefiname,"ILK_"),i,kvar); |
fprintf(ficgp,"unset log;\n# For each simple dummy covariate of the model \n plot \"%s\"",subdirf(fileresilk)); |
fprintf(ficgp,"unset log;\n# For each simple dummy covariate of the model \n plot \"%s\"",subdirf(fileresilk)); |