List of 13
 $ coefficients : Named num [1:4] -64.3421   1.6521  -3.3336   0.0598
  ..- attr(*, "names")= chr [1:4] "(Intercept)" "Temp" "Wind" "Solar.R"
 $ residuals    : Named num [1:111]   7.955   1.001 -12.823  -0.475  -9.261 ...
  ..- attr(*, "names")= chr [1:111] "1" "2" "3" "4" ...
 $ effects      : Named num [1:111] -443.5  243.8  106.7  -54.6  -11.0 ...
  ..- attr(*, "names")= chr [1:111] "(Intercept)" "Temp" "Wind" "Solar.R" ...
 $ rank         : int 4
 $ fitted.values: Named num [1:111] 33.0 35.0 24.8 18.5 32.3 ...
  ..- attr(*, "names")= chr [1:111] "1" "2" "3" "4" ...
 $ assign       : int [1:4] 0 1 2 3
 $ qr           :List of 5
  ..$ qr   : num [1:111, 1:4] -10.536   0.095   0.095   0.095   0.095 ...
  .. ..- attr(*, "dimnames")=List of 2
  .. .. ..$ : chr [1:111] "1" "2" "3" "4" ...
  .. .. ..$ : chr [1:4] "(Intercept)" "Temp" "Wind" "Solar.R"
  .. ..- attr(*, "assign")= int [1:4] 0 1 2 3
  ..$ qraux: num [1:4] 1.09 1.05 1.07 1.19
  ..$ pivot: int [1:4] 1 2 3 4
  ..$ tol  : num 0.0000001
  ..$ rank : int 4
  ..- attr(*, "class")= chr "qr"
 $ df.residual  : int 107
 $ na.action    :Class 'omit'  Named int [1:42] 5 6 10 11 25 26 27 32 33 34 ...
  .. ..- attr(*, "names")= chr [1:42] "5" "6" "10" "11" ...
 $ xlevels      : list()
 $ call         : language lm(formula = Ozone ~ Temp + Wind + Solar.R, data = airquality)
 $ terms        :Classes 'terms', 'formula' length 3 Ozone ~ Temp + Wind + Solar.R
  .. ..- attr(*, "variables")= language list(Ozone, Temp, Wind, Solar.R)
  .. ..- attr(*, "factors")= int [1:4, 1:3] 0 1 0 0 0 0 1 0 0 0 ...
  .. .. ..- attr(*, "dimnames")=List of 2
  .. .. .. ..$ : chr [1:4] "Ozone" "Temp" "Wind" "Solar.R"
  .. .. .. ..$ : chr [1:3] "Temp" "Wind" "Solar.R"
  .. ..- attr(*, "term.labels")= chr [1:3] "Temp" "Wind" "Solar.R"
  .. ..- attr(*, "order")= int [1:3] 1 1 1
  .. ..- attr(*, "intercept")= int 1
  .. ..- attr(*, "response")= int 1
  .. ..- attr(*, ".Environment")=length 1  
  .. ..- attr(*, "predvars")= language list(Ozone, Temp, Wind, Solar.R)
  .. ..- attr(*, "dataClasses")= Named chr [1:4] "numeric" "numeric" "numeric" "numeric"
  .. .. ..- attr(*, "names")= chr [1:4] "Ozone" "Temp" "Wind" "Solar.R"
 $ model        :'data.frame':	111 obs. of  4 variables:
  ..$ Ozone  : int [1:111] 41 36 12 18 23 19 8 16 11 14 ...
  ..$ Temp   : int [1:111] 67 72 74 62 65 59 61 69 66 68 ...
  ..$ Wind   : num [1:111] 7.4 8 12.6 11.5 8.6 13.8 20.1 9.7 9.2 10.9 ...
  ..$ Solar.R: int [1:111] 190 118 149 313 299 99 19 256 290 274 ...
  ..- attr(*, "terms")=Classes 'terms', 'formula' length 3 Ozone ~ Temp + Wind + Solar.R
  .. .. ..- attr(*, "variables")= language list(Ozone, Temp, Wind, Solar.R)
  .. .. ..- attr(*, "factors")= int [1:4, 1:3] 0 1 0 0 0 0 1 0 0 0 ...
  .. .. .. ..- attr(*, "dimnames")=List of 2
  .. .. .. .. ..$ : chr [1:4] "Ozone" "Temp" "Wind" "Solar.R"
  .. .. .. .. ..$ : chr [1:3] "Temp" "Wind" "Solar.R"
  .. .. ..- attr(*, "term.labels")= chr [1:3] "Temp" "Wind" "Solar.R"
  .. .. ..- attr(*, "order")= int [1:3] 1 1 1
  .. .. ..- attr(*, "intercept")= int 1
  .. .. ..- attr(*, "response")= int 1
  .. .. ..- attr(*, ".Environment")=length 1  
  .. .. ..- attr(*, "predvars")= language list(Ozone, Temp, Wind, Solar.R)
  .. .. ..- attr(*, "dataClasses")= Named chr [1:4] "numeric" "numeric" "numeric" "numeric"
  .. .. .. ..- attr(*, "names")= chr [1:4] "Ozone" "Temp" "Wind" "Solar.R"
  ..- attr(*, "na.action")=Class 'omit'  Named int [1:42] 5 6 10 11 25 26 27 32 33 34 ...
  .. .. ..- attr(*, "names")= chr [1:42] "5" "6" "10" "11" ...
 - attr(*, "class")= chr "lm"