R/kernel.grad.mult.R

Defines functions kernel.grad.mult

kernel.grad.mult <-
  function(index.0, H.inv, X, X.fit, K){
    return(t(K[index.0,] * t(-H.inv %*% (t(X.fit) - X[index.0,]))))
  }
tkmckenzie/snfa documentation built on June 11, 2020, 4:34 a.m.