| ¼öÇÐ :: ¹«ÀÛÀ§ :: MT :: Auto. ¼öÇÐ :: RANDAR :: MT :: AUTO´Â ÀÚµ¿ ½ÃÆ® MERSENNE TWISTER PRNG ¿ë PERL ¸ðµâÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
¼öÇÐ :: ¹«ÀÛÀ§ :: MT :: Auto. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Jerry D. Hedden
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~jdhedden/
¼öÇÐ :: ¹«ÀÛÀ§ :: MT :: Auto. ű×
¼öÇÐ :: ¹«ÀÛÀ§ :: MT :: Auto. ¼³¸í
¼öÇÐ :: Random :: MT :: Auto´Â ÀÚµ¿ ½ÃÆ® Mersenne Twister Prng ¿ë Perl ¸ðµâÀÔ´Ï´Ù. ¼öÇÐ :: ¹«ÀÛÀ§ :: MT :: AUTO´Â ÀÚµ¿ ½Ãµå µÈ MERSENNE TWISTER PRNGS.SYNOPSIS¸¦ »ç¿ëÇÏ´Â PERL ¸ðµâÀÔ´Ï´Ù. °æ°í¸¦ »ç¿ëÇϽʽÿÀ. Math :: Random :: MT :: Auto QW (Rand Irand Shuffle Gaussian), '/ dev / urandom'=> 256, 'random_org'; # ±â´ÉÀû ÀÎÅÍÆäÀ̽º MY $ DIE_ROLL = 1 + int (RAND (6)); ³» $ COIN_FLIP = (iRand () ¹× 1)? 'Çìµå': '²¿¸®'; ³» $ deck = shuffle (1 .. 52); ³» $ RAND_IQ = °¡¿ì½º (15, 100); # oo ÀÎÅÍÆäÀ̽º My $ PRNG = Math :: Random :: MT :: Auto-> New ( 'Source'=> / dev / random '); ³» $ °¢µµ = $ PRNG-> ·£µå (360); MY $ DECAY_INTERVAL = $ PRNG-> Áö¼ö (12.4); MERSENNE TWISTER´Â ¹èÃâ µÉ ¼öÀÖ´Â ÀÀ¿ë ÇÁ·Î±×·¥¿¡ "°íÇ°Áú"ÀÇ»ç µ¥ÀÌÅÍÀÇ ´ë¿ë·® (> 10 ^ 6004)À» Á¦°ø ÇÒ ¼öÀÖ´Â ºü¸¥ ÀÇ»ç ¶õ´õ ¹øÈ£ »ý¼º±â (PRNG)ÀÔ´Ï´Ù. »ç¿ë °¡´ÉÇÑ "ÁøÁ¤ÇÑ"¹«ÀÛÀ§ µ¥ÀÌÅÍ ¼Ò½º ¶Ç´Â rand.this ¸ðµâ°ú °°Àº ½Ã½ºÅÛ Á¦°ø PRNG´Â Mersenne Twister.There´Â ´ÜÀÏ, µ¶¸³Çü PRNG ¹× OO ÀÎÅÍÆäÀ̽º¿¡ ´ëÇÑ ±â´ÉÀû ÀÎÅÍÆäÀ̽ºÀÔ´Ï´Ù (³»ºÎ - ¿©·¯ PRNG ¿ÀºêÁ§Æ®¸¦ »ý¼ºÇϱâÀ§ÇÑ °´Ã¼ :: idionout ¸ðµâ¿¡ ÀÇÇØ ±¸Çö µÈ °´Ã¼ ¸ðµ¨À» out. PRNG´Â »ç¿ëÀÚ°¡ ¼±ÅÃÇÒ ¼öÀÖ´Â ¼Ò½º¿¡¼ (19968 ºñÆ®) ¹«ÀÛÀ§ ½Ãµå¸¦ ÀÚµ¿À¸·Î ȹµæÇÏ´Â ÀÚü Á¾ÀÚÀÔ´Ï´Ù. ¡¤ Perl ¿ä±¸ »çÇ× : ¡¤ Perl.
¼öÇÐ :: ¹«ÀÛÀ§ :: MT :: Auto. °ü·Ã ¼ÒÇÁÆ®¿þ¾î