updated check_TR.r with raw data, and old calcs