模板:Clade

	{{{1}}}

[查看 | 编辑 | 历史 | 清除缓存]文档页面

该模板用于说明带有可点击链接的节点和基本标签的分支树。它们特别适合表示进化树。

用法


{{clade
|label1=基础
|1=节点
}}

输出

基础	节点


{{clade
|1={{clade
   |label1=[[橡树]]
   |1=橡树树叶节点
   |label2=金合欢树
   |2=[[金合欢树叶节点]]
   }}
}}

输出

橡树	橡树树叶

金合欢树	金合欢树叶


{{clade| style=font-size:75%;line-height:75%
|1={{clade
   |label1=子树1
   |1=叶节点1
   |label2=子树2
   |2=叶节点2
   }}
}}

输出

子树1	叶节点1

子树2	叶节点2


{{clade
|1={{clade
   |1={{clade | thickness=3
      |1=叶节点1
      |2=叶节点2
      }}
   |2=叶节点3
   }}
}}

输出

	叶节点1

	叶节点2

叶节点3

要将实线替换为虚线，使用|stateN=dashed:


{{clade
|1={{clade
   |1={{clade
      |1=叶节点1|state1=dashed
      |2=叶节点2
      }}
   |2=叶节点3
   }}
}}

输出

	叶节点1

	叶节点2

叶节点3

提示

创建较大条形图的一种简单方法是使用Newick格式，然后使用合适的文本编辑器对其进行编辑以生成标记。

从Newick格式（(a,b),(c,d)）开始
更换“(”为“{{clade|”
更换“)”为“}}”
用管道符和数字替换逗号
如果需要，可以编辑分支树标签


{{clade
 |1={{clade
    |1=a
    |2=b
    }}
 |2={{clade
    |1=c
    |2=d
    }}
}}

Perl脚本示例可自动执行转换：

use constant N=>"\n";
use constant T=>"\t";

my $tree='((a,b),(c,d));'; # get sequence
$tree=~s/[\n\r]//g; # loose those spaces
$tree=~ s/\:[\.\d]+//g; # loose those lengths
while ($tree=~ m/\(/) {
foreach my $clade ($tree=~ m/\(([^\(\)]+)\)/g) {
my @branches=split /\,/,$clade;
s/(\t+)/$1\t/g for @branches;
die 'ERROR: degenerate/empty node!'.N if $#branches<1;
$tree=~ s/\(\Q$clade\E\)/${\join('','')}/; # substitute
}
pos($tree)=0;
}
$tree=~s/(\t*)\t\}\}/$1\}\}/g; # lazy fix

print $tree;

使用框

你可以嵌套模板并在文本周围使用链接。你也可以使用不间断空格（ ）来获取空格或使用带有空格的标签。

整个活动图可以放置在一个框中，以便文本在其周围流畅排列。