ÃÑ 327ÆäÀÌÁö

134ÆäÀÌÁö º»¹®½ÃÀÛ

¥±. À§ÇèºÐ¼®ÀÇ Åë°èÀû ÀÌ·Ð
¹Ì»ý¹° ³óµµÀÇ º¯µ¿¼º¿¡ ºÒÈ®½Ç¼ºÀÌ Æ÷ÇÔµÈ ºÐÆ÷´Â ´ÙÀ½°ú °°ÀÌ Á¤¸®ÇÒ ¼ö ÀÖ´Ù. ±×¸²
1-10Àº ¿ø·¡ÀÇ ºÐÆ÷¿¡ ´ëÇÏ¿© ºÒÈ®½Ç¼ºÀ» º¯È­½ÃŲ °á°ú¸¦ ¿¹½ÃÇÑ °ÍÀÌ´Ù.
(¥¡) º¯µ¿¼º¸¸À» °í·ÁÇÒ °æ¿ì: ³óµµ = Normal(¥ì,¥ò)=RiskNormal(6,5)
(¥¢) º¯µ¿¼º°ú ºÒÈ®½Ç¼ºÀ» µ¿½Ã¿¡ °í·ÁÇÒ °æ¿ì: ³óµµ = Normal(¥ì,¥ò)
¥ì = Risk Triang(2,6,10)
¥ò = Risk Triang(1,5,9)
CODE
install.packages("triangle")
library(triangle)
#rnorm()ÇÔ¼ö¸¦ÀÌ¿ëÇÏ¿©¹ÐµµÇÔ¼ö±×·¡ÇÁ±×¸®±â
plot(density(rnorm(50000,6,5)),xlim=c(-20,30),ylim=c(0,0.1),main="DistributionforA2")
par(new=TRUE) #±×·¡ÇÁ°ãÃı׸®±â
#xº¯¼ö¹×µ¥ÀÌÅÍÇÁ·¹ÀÓ»ý¼º
x
z
#for¹Ýº¹¹®À»ÀÌ¿ëÇØtrinagleºÐÆ÷¹×normalºÐÆ÷Àdz­¼öÃßÃâ
for(iin1:10000){a
b
x
z[i,1]
119

134ÆäÀÌÁö º»¹®³¡



ÇöÀç Æ÷Ä¿½ºÀÇ ¾Æ·¡³»¿ëµéÀº µ¿ÀÏÇÑ ÄÁÅÙÃ÷¸¦ °¡Áö°í ÆäÀÌÁö³Ñ±è È¿°ú¹× ½Ã°¢Àû È¿°ú¸¦ Á¦°øÇÏ´Â ÆäÀÌÁöÀ̹ǷΠ½ºÅ©¸°¸®´õ »ç¿ëÀÚ´Â ¿©±â±îÁö¸¸ ³¶µ¶ÇϽðí À§ÀÇ ÆäÀÌÁöÀ̵¿ ¸µÅ©¸¦ »ç¿ëÇÏ¿© ´ÙÀ½ÆäÀÌÁö·Î À̵¿ÇϽñ⠹ٶø´Ï´Ù.
»ó´Ü¸Þ´º ¹Ù·Î°¡±â ´ÜÃàÅ°¾È³» : ÀÌÀüÆäÀÌÁö´Â ÁÂÃø¹æÇâÅ°, ´ÙÀ½ÆäÀÌÁö´Â ¿ìÃø¹æÇâÅ°, ùÆäÀÌÁö´Â »ó´Ü¹æÇâÅ°, ¸¶Áö¸·ÆäÀÌÁö´Â ÇϴܹæÇâÅ°, ÁÂÃøÈ®´ëÃà¼Ò´Â insertÅ°, ¿ìÃøÈ®´ëÃà¼Ò´Â deleteÅ°