--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/rDiff/src/locfit/m/residuals.m	Thu Feb 14 23:38:36 2013 -0500
@@ -0,0 +1,23 @@
+function y = residuals(fit,type)
+
+% Residuals (or a few other things) from a locfit() fit.
+%
+% Input arguments:
+%   fit - the locfit() fit.
+%   type (optional) type of residuals. Valid types are
+%     'dev'    (deviance, the default)
+%     'd2'     (deviance squared)
+%     'pearson'(Pearson)
+%     'raw'    (observed - fitted)
+%     'ldot'   (derivative of log-likelihood)
+%     'lddot'  (second derivative)
+%     'fit'    (fitted values - no transformation)
+%     'mean'   (fitted values - with back transformation)
+%
+%  Author: Catherine Loader.
+
+if (nargin<2) type = 'dev'; end;
+  
+y = predict(fit,'d','restyp',type);
+
+return;