S-PLUS for Windows $B=iJb$N=iJb(B Chapter9

9.$B@~7A2s5"(B


$B2s5"$O(B[$BE}7W(B]$B%a%K%e!<$N(B[$B2s5"(B]$B$+$i(B[$B@~7A(B]$B$rA*$S$^$9!#(B

($B?^(B9-1 [$BE}7W(B]$B%a%K%e!<$N(B[$B2s5"(B]$B$N(B[$B@~7A(B]$B$O0lHV>e(B)

$B@~7A2s5"$N%@%$%"%m%0$O!"A0>O$N(B[$BE}7WNL(B]$B$d(B[$BAj4X(B]$B$H$O>/!98+$?L\$N0[$J$k%@%$%"%m%0$G$9$,!"4pK\E*$J9M$(J}$OF1$8$G$9!#(B

($B?^(B9-2 $B@~7A2s5"(B(Linear Regression)$B%@%$%"%m%0(B)

$B?^(B9-1$B$G!N@~7A!O$r%/%j%C%/$9$k$H!"?^(B9-2$B$N$h$&$K(BModel$B%?%V$,3+$$$?>uBV$N(BLiner Regression$B$N%@%$%"%m%0$,3+$-$^$9!#(B

Data$B%;%/%7%g%s$N(BData Frame$B%j%9%H$G!"%G!<%?%U%l!<%`$,;XDj$5$l$F$$$k$N$O!"(B[$BE}7WNL(B]$B$d(B[$BAj4X(B]$B$J$I$HF1$8$G$9!#0[$J$k$N$O!"JQ?t$N;XDjJ}K!$G$9!#(B

$BJQ?t$N;XDj$O!"(BData$B%;%/%7%g%s$N2<$K$"$k(BFormula$B%;%/%7%g%s$G9T$$$^$9!#@~7A2s5"$N>l9g$O!"$3$3$G%b%G%k$H$J$k2s5"<0$r:n$j!"$=$N<0$KBP$7$FJ,@O$,9T$o$l$^$9!#(BFormula$B%j%9%H$KD>@\5-=R$7$F$b$$$$$N$G$9$,!"JQ?tL>$N5-=R$J$I$,LLE]$/$5$$$N$G!"DL>o$O(B[Create Formula]$B%\%?%s$r%/%j%C%/$7$F(BFormula$B%@%$%"%m%0$r5/F0$7!"$=$3$GJQ?t$N;XDj$J$I$r9T$$$^$9!#(B

($B?^(B9-3 Formula$B%@%$%"%m%0(B)

$B@~7A2s5"$O!"=>B0JQ?t!aFHN)JQ?t!_78?t!\FHN)JQ?t!_78?t!\(I%%%$B!\Dj?t(B $B$H$$$&<0$K$J$k$N$G!"JQ?t$N;XDj$b$3$N7A<0$G9T$$$^$9!#$3$3$G$O$H$j$"$($:!"(BMileage$B$r=>B0JQ?t$K!"(BWeight$B$H(BDisp.$B$rFHN)JQ?t$H$$$&$3$H$K$7$^$7$g$&!#(B

$B:G=i$K(BVariables$B%;%/%7%g%s$N!"(BChoose Variables$B$G(BMileage$B$r%/%j%C%/$7$^$9!#B0JQ?t$J$N$G!"$3$3$O(B[Response]$B%\%?%s$r%/%j%C%/$7$^$9!#(B

$B$=$&$9$k$H!"?^(B9-4$B$N$h$&$K(BFormula$B%j%9%H$K(BMileage~$B$H$$$&I=<($,=P$^$9!#$3$N(B~($B%A%k%@(B)$B$,$H$F$bBg;v$G$9!#=>B0JQ?t$N;XDj$O!"$3$l$@$1$G=*$j$G$9!#(B

($B?^(B9-4 Formula$B%j%9%HFb$K(BMileage~$B$H$$$&5-=R$,F~$k(B)

$B

($B?^(B9-5 Mileage~Weight+Disp.$B$H$J$k(B)

$B$3$l$G%b%G%k<0$N:n@.$O=*$j$G$9!#(BOK$B%\%?%s$r%/%j%C%/$7$F!"A0$N2hLL$KLa$j$^$9!#La$C$F$-$?2hLL$G$b!"(BFormula$B%;%/%7%g%s$K$OF1$8%b%G%k<0$,F~$C$F$$$^$9!#(B

($B?^(B9-6 Formula$B$K<0$,F~$C$?>uBV(B)

$B$3$l$G!N(BOK$B!O%\%?%s$r2!$9$H!"J,@O$,

($B?^(B9-7 $B@~7A2s5"$N=PNO(B)

$B@~7A2s5"$r

($B?^(B9-8 $B%G%U%)%k%H$G=PNO$5$l$k%W%m%C%H(B)

$BI=<($5$l$k%0%i%U%&%#%s%I%&$O!"0l$D$G$9!#$7$+$7?^(B9-8$B$r8+$l$P$o$+$k$h$&$K!"%&%#%s%I%&$N2<$K%Z!<%8%?%V(B(Page1$B!A(BPage4)$B$,$D$$$F$$$k$3$H$+$i$b$o$+$k$h$&$K!";M$D$N%0%i%U$,=PNO$5$l$F$$$^$9!#%Z!<%8%?%V$r%/%j%C%/$9$l$P!"3F%0%i%U$rI=<($G$-$^$9!#(B

$B$3$3$GI=<($5$l$k%W%m%C%H$O!"@~7A2s5"%@%$%"%m%0(B(Liner Regression$B%@%$%"%m%0(B)$B$N(BPlot$B%?%V(B($B;0$DL\$N%?%V(B)$B$G;XDj$5$l$^$9!#(B

($B?^(B9-9 $B@~7A2s5"(B(Liner Regression)$B%@%$%"%m%0(B)Plot$B%?%V(B)

$B%0%i%U$NJ]B8$K$D$$$F$O!"O$G@bL@$7$^$9!#(B

$B!J(B $BLa$k(B $B $B!K(B

$B$40U8+!"$446A[$O(BNTT$B%G!<%??tM}%7%9%F%`(BS-PLUS$B%0%k!<%W(B <splus-info@ml.msi.co.jp>