tss.bed的获取


wget http://hgdownload.soe.ucsc.edu/goldenPath/hg38/database/refFlat.txt.gz
zcat refFlat.txt.gz | perl -alne '{next if /^#/;if($F[3] eq "+"){$start=$F[4]-2500;$end=$F[4]+2500}else{$start=$F[5]-2500;$end=$F[5]+2500}print join("\t",$F[2],$start,$end,$F[12],0,$F[3])}' | sort -u > hg38.refseq.tss.bed


 wget http://hgdownload.soe.ucsc.edu/goldenPath/hg19/database/refFlat.txt.gz^C
 zcat refFlat.txt.gz | perl -alne '{next if /^#/;if($F[3] eq "+"){$start=$F[4]-2500;$end=$F[4]+2500}else{$start=$F[5]-2500;$end=$F[5]+2500}print join("\t",$F[2],$start,$end,$F[12],0,$F[3])}' | sort -u > hg19.refseq.tss.bed
©著作权归作者所有,转载或内容合作请联系作者
【社区内容提示】社区部分内容疑似由AI辅助生成,浏览时请结合常识与多方信息审慎甄别。
平台声明:文章内容(如有图片或视频亦包括在内)由作者上传并发布,文章内容仅代表作者本人观点,简书系信息发布平台,仅提供信息存储服务。

相关阅读更多精彩内容

友情链接更多精彩内容