# NOT RUN {
#-------------------------------------------------------------------
# Checker for Two Types of Inputs
#
# Generate 5 observations in R^3 in Matrix and List.
#-------------------------------------------------------------------
## DATA GENERATION
d1 = array(0,c(5,3))
d2 = list()
for (i in 1:5){
single = stats::rnorm(3)
d1[i,] = single
d2[[i]] = single
}
## RUN
test1 = wrap.euclidean(d1)
test2 = wrap.euclidean(d2)
# }
Run the code above in your browser using DataLab