ÃÑ 327ÆäÀÌÁö

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

À§ÇèÆò°¡¸¦ À§ÇÑ Á¤·®Æò°¡¹ý ¼Ò°³ - RÀ» ÀÌ¿ëÇÑ À̷аú ½Ç½À
CODE
CODE
#³­¼öÃßÃâ
#³­¼öÃßÃâ
x
x
#nameÇÒ´ç
#´©ÀûºÐÆ÷±×·¡ÇÁ±×¸®±â
names(x)
plot(ecdf(x),xlim=c(-5,40),main="Binomial
#¸·´ë±×·¡ÇÁ±×¸®±â
(1200,0.02)")
barplot(x, xlim=c(0, 50), axes=FALSE,
main="Binamial(1200,0.02)")
y_axis_tick=seq(0,0.09,by=0.01)
axis(side=2,at=y_axis_tick)
(a)
(b)
±×¸² 3-8 ÀÌÇ׺ÐÆ÷ [Binomial(1200,2%)]. (a) È÷½ºÅä±×¶÷ (b) ´©ÀûºÐÆ÷
162

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



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