R/drawApex.cfit.R

setMethodS3("drawApex", "cfit", function(fit, ...) {
  X <- t(fit);
  X <- X[,1];
  X <- t(X);
  points(X, ...);
})

###########################################################################
# HISTORY:
# 2008-08-31
# o Added drawApex() for class cfit to be compatible with the newer 
#   expectile package.
###########################################################################
HenrikBengtsson/sfit documentation built on Nov. 12, 2022, 8:26 p.m.