According to Opta's supercomputer, Leverkusen have an 89.8% chance of beating Bayern to the Bundesliga title