Åë°è :: ´ÙÁß Å×½ºÆ®

¿©·¯ Å×½ºÆ® ¹®Á¦¿¡¼­ À߸øµÈ °Ë»ö ¼Óµµ Á¦¾î
Áö±Ý ´Ù¿î·Îµå

Åë°è :: ´ÙÁß Å×½ºÆ® ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Zuguang Gu
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~jokergoo/

Åë°è :: ´ÙÁß Å×½ºÆ® ű×


Åë°è :: ´ÙÁß Å×½ºÆ® ¼³¸í

Åë°è :: ´ÙÁß Å×½ºÆ®´Â ¿©·¯ Å×½ºÆ® ¹®Á¦¿¡¼­ À߸øµÈ °Ë»ö ¼Óµµ¸¦ Á¦¾îÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. Åë°è Å×½ºÆ®, p °ªÀº À߸øµÈ ±àÁ¤ÀÇ È®·üÀÔ´Ï´Ù. µ¿½Ã¿¡ Å×½ºÆ®ÇÏ´Â µ¥ ¸¹Àº °¡¼³ÀÌ ¸¹ÀÌ ÀÖÁö¸¸ Àû¾îµµ ÇϳªÀÇ °ÅÁþ ±àÁ¤Àû ÀÎ È®·üÀÌ Ä¿Áú È®·üÀÌ Ä¿Áý´Ï´Ù. µû¶ó¼­ ¿øÁ¡ P °ªÀº °ÅÁþ ¹ß°ß À²À» ³·Ãß±â À§ÇØ Á¶Á¤µÇ¾î¾ßÇÕ´Ï´Ù. ¸Þ¼ÒµåÀÇ À̸§Àº R. ÄÚµåÀÇ STAT ÆÐÅ°Áö¿¡¼­ p.adjust¿¡¼­ ÆÄ»ýµË´Ï´Ù. list :: Vectorize module.all 6 ¼­ºê ·çƾÀ» »ç¿ëÇÏ¿© rl¿¡¼­ perl¿¡¼­ perlÀ» »ç¿ëÇÏ¿© ¹è¿­ ÂüÁ¶ ¶Ç´Â Çؽà ÂüÁ¶ ÀÏ ¼öÀÖ´Â ÇϳªÀÇ Àμö¸¦ ¼ö½ÅÇÕ´Ï´Ù. ¹× »ó±â Á¶Á¤ µÈ P °ªÀ» ÇØ´ç µ¥ÀÌÅÍ ±¸Á¶·Î µÇµ¹¸³´Ï´Ù. ¾î·¹ÀÌÀÇ Ç׸ñÀÇ ¼ø¼­´Â Á¶Á¤ ÈÄ¿¡ º¯°æµÇÁö ¾Ê½À´Ï´Ù. ½Ä ³ëÇÁ°¡ »ç¿ë Åë°è :: ´ÙÁß QW (Bonferroni Holm Hommel Hochberg BH·Î); Åë°è¸¦ »ç¿ëÇϽʽÿÀ :: ´ÙÁß QW (: ¸ðµÎ); ¾ö°ÝÇÑ »ç¿ë; ³» $ p; # p-values´Â ÂüÁ¶ $ P = À» ÂüÁ¶ÇÏ¿© ¹è¿­¿¡ ÀúÀåÇÒ ¼ö ÀÖ½À´Ï´Ù. # @ $ res´Â @ $ p°¡ °°Àº ¼ø¼­¸¦ °¡Áö°í ÀÖ½À´Ï´Ù. MY $ RES = BH ($ P); Àμ⠰¡ÀÔ "\ n", @ $ res; # p-values´Â $ p = { ""=> 0.01, "b"0.02, "c"=> 0.05, "d"=> 0.41, "e"=> 0.16, "f"=> 0.51}; # $ RES´Â $ P $ RES = HOLM ($ P)°ú µ¿ÀÏÇÑ Çؽà ÂüÁ¶À̱⵵ÇÕ´Ï´Ù. foreach (sort {$ res -> {a} $ res -> {$ b}} Å° % $ res) {$ _ $ _ => $ res -> {$ _} \ n "; } Á¦Ç°ÀÇ È¨ÆäÀÌÁö


Åë°è :: ´ÙÁß Å×½ºÆ® °ü·Ã ¼ÒÇÁÆ®¿þ¾î