¹ÙÀÌ¿À :: Seq :: PrimoryQual.

BIO :: SEQ :: PRIOMINGQUALÀº °æ·®ÀÇ Ç°Áú °³Ã¼°¡ÀÖ´Â BIOPERL ¸ðµâÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

¹ÙÀÌ¿À :: Seq :: PrimoryQual. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Chad Matsalla
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~birney/bioperl-1.4/Bio/Seq/PrimaryQual.pm

¹ÙÀÌ¿À :: Seq :: PrimoryQual. ű×


¹ÙÀÌ¿À :: Seq :: PrimoryQual. ¼³¸í

BIO :: SEQ :: PRIOMINGQUALÀº °æ·®ÀÇ Ç°Áú °³Ã¼°¡ÀÖ´Â BIOPERL ¸ðµâÀÔ´Ï´Ù. Bio :: Seq :: PrightQualÀº °æ·®ÀÇ Ç°Áú °´Ã¼°¡ÀÖ´Â BioPerl ¸ðµâÀÔ´Ï´Ù. ½Ä °Ë»ç´Â ¹ÙÀÌ¿À :: Seq :: PrimoryQualÀ» »ç¿ëÇÕ´Ï´Ù. # ´ç½ÅÀº Ç°Áú¿¡ ´ëÇÑ °ø°£ ±¸ºÐ µÈ ¹®ÀÚ¿­À» »ç¿ëÇÒ ¼ö ÀÖ½À´Ï´Ù $ string_quals = "102030304050403020"; MY $ QualoBJ = BIO :: Seq :: Prightqual-> New ( '-qual'=> $ string_quals, '-id'=> 'qualityFragment-12', '-accession_number'=> 'x78121',); # _OR_ @ Q2 = SPLIT / / /, $ string_qualsÀÇ ¹è¿­À» »ç¿ëÇÒ ¼ö ÀÖ½À´Ï´Ù. $ qualobj = bio :: seq :: primaryqual-> new ( '-qual'=> @ q2, '-primary_id'=> 'chads primary_id', '-desc'=> 'chads desc', '-accession_number'= > 'CHADS Accession_number', '-id'=> 'Chads ID'); # Ç°Áú °¡Ä¡¸¦ ¾òÀ¸·Á¸é : @quals = @ {$ qualobj-> qual ()}; # _new_ Ç°Áú °ªÀ»ÁÖ´Â °Í : $ newqualstring = "5090100020120 0"; $ qualobj-> qual ($ newqualstring); ¿ä±¸ »çÇ× : ¡¤ Perl.


¹ÙÀÌ¿À :: Seq :: PrimoryQual. °ü·Ã ¼ÒÇÁÆ®¿þ¾î