R/XexXen.R

Defines functions XexXen

Documented in XexXen

XexXen <-
function(N,n,ind.ex,ind.en,x.ex,x.en)
	{
		x <- array(matrix(0,n,ind.ex+ind.en),dim=c(n,ind.ex+ind.en,N))
		dimnames(x) <- list(1:n,c(paste("ind.ex",1:ind.ex,sep=""),paste("ind.en",1:ind.en,sep="")),1:N)
		x <- abind(x.ex,x.en,along=2)
		list(x=x)
	}

Try the dgmb package in your browser

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

dgmb documentation built on May 29, 2017, 9:32 p.m.