RÀ» ÀÌ¿ëÇÏ¿© ´ÙÀ½À» ÀÛ¼ºÇϽÿÀ.
1. ±³Àç ¿¬½À¹®Á¦ 1Àå. 2¹ø, 5¹ø (10Á¡)
1) 2¹ø
ÀÚµ¿Â÷ÀÇ ¹«°Ô°¡ ¹«°Å¿ì¸é À̸¦ ¿òÁ÷ÀÌ´Â µ¥ ´õ ¸¹Àº ¿¬·á°¡ ¼Ò¸ðµÈ´Ù´Â °ÍÀº ¾Ë·ÁÁø »ç½ÇÀÌ´Ù. ÀÚµ¿Â÷ÀÇ ¹«°Ô¿Í ÀÚµ¿Â÷¸¦ 1km ¿òÁ÷ÀÌ´Â µ¥ ÇÊ¿äÇÑ ¿¡³ÊÁö·®°úÀÇ ÇÔ¼ö°ü°è¸¦ Á¤È®È÷ ÆÇ´ÜÇϱâ À§ÇÏ¿© AÀÚµ¿Â÷ȸ»ç´Â ´ÙÀ½ÀÇ ÀڷḦ ½ÇÇèÀ» ÅëÇÏ¿© ¾ò¾ú´Ù. ½ÇÇèºñ¿ëÀÌ ¸¹ÀÌ µå´Â °ü°è·Î 9¹ø¸¸ ½ÇÇèÇÏ¿´´Ù.[ex1-2.csv]
(1) x¿¡ ´ëÇÑ yÀÇ È¸±ÍÁ÷¼±À» ±¸ÇϽÿÀ. ÀÌ ÀÚ·áÀÇ »êÁ¡µµ¸¦ ±×¸®°í, ȸ±ÍÁ÷¼±À» »êÁ¡µµ À§¿¡ ±×·Á ³Ö¾î½Ã¿À.
¨çÄÚµå
# ȸ±ÍÁ÷¼±
x [- c(0.9, 1.3, 2.1, 2.5, 2.4, 1.7, 0.7, 1.2, 1.6)
y [- c(2.0, 2.6, 4.3, 5.8, 5.1, 3.2, 1.8, 2.3, 3.0)
reg [- lm(y~x) # ´Ü¼ø¼±Çüȸ±Í¸ðÇü ÀûÇÕ
summary(reg) # ȸ±Í°è¼ö µî Ãâ·Â
# »êÁ¡µµ¿Í ȸ±ÍÁ÷¼± ½Ã°¢È
plot(x, y, main¡ëx¿Í yÀÇ »êÁ¡µµ, col¡ëblue, pch¡ë19)
abline(lm(y~x), col¡ëred, lwd¡ë2) # ȸ±Í¼± Ãß°¡
¨è°á°ú
ÄÚµå ½ÇÇà °á°ú ±×¸² »ý·«
À§ ȸ±ÍºÐ¼® °á°ú¿¡ µû¶ó, ÀýÆí ÃßÁ¤Ä¡´Â -0.1157ÀÌ°í ±â¿ï±âÀÇ ÃßÁ¤Ä¡´Â 2.1626ÀÌ´Ù. µû¶ó¼ ÃßÁ¤µÈ ȸ±Í½ÄÀº ´ÙÀ½°ú °°´Ù.
|