Return the vector of modes from a tensor
## S4 method for signature 'Tensor' dim(x)
x
the Tensor instance
dim(x)
an integer vector of the modes associated with x
tnsr <- rand_tensor() dim(tnsr)