fix: default now can run

This commit is contained in:
kuoi 2023-09-17 02:37:10 +08:00
parent 3ddaad9393
commit b850f75098
2 changed files with 96 additions and 23 deletions

View file

@ -56,7 +56,7 @@ tnt run guoyi.run filename datatype weight K cons resample prefix,
- resample should be sum of what you want - resample should be sum of what you want
- jak=1, boot=2, relative bremer=4 i.e. jak+boot+bremer=7 (default) - jak=1, boot=2, relative bremer=4 sym=8 i.e. jak+boot+sym+bremer=15 (default)
- prefix can be empty or a string - prefix can be empty or a string

113
guoyi.run
View file

@ -28,8 +28,8 @@ if ( (argnumber == 0) | (argnumber >7) )
quote - | mjr=majority rule, hlf=half |; quote - | mjr=majority rule, hlf=half |;
quote - | str=strict (default) |; quote - | str=strict (default) |;
quote - | - resamp should be sum of what you want |; quote - | - resamp should be sum of what you want |;
quote - | jak=1, boot=2, relative bremer=4 |; quote - | jak=1, boot=2, relative bremer=4 sym=8 |;
quote - | i.e. jak+boot+bremer=7 (default) |; quote - | i.e. jak+boot+sym+bremer=15 (default) |;
quote - | - prefix can be empty, or a string |; quote - | - prefix can be empty, or a string |;
quote - | default is empty |; quote - | default is empty |;
quote - \----------------------------------------------------/; quote - \----------------------------------------------------/;
@ -37,9 +37,9 @@ if ( (argnumber == 0) | (argnumber >7) )
end end
/*Basic settings*/ /*Basic settings*/
taxname+1000; taxname+100;
taxname=; taxname=;
mxram 10240; mxram 500;
if(argnumber>=2) if(argnumber>=2)
nstates %2; nstates %2;
else else
@ -102,7 +102,7 @@ if ((ntax>25) && (ntax < 75))
quote - | TBR Mult will be performed. |; quote - | TBR Mult will be performed. |;
end end
if (ntax>=75) if (ntax>=75)
quote - | TBR Mult and Xmult will be performed. |; quote - | Xmult will be performed. |;
end end
if (argnumber>=5) if (argnumber>=5)
if (eqstring [ %5 mjr ]) if (eqstring [ %5 mjr ])
@ -140,9 +140,38 @@ quote - | Bootstrap and relative bremer support |;
if (%6==7) if (%6==7)
quote - | Jackknifing, bootstrap and relative bremer |; quote - | Jackknifing, bootstrap and relative bremer |;
end end
if (%6==8)
quote - | Symmetric resampling |;
end
if (%6==9)
quote - | Jackknifing and symmetric resampling |;
end
if (%6==10)
quote - | Bootstrap and symmetric resampling |;
end
if (%6==11)
quote - | Jackknifing, bootstrap and symmetric |;
quote - | resampling |;
end
if (%6==12)
quote - | Symmetric resampling and relative bremer |;
end
if (%6==13)
quote - | Jackknifing, symmetric resampling and |;
quote - | relative bremer |;
end
if (%6==14)
quote - | Bootstrap, symmetric resampling and |;
quote - | relative bremer |;
end
if (%6==15)
quote - | Jackknifing, bootstrap, symmetric |;
quote - | resampling and relative bremer support |;
end
end end
if (argnumber<6) if (argnumber<6)
quote - | Jackknifing, bootstrap and relative bremer |; quote - | Jackknifing, bootstrap, symmetric |;
quote - | resampling and relative bremer support |;
end end
quote - | will be shown on the resample.svg. |; quote - | will be shown on the resample.svg. |;
quote - | Apomorphic characters mapping will be shown |; quote - | Apomorphic characters mapping will be shown |;
@ -165,15 +194,19 @@ else
end end
/*Search trees*/ /*Search trees*/
if(eqstring [ %3 ew ] | eqstring [ %3 iw ] ) if(argnumber>2)
if (ntax<=25) if(eqstring [ %3 ew ] | eqstring [ %3 iw ] )
ienum; if (ntax<=25)
else ienum;
mult=replic 1000 tbr hold 1000; else
bbreak=tbr fill; if (ntax<=74)
if (ntax>74) mult=replic 1000 tbr hold 1000;
sect: slack 1000; bbreak=tbr fill;
xmult=hit 1000 noupdate replications 20 drift 10 ratchet 10 fuse 10 hold 1 keepall; end
if (ntax>74)
sect: slack 40;
xmult=hit 50 replications 20 drift 10 ratchet 10 fuse 10 hold 10 keepall;
end
end end
end end
else else
@ -181,7 +214,7 @@ else
bbreak=tbr fill; bbreak=tbr fill;
if (ntax>74) if (ntax>74)
sect: slack 1000; sect: slack 1000;
xmult=hit 1000 noupdate replications 20 drift 10 ratchet 10 fuse 10 hold 1 keepall; xmult=hit 50 replications 20 drift 10 ratchet 10 fuse 10 hold 10 keepall;
end end
end end
@ -262,12 +295,19 @@ ttags]; /*in one line*/
/* jak+boot=3, */ /* jak+boot=3, */
/* jak+brember=5, boot+bremer=6, */ /* jak+brember=5, boot+bremer=6, */
/* jak+boot+bremer=7, */ /* jak+boot+bremer=7, */
/* sym=8, */
/* jak+sym=9, boot+sym=10, bremer+sym=12 */
/* jak+boot+sym=11, jak+bremer+sym=13, */
/* boot+bremer+sym=14, */
/* jak+sym+boot+bremer=15 */
if (argnumber<=5) if (argnumber<=5)
/*jakknifing*/ /*jakknifing*/
resample jak replications 1000 from 0; resample jak replications 1000 from 0;
/*bootstrap*/ /*bootstrap*/
resample boot replications 1000 from 0; resample boot replications 1000 from 0;
/*symmetric resampling*/
resample sym replications 1000 from 0;
/*relative bremer*/ /*relative bremer*/
sub 1; hold +1000; bbreak=fill; sub 1; hold +1000; bbreak=fill;
sub 3; hold +3000; bbreak=fill; sub 3; hold +3000; bbreak=fill;
@ -275,15 +315,19 @@ if (argnumber<=5)
sub 7; hold +7000; bbreak=fill; sub 7; hold +7000; bbreak=fill;
bsupport[; bsupport[;
else else
if((%6==1) | (%6==3) | (%6==5) | (%6==7)) if((%6==1) | (%6==3) | (%6==5) | (%6==7) | (%6==9) | (%6==11) | (%6==13) | (%6==15))
resample jak replications 1000 from 0; resample jak replications 1000 from 0;
end end
if((%6==2) | (%6==3) | (%6==6) | (%6==7)) if((%6==2) | (%6==3) | (%6==6) | (%6==7) | (%6==10) | (%6==11) | (%6==14) | (%6==15))
resample boot replications 1000 from 0; resample boot replications 1000 from 0;
end end
if((%6==4) | (%6==5) | (%6==6) | (%6==7)) if((%6==8) | (%6==9) | (%6==10) | (%6==11) | (%6==12) | (%6==13) | (%6==14) | (%6==15))
resample sym replications 1000 from 0;
end
if((%6==4) | (%6==5) | (%6==6) | (%6==7) | (%6==12) | (%6==13) | (%6==14) | (%6==15))
sub 1; hold +1000; bbreak=fill; sub 1; hold +1000; bbreak=fill;
sub 3; hold +3000; bbreak=fill; sub 3; hold +3000; bbreak=fill;
sub 5; hold +5000; bbreak=fill; sub 5; hold +5000; bbreak=fill;
@ -371,9 +415,38 @@ quote - | support |;
quote - | jackknifing, bootstrap and |; quote - | jackknifing, bootstrap and |;
quote - | relative bremer support |; quote - | relative bremer support |;
end end
else if (%6==8)
quote - | symmetric resampling |;
end
if (%6==9)
quote - | Jackknifing and symmetric resample |;
end
if (%6==10)
quote - | Bootstrap and symmetric resample |;
end
if (%6==11)
quote - | jackknifing, bootstrap and |; quote - | jackknifing, bootstrap and |;
quote - | symmetric resample |;
end
if (%6==12)
quote - | relative bremer support and |;
quote - | symmetric resampling |;
end
if (%6==13)
quote - | Jackknifing, symmetric resample and |;
quote - | relative bremer support |; quote - | relative bremer support |;
end
if (%6==14)
quote - | bootstrap, symmetric resmaple and |;
quote - | relative bremer support |;
end
if (%6==15)
quote - | jackknifing, bootstrap, symmetric |;
quote - | resample and relative bremer support|;
end
else
quote - | jackknifing, bootstrap, symmetric |;
quote - | resample and relative bremer support|;
end end
quote - | The file `apo.svg` contain the |; quote - | The file `apo.svg` contain the |;