R/repeatTensor.R

In QuantumOps: Performs Common Linear Algebra Operations Used in Quantum Computing and Implements Quantum Algorithms

Defines functions repeatTensor

Documented in repeatTensor

#' @export
repeatTensor <- function(g,n){
	G <- g
	if(n > 1){
		for(t in 2:n)
			G <- tensor(G,g)
	}
	G
}

Try the QuantumOps package in your browser