Predicting elevational shifts in alpine animal species