R/Rten2.R

Defines functions Rten2

Rten2 <-
function(X1,X2) {
  one.1 <- matrix(1.0, nrow = 1, ncol = ncol(X1))
  one.2 <- matrix(1.0, nrow = 1, ncol = ncol(X2))
  res <- kronecker(X1,one.2)*kronecker(one.1, X2)
  res
}

Try the DDPstar package in your browser

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

DDPstar documentation built on April 3, 2025, 8:46 p.m.