Advanced Circos 视频大赛评分逻辑

一个月过去了，终于在陪伴家人的空闲时间，对大伙的打分进行了累计

一共有 124 位朋友给出了自己最喜欢的 Circos 图排序。

image.png
按照这个排序，设定了打分方式是：
针对每一个打分：排序一给4分；排序二给3分；排序三给2分；排序四给1分。

撰写对应命令

perl -lane '@rank=split /\s*/,$_;$i=0;for(@rank){$score{$rank[$i]}+=(4-$i)}END{for(sort keys %score){print join qq{\t},$_,$score{$_}}}' score.txt

OK，准备发奖了，有朋友已经上传了视频，详细见B站。