## Not run:
# ## Load data
# data(tspdata)
#
# ## Run tspcalc() on a data matrix and grp vector
# tsp1 <- tspcalc(dat,grp)
#
# ## Run tspsig() to get a p-value
# p <- tspsig(dat,grp)
# p
# ## End(Not run)
Run the code above in your browser using DataLab