Variable Screening for High Dimensional Time Series