##not run
##download the tps data folders from Khang et al. (2015) and unzip them into a folder called ligotps
#setwd("ligotps/")
#dir()
##read tps files from the /bantingensis folder and turn them into objects of a list
#xydata <- tpsRead(1)
Run the code above in your browser using DataLab