version 1.81, 2003/06/05 15:41:51
|
version 1.83, 2003/06/10 13:39:11
|
Line 1
|
Line 1
|
/* $Id$ |
/* $Id$ |
|
$State$ |
|
$Log$ |
|
Revision 1.83 2003/06/10 13:39:11 lievre |
|
*** empty log message *** |
|
|
|
Revision 1.82 2003/06/05 15:57:20 brouard |
|
Add log in imach.c and fullversion number is now printed. |
|
|
|
*/ |
|
/* |
Interpolated Markov Chain |
Interpolated Markov Chain |
|
|
Short summary of the programme: |
Short summary of the programme: |
Line 120
|
Line 130
|
#endif |
#endif |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* $Log$ |
|
* Revision 1.81 2003/06/05 15:41:51 brouard |
|
* *** empty log message *** |
|
* |
|
/* Revision 1.80 2003/06/05 15:34:14 brouard |
|
/* Trying to add the true revision in the program and log |
|
/* |
|
/* Revision 1.79 2003/06/05 15:17:23 brouard |
|
/* *** empty log message *** |
|
/* */ |
|
/* $Revision$ */ |
|
/* $Date$ */ |
|
/* $State$ */ |
/* $State$ */ |
|
|
char version[80]="Imach version 0.95a1, June 2003, INED-EUROREVES "; |
char version[]="Imach version 0.95a1, June 2003, INED-EUROREVES "; |
char fullversion[]="$Revision$ $Date$"; |
char fullversion[]="$Revision$ $Date$"; |
int erreur; /* Error number */ |
int erreur; /* Error number */ |
int nvar; |
int nvar; |
Line 3003 m=pow(2,cptcoveff);
|
Line 3001 m=pow(2,cptcoveff);
|
fprintf(ficgp,"\nset out \"p%s%d%d.png\" \n",strtok(optionfile, "."),cpt,k1); |
fprintf(ficgp,"\nset out \"p%s%d%d.png\" \n",strtok(optionfile, "."),cpt,k1); |
fprintf(ficgp,"set xlabel \"Age\" \nset ylabel \"Probability\" \nset ter png small\nset size 0.65,0.65\nplot [%.f:%.f] \"pij%s\" u ($1==%d ? ($3):1/0):($%d/($%d",ageminpar,agemaxpar,fileres,k1,k+cpt+1,k+1); |
fprintf(ficgp,"set xlabel \"Age\" \nset ylabel \"Probability\" \nset ter png small\nset size 0.65,0.65\nplot [%.f:%.f] \"pij%s\" u ($1==%d ? ($3):1/0):($%d/($%d",ageminpar,agemaxpar,fileres,k1,k+cpt+1,k+1); |
|
|
for (i=1; i<= nlstate ; i ++) |
for (i=1; i< nlstate ; i ++) |
fprintf(ficgp,"+$%d",k+i+1); |
fprintf(ficgp,"+$%d",k+i+1); |
fprintf(ficgp,")) t\"prev(%d,%d)\" w l",cpt,cpt+1); |
fprintf(ficgp,")) t\"prev(%d,%d)\" w l",cpt,cpt+1); |
|
|