Borussia Dortmund maintained their unbeaten Bundesliga start with a convincing 4-2 win over Heidenheim.