| ¹ÙÀÌ¿À :: µµ±¸ :: ipcress. BIO :: µµ±¸ :: iPCress´Â iPress Ãâ·ÂÀ» ±¸¹® ºÐ¼®ÇÏ°í ±â´ÉÀ» ¸¸µé ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
¹ÙÀÌ¿À :: µµ±¸ :: ipcress. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~sendu/
¹ÙÀÌ¿À :: µµ±¸ :: ipcress. ű×
¹ÙÀÌ¿À :: µµ±¸ :: ipcress. ¼³¸í
Bio :: Tools :: iPcress´Â iPress Ãâ·ÂÀ» ±¸¹® ºÐ¼®ÇÏ°í ±â´ÉÀ» ¸¸µé ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. Bio :: Tools :: iPcress´Â iPress Ãâ·ÂÀ» ±¸¹® ºÐ¼® ÇÒ ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. Ispress µ¥ÀÌÅÍ°¡ ÀÌ¹Ì Seq1.IPCress #¿¡¼ ipcress µ¥ÀÌÅÍ°¡ ÀÌ¹Ì »ý¼ºµÇ°í ½ÃÄö½º µ¥ÀÌÅÍ°¡ FASTA Çü½ÄÀ¸·Î °¡Á¤ÇÏ´Â iPCress µ¥ÀÌÅÍ #¿¡ ´ëÇÑ °£´ÜÇÑ ÁÖ¼® ÆÄÀÌÇÁ ¶óÀÎ ·¡ÆÛÀÔ´Ï´Ù. seq1.fa¶ó´Â ÆÄÀÏ¿¡¼ bio :: µµ±¸ :: ipcress; ¹ÙÀÌ¿À :: Seqio; MY $ PARSER = NEW BIO :: TOOLS :: iPCRESS (-file => seq1.ipcress '); MY $ SEQIO = NEW BIO :: SEQIO (- FORFAT => 'FASTA', -FILE => 'SEQ1.FA'); ³» $ seq = $ seqio-> next_seq || ´ÙÀÌ ( "seqio¿¡¼ seq °´Ã¼¸¦ ¾òÀ» ¼ö ¾øÀ½"); while (my $ feat = $ parser-> next_feature) {# ½ÃÄö½º $ seq-> add_seqfeature ($ feat)¿¡ ipcress ÁÖ¼®À» Ãß°¡ÇϽʽÿÀ. } My $ Seqout = New Bio :: Seqio (- format => embl '); $ seqout-> write_seq ($ seq);ÀÌ °´Ã¼´Â iPcress µ¥ÀÌÅÍÀÇ Æļ ¿ªÇÒÀ» ¼öÇàÇÏ¿© °¢ iPcress È÷Æ®¿¡ ´ëÇÑ ¹ÙÀÌ¿À :: Seqfeaturei¸¦ ¸¸µì´Ï´Ù. À̵éÀº ÀÚµ¿È µÈ ÁÖ¼®À» À§ÇØ ±âÁ¸ÀÇ ¹ÙÀÌ¿À :: SEQI °´Ã¼¿¡ ´ëÇÑ ÁÖ¼®À¸·Î 󸮵ǰųª Ãß°¡ µÉ ¼ö ÀÖ½À´Ï´Ù.ÀÌ ¸ðµâÀº Jason Stajich (jason-at-bioperl.org) ÀÛ¼ºµÈ ¹ÙÀÌ¿À :: µµ±¸ :: epcr ¸ðµâ¿¡¼ Àû¿ëµË´Ï´Ù. .IPCRESS °¡ÀÌ ½½·¹ÀÌÅÍÀÇ ¿Ü¼³ ÆÐÅ°Áö http://www.ebi.ac.uk/~guy/exonerate/ ¿ä±¸ »çÇ× : ¡¤ Perl.
¹ÙÀÌ¿À :: µµ±¸ :: ipcress. °ü·Ã ¼ÒÇÁÆ®¿þ¾î