## Not run:
# ## Load data
# data(tspdata)
#
# ## Run tspcalc() on a data matrix and grp vector
# tsp1 <- tspcalc(dat,grp)
#
# ## Get predictions for a new eSet or data matrix
# predict.tsp(tsp1,dat2,1)
# predict(tsp1,eSet2,1)
# ## End(Not run)
Run the code above in your browser using DataLab