24小时热门版块排行榜    

查看: 2009  |  回复: 7

amo11000

金虫 (小有名气)

[求助] 编写一个程序处理文本内容,删除长度<10,开头的,不以CTG结尾的那些序列

我有一个文本文件1.txt,内容如下:>序列名字1(序列名字可以任意长度)ATGgcggggccccATAGGGGGGTTCCUTG>序列名字2ATGgcggggccccAgTAGGGGGGTTCCUTG>序列名字3CTGgggggggccccccgggggutg。。。。。。后面还有很多序列

要求删除那些长度<10,不以ATG开头的,不以CTG结尾的那些序列。名字不包括在序列的长度内,最后得到的文件内容应该是:

>序列名字1(序列名字可以任意长度)ATGgcggggccccATAGGGGGGTTCCUTG>序列名字2ATGgcggggccccAgTAGGGGGGTTCCUTG。。。。。。后面还有很多序列。

由于序列3的开头字符不是ATG,而是CTG,所以被删除掉了。



谁能帮忙编写一个vb程序处理上面的问题啊?谢谢了
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lt292

金虫 (正式写手)

Holy Shit

jjdg(金币+1): 感谢参与 2012-02-29 02:23:02
vim 加 正则表达式就可以把
应该是一个linux shell脚本
记忆中的颜色,慢慢褪去,变成一缕缕的黑丝,最终消失在茫茫的空白里,一去不返```
2楼2012-02-28 23:14:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lurencyj

木虫 (著名写手)

jjdg(金币+1): 感谢参与 2012-02-29 02:23:10
不确定shell碰上了中文字符内容会不会傻眼。。。哈哈
很女子很弓虽大
3楼2012-02-28 23:15:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lijie169

铜虫 (著名写手)

【答案】应助回帖

感谢参与,应助指数 +1
c语言也可以,没碰到过vb的,应该很简单,1,循环读取文件的一行,2,对读取的行进行处理,神马长度<10,AtG开头的,3把符合要求的写入一个新的文件
4楼2012-02-29 14:37:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

361616004

新虫 (初入文坛)

VB……,真心不会,要是shell还行
5楼2012-02-29 15:28:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jackie1179

木虫 (正式写手)

dubo(金币+1): 欢迎讨论 2012-03-01 11:29:42
建议LZ考虑一下perl吧
6楼2012-03-01 09:49:25
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhaoqi699

新虫 (初入文坛)

【答案】应助回帖

感谢参与,应助指数 +1
你这是fasta格式的序列吧,并获得cds序列?
用perl按行读取,再用正则表达式筛选
7楼2012-03-01 10:48:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

christina1213

木虫 (正式写手)

【答案】应助回帖


感谢参与,应助指数 +1
jjdg(金币+1): 感谢参与 2012-03-09 03:03:14
用perl脚本吧,很方便,我写了一个大概,要根据自己的序列格式更改一下(也可能有一些小错误),你的格式应该是fasta格式的测序序列,>文件名应该是单独一行。
#!/usr/bin/perl
use strict;
use warnings;

open (INFILE,"<1.txt";
open (OUTFILE,">>out.txt";
while (my $line=<>
        {
                my $num=length($line);
                if (($num>9)&&(~m/^ATG/)&&(CTG$))
                        {
                        print OUTFILE $line;
                        }
                if (~m/^>/)
                        {
                        print OUTFILE $line; #这个地方要加一个怎样判断序列名称和你输出序列 的对应的语句。不然每个文件名都会输出,时间有限,我就这样简写了,抱歉了……
                        }
        }
close INFILE;
close OUTFILE;
8楼2012-03-08 20:08:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 amo11000 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 本人考085602 化学工程 专硕 +17 不知道叫什么! 2026-03-15 19/950 2026-03-19 15:06 by 尽舜尧1
[考研] 0703化学调剂 +3 18889395102 2026-03-18 3/150 2026-03-19 13:53 by houyaoxu
[考研] 346求调剂[0856] +3 WayneLim327 2026-03-16 6/300 2026-03-19 11:21 by WayneLim327
[考研] 一志愿吉林大学材料学硕321求调剂 +6 Ymlll 2026-03-18 9/450 2026-03-19 10:28 by 星空星月
[考研] 材料工程专硕调剂 +5 204818@lcx 2026-03-17 6/300 2026-03-18 22:55 by 204818@lcx
[考研] 328求调剂,英语六级551,有科研经历 +3 生物工程调剂 2026-03-17 7/350 2026-03-18 20:41 by Wangjingyue
[考研] 【同济软件】软件(085405)考研求调剂 +3 2026eternal 2026-03-18 3/150 2026-03-18 19:09 by 搏击518
[考研] 材料与化工一志愿南昌大学327求调剂推荐 +8 Ncdx123456 2026-03-13 9/450 2026-03-18 14:40 by haxia
[考研] 311求调剂 +11 冬十三 2026-03-15 12/600 2026-03-18 14:36 by 星空星月
[考研] 0854可跨调剂,一作一项核心论文五项专利,省、国级证书40+数一英一287 +8 小李0854 2026-03-16 8/400 2026-03-18 14:35 by 搏击518
[考研] 331求调剂(0703有机化学 +7 ZY-05 2026-03-13 8/400 2026-03-18 14:13 by 007_lilei
[考研] 0854,计算机类招收调剂 +3 胡辣汤放糖 2026-03-15 6/300 2026-03-18 12:09 by 上岸上岸……..
[考研] 265求调剂 +3 梁梁校校 2026-03-17 3/150 2026-03-18 09:12 by zhukairuo
[考研] 268求调剂 +8 一定有学上- 2026-03-14 9/450 2026-03-17 17:47 by laoshidan
[考研] 211本,11408一志愿中科院277分,曾在中科院自动化所实习 +6 Losir 2026-03-12 7/350 2026-03-17 12:09 by danranxie
[考研] 274求调剂 +5 时间点 2026-03-13 5/250 2026-03-17 07:34 by 热情沙漠
[考研] 085601材料工程315分求调剂 +3 yang_0104 2026-03-15 3/150 2026-03-15 10:58 by peike
[考研] 289求调剂 +4 这么名字咋样 2026-03-14 6/300 2026-03-14 18:58 by userper
[考研] 070303一志愿西北大学学硕310找调剂 +3 d如愿上岸 2026-03-13 3/150 2026-03-13 10:43 by houyaoxu
[考博] 福州大学杨黄浩课题组招收2026年专业学位博士研究生,2026.03.20截止 +3 Xiangyu_ou 2026-03-12 3/150 2026-03-13 09:36 by duanwu655
信息提示
请填处理意见