From 9189ab4a460daf4916c7e2c50a78310b83b8c0c0 Mon Sep 17 00:00:00 2001
From: Kuoi <starsareintherose@outlook.com>
Date: Wed, 2 Mar 2022 00:50:25 +0000
Subject: [PATCH] init

---
 stats.run | 23 +++++++++++++++++++++++
 tnt.run   | 27 +++++++++++++++++++++++++++
 2 files changed, 50 insertions(+)
 create mode 100644 stats.run
 create mode 100644 tnt.run

diff --git a/stats.run b/stats.run
new file mode 100644
index 0000000..dd28770
--- /dev/null
+++ b/stats.run
@@ -0,0 +1,23 @@
+macro= ;
+report- ;
+var =
+   0 themin
+   1 themax
+   + CIs [ ( ntrees + 1 ) ]
+   + RIs [ ( ntrees + 1 ) ]
+   + this
+;
+set themin minsteps ;
+set themax maxsteps ;
+loop 0 ntrees
+   progress #1 (ntrees+1) Calculating indices... ;
+   set this length[#1] ;
+   set CIs[#1] 'themin'/'this' ;
+   set RIs[#1] ('themax'-'this')/('themax'-'themin') ;
+   stop
+progress/ ;
+report= ;
+macfloat 3 ;
+maketable CIs Consistency index ;
+maketable RIs Retention index ;
+proc/ ;
diff --git a/tnt.run b/tnt.run
new file mode 100644
index 0000000..6e487e2
--- /dev/null
+++ b/tnt.run
@@ -0,0 +1,27 @@
+mxram 10240 ;
+nstates 32 ;
+nstates NOGAPS ;
+
+piwe=12;
+
+procedure file.tnt ;
+log tnt.log ;
+taxname= ;
+
+hold 100000 ;
+xpiwe(*; mult=replic 100 tbr hold 1000;
+xpiwe&; piwe&;
+export= trees.tre ;
+
+bbreak=tbr ;
+majority * ;
+
+ttags= ;
+resample boot replications 1000;
+ttags & bt.svg thickness 7 italics fontsize 15;
+export < bt.tre ;
+
+length * ;
+stats.run;
+
+quit ;