## Not run:
# ## Load data
# data(tspdata)
#
# ## Run tspcalc() on a data matrix and grp vector
# tsp1 <- tspcalc(dat,grp)
# tsp1$index
#
# ## Run tspcalc() on an expression set and a column of the pData matrix
# tsp2 <- tspcalc(eSet1,1)
# tsp2$index
# ## End(Not run)
Run the code above in your browser using DataLab