powered by
Orthom
validOrthomObject(object)
TRUE
validObject()
object@M
theta <- c(pi/3, pi/5, pi/7) U <- UprodR(theta) validObject(U)
Run the code above in your browser using DataLab