Create WTCData.R