R/bigRR_update.R

Defines functions bigRR_update

Documented in bigRR_update

bigRR_update <-
function(obj, Z, family = gaussian(link = identity), tol.err = 1e-6, tol.conv = 1e-8, GPU = FALSE)
{
	w <- as.numeric(obj$u^2/(1 - obj$leverage))
	w[w < tol.err] <- tol.err
	# Z.updated <- t(sqrt(w)*t(Z)) ## bug fixed 111201 -- xia
	bigRR(y = obj$y, X = obj$X, Z = Z, family = family, weight = w, tol.err = tol.err, tol.conv = tol.conv, GPU = GPU)
}

Try the bigRR package in your browser

Any scripts or data that you put into this service are public.

bigRR documentation built on July 25, 2020, 3 a.m.