| Åë°è :: ¿¹º¸ Åë°è :: ¿¹ÃøÀº ¹Ì·¡ °¡Ä¡¸¦ °è»êÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
Åë°è :: ¿¹º¸ ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~falcao/Statistics-Forecast-0.3/Forecast.pm
Åë°è :: ¿¹º¸ ű×
Åë°è :: ¿¹º¸ ¼³¸í
Åë°è :: ¿¹ÃøÀº ¹Ì·¡ °¡Ä¡¸¦ °è»êÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. Åë°è :: ¿¹ÃøÀº ¹Ì·¡ °¡Ä¡¸¦ °è»êÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. ÀÌ°ÍÀº ±âÁ¸ °ªÀ» »ç¿ëÇÏ¿© ¹Ì·¡ °¡Ä¡¸¦ °è»êÇÏ´Â ´õ¹Ì ÁöÇâ ¿ÀºêÁ§Æ® ¸ðµâÀÔ´Ï´Ù. »õ °ªÀº ¼±Çü ȸ±Í ºÐ¼®À» »ç¿ëÇÏ¿© °è»êµË´Ï´Ù. STATISTISS :: ¿¹Ãø; ¿¹Ãø °´Ã¼ ¸¸µé±â MY $ fcct = statistics :: ¿¹Ãø -> »õ ( "³» ¿¹Ãø À̸§"); µ¥ÀÌÅÍ Ãß°¡ $ fcct -> {datax} = @ array_x; $ fcct -> {datay} = @array_y; $ fcct -> {nextx} = $ nightx; °á°ú¸¦ °è»êÇϽʽÿÀ $ fcct-> calc; °á°ú¸¦ ¾òÀ¸½Ê½Ã¿À. $ fress_forecast = $ fcct -> {frecasty); ¿¹ÃøÀ»À§ÇÑ internalsthe ¹æÁ¤½Ä : a + bx, 'x'´Â ¿¹Ãø µÈ °ª ¹× _ _ a = y + bx b = sum ((x + x)) / sum (xx) ** 2Methodsnewrecee´Â ¿¹Ãø À̸§À» ±â¾ïÇÏ°í Ãູ¹ÞÀº µ¥ÀÌÅÍ ±¸Á¶¸¦ Åë°è·Î ±â¾ïÇÏ°í ¹ÝȯÇÕ´Ï´Ù. ¿¹Ãø °³Ã¼. ³» $ fcct = Åë°è :: ¿¹Ãø -> »õ·Î¿î ( "³ªÀÇ ¿¹Ãø"); calccalculate ¹× ¿¹Ãø °ªÀ» ¹ÝȯÇÕ´Ï´Ù. $ fcct-> calc; µð¹ö±ë Á¦¾ÈÀ»À§ÇÑ ¾²·¹±â Àμâ. $ fcct-> ´ýÇÁ; sumx´Â x °ªÀÇ Çհ踦 ¹ÝȯÇÕ´Ï´Ù. my $ sumofx = $ fcct -> {sumx}; sumyreturns y °ªÀÇ ÇÕ°è. my $ sumofy = $ fcct -> {sumy}; sumxxxxx´Â x ** 2 °ªÀÇ Çհ踦 ÀÔ·ÂÇÕ´Ï´Ù. my $ sumofxx = $ fcct -> {sumxx}; sumxyreturns x * y °ªÀÇ ÇÕ°è. my $ sumofxy = $ fcct -> {sumxy}; avgx´Â x °ªÀÇ Æò±ÕÀÔ´Ï´Ù. MY $ AVGX = $ FCACT -> {AVGX}; AVGYRETÀº Y °ªÀÇ Æò±ÕÀ» ¹ÝȯÇÕ´Ï´Ù. My $ Avgy = $ Fcct -> {AVGY}; x °ªÀÇ ¼ö¸¦ nreturn. ³» $ n = $ fcct -> {n}; ¿¹Á¦ »ç¿ë Åë°è :: ¿¹Ãø; ³» @y = (1,3,7,12); ³» @x = (1,2,3,4); ³» $ fcct = Åë°è :: ¿¹Ãø -> »õ·Î¿î ( "³ªÀÇ ¿¹Ãø"); $ fcct -> {datax} = @x; $ fcct -> {datay} = @y; $ fcct -> {nextx} = 8; $ fcct-> calc; "¿¹Ãø", $ fcct -> {ferecastName} Àμâ Àμâ; "¿¹Ãø °¡Ä¡°¡ Àִ°¡ :", $ fcct -> {frecasty}, "n"; ¿ä±¸ »çÇ× : ¡¤ Perl ¿ä±¸ »çÇ× : ¡¤ Perl.
Åë°è :: ¿¹º¸ °ü·Ã ¼ÒÇÁÆ®¿þ¾î