Thompson Sampling for High-Dimensional Sparse Linear Contextual Bandits