agree.nex

生物信息学中的遗传数据分析的delphi源码。

#NEXUS

[COMPONENT file saved Wed, 27 January 1993 3:43 PM]

BEGIN TAXA;
	DIMENSIONS NTAX=21;
	TAXLABELS
		a
		e
		f
		d
		c
		b
		g
		h
		i
		j
		k
		l
		m
		n
		p
		r
		s
		t
		u
		w
		z
	;
ENDBLOCK;

BEGIN TREES;

[!
> Two example trees from "Greatest common agreement structures"
> by Kubicka, Kubicka, and McMorris (1991, preproposal).
]
	TRANSLATE
		  1 a,
		  2 e,
		  3 f,
		  4 d,
		  5 c,
		  6 b,
		  7 g,
		  8 h,
		  9 i,
		 10 j,
		 11 k,
		 12 l,
		 13 m,
		 14 n,
		 15 p,
		 16 r,
		 17 s,
		 18 t,
		 19 u,
		 20 w,
		 21 z
	;
	UTREE T1=(1,((6,(5,(4,(2,3)))),(7,((10,(8,9)),(11,(12,(13,(14,(15,((18,(16,17)),(19,(20,21))))))))))));
	UTREE T2=(1,((12,(2,((11,(21,(10,20))),((15,18),(19,(16,17)))))),(((5,(3,(4,6))),(8,9)),(7,(13,14)))));
ENDBLOCK;