# NOT RUN {
#-------------------------------------------------------------------
# Draw Samples on Stiefel Manifold
#
# Try Different Return Types with 3 Observations of 5-frames in R^10
#-------------------------------------------------------------------
# GENERATION
dat.list = stiefel.runif(n=3, k=5, p=10, type="list")
dat.arr3 = stiefel.runif(n=3, k=5, p=10, type="array")
dat.riem = stiefel.runif(n=3, k=5, p=10, type="riemdata")
# }
Run the code above in your browser using DataLab