# Create matrix list
matLst <- cvPost(10, lotri::lotri(a+b~c(1, 0.25, 1)), 3)
print(matLst)
# Convert to cube
matCube <- swapMatListWithCube(matLst)
print(matCube)
# Convert back to list
matLst2 <- swapMatListWithCube(matCube)
print(matLst2)
Run the code above in your browser using DataLab