Rename thsu to thsu.R