S-PLUS
mini course $BBh(B6$B2s(BS-PLUS mini course $B$N(B6$B2sL\$r$*FO$1$7$^$9!#(B
$B:#F|$O%4!<%k%G%s%&%#!<%/$NCfF|!"$*5Y$_$r$H$i$l$F$$$kJ}$b$9$/$J$/$J$$$H;W$$$^$9!J$&$i$d$^$7$$$G$9$M!K!#:#G/$O%+%l%s%@!<$N$;$$$+!"(BSARS$B$d%$%i%/@oAh$N1F6A$+!"$A$g$C$H$5$($J$$%4!<%k%G%s%&%#!<%/$@$H$*C2$-$NJ}$b$$$i$C$7$c$k$G$7$g$&$+!)$3$l$r5!2q$K(BS$B8@8l$NJY6/$G$b$7$F$_$^$7$g$&!J$+$J$jL5M}$,$"$j$^$9!&!&!&!K!#(B
$BA02s$N4X?t$O(B tapply
$B$H$$$&4X?t$G$7$?$,!"I|=,$7$F$_$^$7$g$&!#(B
$B%5%s%W%k$N%G!<%?%;%C%H(B fuel.frame
$B!J tapply $B$NBh(B1$B0z?t$KEv$F$O$a$k$3$H$,$G$-$k$N$O!"%Y%/%H%k$G$9$+$i(B > tapply(fuel.frame$Weight, fuel.frame$Type, mean) $B$H$7$^$9!J(B$$B$G%G!<%?!&%U%l!<%`$NMWAG!"8@$$49$($k$HJQ?t$rH4$-=P$7(B
$B$7$F$$$^$9$M!K!#Bh(B1$B0z?t$O%Y%/%H%k$G$"$kI,MW$,$"$j!"$=$N$?$a!"2s5"$N$h$&$K!"(B2$B$D0J>e$NJQ?t$,I,MW$K$J$k4X?t$NEv$F$O$a$,$G$-$J$$!"$H$$$&@)8B$,$"$j$^$9!#$G$O!"!V *********** $B:#2s$N4X?t(B ***************** $BEv$F$O$aJ}$J$I$O!"4pK\E*$K(B tapply $B$HF1$8$J$N$G$9$,!"Bh(B1$B0z?t$K%Y%/%H%k$G$O$J$/!"%G!<%?!&%U%l!<%`$rEv$F$O$a$k$3$H$,$G$-$^$9!#$H$$$&$3$H$O!"(B2$B$D0J>e$NJQ?t$rMQ$$$F9T$&7W;;$,$G$-$k$o$1$G$9$M!#(B $B$G$OAaB.!"7W;;$r$5$;$F$_$^$7$g$&!#$^$:$O!"@h$[$I$N(B
tapply $B$HF1MM!"(B (I%$B=E$5$NJ?6Q$r by(fuel.frame$Weight, fuel.frame$Type, mean) tapply
$B$HF1$8;XDjJ}K!$K$J$j$^$9$M!#7k2L$,!V%j%9%H!W$K$J$k$3$H$K(B
$BCm0U$7$F$/$@$5$$!#(B $B!&$G$O!"$b$&>/$7!"9bEY$J$3$H$r$7$F$_$^$7$g$&!#(Bfuel.frame
$B$N by(fuel.frame[, -5], fuel.frame$Type, cor) fuel.frame[, -5]$B$G!V(B5$BNsL\$N(B Type $B$r=|$/!W$H$J$j$^$9!#(B $B!&:G8e$K!"2s5"$r;n$7$F$_$^$7$g$&!#(B by(fuel.frame, fuel.frame$Type, function(data)lm(Mileage ~
Weight,data=data)) 3$B$DL\$N0z?t$,$$$^$^$G$N!V4X?tL>!W$+$i!V4X?tDj5A!W$K$J$C$F$$$^$9$M!#F0:n$rJ,2r$7$F9M$($^$9!#(B $B$H$$$&$3$H$K$J$j$^$9!#(Bby $B$K$O(B fuel.frame
$B$H$$$&%G!<%?!&%U%l!<%`$,(B
$B4]$4$HEO$5$l$^$9$,!"2s5"7W;;$K;H$o$l$k$N$O!"(BMileage $B$H(B
Weight $B$@$1$G$9$M!#(B $Be$2$^$9!#$*3Z$7$_$K!*(B
Compact Large Medium
Small Sporty
Van
2821 3676.667 3195.769 2257.692 2798.889 3517.143
by
***************************************
$B!J3t!K?tM}%7%9%F%`!T(BS-PLUS$B!U%0%k!<%W(B <splus-info@ml.msi.co.jp>
$B$*Ld$$9g$o$;!?;qNA@A5a(B$B$O$*5$7Z$K!#(B
