r - AIC スコアを使用して重回帰モデルを比較することができます

Question

AIC スコアを使用して重回帰モデルを比較することは可能ですか?

これが私のコードです

 library(data.table)

 Regressions<- 
 data.table(February)[, 
                      .(Lm = lapply(.SD, function(x) summary(lm(February$PPNA ~ February$Acum1 + x)))),
                      .SDcols = 80:157]