loess(formula, data, weights, subset, na.action, span = 0.75,
      enp.target, degree = 2, parametric = F, drop.square = F,
      normalize = T, family = c("gaussian", "symmetric"),
      model = F, control, ...)
Cleveland, W.S., and Devlin, S.J., (1988) Locally-weighted Regression: An Approach to Regression Analysis by Local Fitting. J. Am. Statist. Assoc., Vol. 83, pp 596-610.
Cleveland, W.S., and Grosse, E. (1991) Computational Methods for Local Regression. Statistics and Computing, Vol. 1.
attach(ethanol)
loess(NOx ~ C * E, span = 1/2, degree = 2,
      parametric = "C", drop.square = "C")
#  produces the following output:
  Call:
  loess(formula = NOx ~ C * E, span = 1/2, degree = 2, parametric = "C",
  drop.square = "C")
   Number of Observations:          88
   Equivalent Number of Parameters: 9.2
   Residual Standard Error:         0.1842
   Multiple R-squared:              0.98
   Residuals:
       min   1st Q  median   3rd Q    max
   -0.5236 -0.0973 0.01386 0.07345 0.5584