R/kernel_twowayx.R

Defines functions kernel_twowayx

Documented in kernel_twowayx

kernel_twowayx <-
function(Z, n, p)
{
	K = matrix(0, n, n)	
	aux <- .C("kernel_twowayx", as.integer(as.vector(t(Z))), as.integer(n), as.integer(p), as.double(as.vector(K)))[[4]]
	matrix(aux, nrow=n)
}

Try the AssotesteR package in your browser

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

AssotesteR documentation built on May 2, 2019, 3:55 a.m.