R/outercprod.R

Defines functions outercprod

outercprod <- function(x, y) {
    x = as.matrix(x)
    y = as.matrix(y)
    do.call(cbind, lapply(1:ncol(x), function(i) x[, i] * y))
}

Try the RAMP package in your browser

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

RAMP documentation built on Jan. 16, 2020, 5:02 p.m.