Danica Patrick wins pole for Daytona 500