24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 383  |  回复: 3
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

xiezhancnu

木虫 (小有名气)

[求助] perl程序求助~ 已有2人参与

chr        start        end
chr10        2        4
chr1        2        3
chr3        2        4
chr1        1        2
chr2        1        3
chr10        3        5

排序成:
chr        start        end
chr1        1        2
chr1        2        3
chr2        1        3
chr3        2        4
chr10        2        4
chr10        3        5
首先按照第一列染色体顺序排chr1 chr2 ……chr9,chr10,chr11……chr21,chr22,chrX,chrY
相同染色体则按照位置的前后顺序进行排列。

先谢过!
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

上官神速

新虫 (初入文坛)

【答案】应助回帖

@ARGV==1 || die "No way";
my ($text) = @ARGV;
my @tmp;
my $hd;
open($hd,"< $text" || die "can not open it";
while(<$hd>
{
      chomp;
          s/^\s+//g;
          s/chr//;
          s/\s+/-/;
          push(@tmp,$_);
}
my @sorted = sort {$a <=> $b } @tmp;
foreach(@sorted){s/\-/ /g;print "chr$_\n";}


结果:chr1 2        3
chr1 1        2
chr2 1        3
chr3 2        4
chr10 2        3
chr10 3        5
4楼2015-06-12 16:39:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 4 个回答

退化or进化

木虫 (著名写手)

【答案】应助回帖

感谢参与,应助指数 +1
为什么要自己写perl脚本呢?Linux下的sort不就可以完成?或者更专业的用bedtools啊...
2楼2015-05-08 08:32:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

上官神速

新虫 (初入文坛)

【答案】应助回帖

@ARGV==1 || die "No way";
my ($text) = @ARGV;
my @tmp;
my $hd;
open($hd,"< $text" || die "can not open it";
while(<$hd>
{
      chomp;
          s/\s+//g;
          s/chr//;
          push(@tmp,$_);
}
my @sorted = sort {$a <=> $b } @tmp;
foreach(@sorted){s/(.*)([0-9])([0-9])$/$1 $2 $3/;print "chr$_\n";}
结果:
chr1 1 2
chr1 2 3
chr2 1 3
chr3 2 4
chr10 2 4
chr10 3 5
3楼2015-06-12 16:22:29
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 304求调剂 +4 曼殊2266 2026-03-27 4/200 2026-03-28 07:22 by Iveryant
[考研] 材料求调剂一志愿哈工大324 +6 闫旭东 2026-03-28 7/350 2026-03-28 04:36 by wxiongid
[考研] 一志愿华东理工大学081700,初试分数271 +6 kotoko_ik 2026-03-23 7/350 2026-03-27 12:29 by 惠州彭于晏
[考研] 333求调剂 +3 question挽风 2026-03-23 3/150 2026-03-27 11:29 by 不吃魚的貓
[考研] 材料求调剂 +5 .m.. 2026-03-25 5/250 2026-03-27 11:08 by 不吃魚的貓
[考研] 284求调剂 +11 junqihahaha 2026-03-26 12/600 2026-03-27 04:37 by wxiongid
[考研] 【双一流院校新能源、环境材料,材料加工与模拟招收大量调剂】 +4 Higraduate 2026-03-22 8/400 2026-03-26 20:34 by Higraduate
[考研] 281求调剂 +3 亚克西good 2026-03-26 5/250 2026-03-26 19:48 by 不吃魚的貓
[考研] 086000生物与医药292求调剂 +6 小小陈小小 2026-03-22 9/450 2026-03-26 15:58 by dick_runner
[考研] 材料科学与工程 317求调剂 +4 JKSOIID 2026-03-26 4/200 2026-03-26 15:58 by 不吃魚的貓
[考研] 081700 调剂 267分 +11 迷人的哈哈 2026-03-23 11/550 2026-03-26 15:41 by zzll406
[考研] 环境专硕324分求调剂推荐 +5 轩小宁—— 2026-03-26 5/250 2026-03-26 12:05 by i_cooler
[考研] 求调剂 +3 QiMing7 2026-03-25 3/150 2026-03-25 21:13 by 给你你注意休息
[考研] B区考研调剂 +4 yqdszhdap- 2026-03-22 5/250 2026-03-25 08:51 by baoball
[考研] 材料专硕331求调剂 +4 鲜当牛 2026-03-24 4/200 2026-03-24 15:58 by JourneyLucky
[考研] 085404电子信息284分求调剂 +4 13659058978 2026-03-24 4/200 2026-03-24 12:15 by syl20081243
[基金申请] 请教下大家 2026年国家基金申请是双盲审吗? +3 lishucheng1 2026-03-22 5/250 2026-03-24 08:22 by gltch
[考研] 工科0856求调剂 +5 沐析汀汀 2026-03-21 5/250 2026-03-23 17:56 by 海瑟薇-
[考研] 一志愿070300浙大化学358分,求调剂! +4 酥酥鱼.. 2026-03-21 4/200 2026-03-23 08:12 by Iveryant
[考研] 一志愿深大,0703化学,总分302,求调剂 +4 七月-七七 2026-03-21 4/200 2026-03-21 18:20 by 学员8dgXkO
信息提示
请填处理意见