R implementation for TSPD. Modified after the revision. We provide descriptions in the file. See related blog entry and supporting page for details. The example dataset is GunPoint from UCR time series database.