if (FALSE) {
# R base operation
Arg(1)
Arg(1+1i)
# LazyTensor symbolic element-wise argument (or angle) of complex
z <- matrix(2 + 1i^ (-6:5), nrow = 4) # complex matrix
z_i <- LazyTensor(z, "i", is_complex = TRUE) # creating ComplexLazyTensor
Arg_z <- Arg(z_i) # symbolic matrix
}
Run the code above in your browser using DataLab