- 博客(9)
- 收藏
- 关注
原创 附件:Easyseq源码([7]mismatch)
use Cwd;close DATA;}else{}else{}else{close WH;$NF2=$NF;}else{$NP2=$NP;}else{$NR2=$NR;}else{
2024-08-04 12:08:54 495
原创 附件:Easyseq源码([4]mutation)
use Cwd;$pairs=1;close DATA;$pai=1;Primer;ID\n";close WH;$num=0;LOOP:do{$c1=0;
2024-08-04 12:05:43 1220
原创 附件:Easyseq源码([3]maplus)
use Cwd;$pairs=1;close DATA;$r=\@r;$pai=1;$mm=0;$n=0;LOOP:do{if($n==0){if($n==1){if($n==2){$c=0;
2024-08-04 12:04:23 1219
原创 附件:Easyseq源码([2]classify)
#!/usr/bin/perl use Bio::SeqIO; use Bio::Seq; use Tie::File; use Cwd; my $location_dir=getcwd; $location_dir=~s/\//\\/; my @file = glob("$location_dir\\*.filter"); foreach my $file(@file){ open(DATA,"<$file") or die "Can't open $file";
2024-08-04 12:02:44 283
原创 附件:Easyseq源码([1]match)
use Cwd;$pairs=1;close DATA;$c=0;$e=1;$OF=1;$OR=1;$OP=1;$NF2=1;$NR2=1;$NP2=1;{$OF=0;{$OR=0;{$OP=0;{$NF2=0;{$NR2=0;{$NP2=0;
2024-08-04 12:02:11 251
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人