CSV形式のデータのRによる重回帰分析のメモ

###CSV形式で以下のようなデータがあった時の基本的な重回帰分析のフローのメモです。
ファイル名:data.csv

Y	X1	X2	X3
1	2	3	4
5	6	7	8
9	10	11	12
13	14	15	16
17	18	19	20
21	22	23	24
25	26	27	28
29	30	31	32
33	34	35	36
37	38	39	40

####データ読み込み

sample=read.csv("data.csv")

####線形重回帰

model=lm(Y~., data=sample)

####その要約出力

summary(model)

####変数選択実行

smodel=step(model)

####その要約出力

summary(smodel)