Trump won the coal states because Hillary flat out said she was going to take jobs away from coal miners. She lost Michigan because Trump promised manufacturing jobs and the Democrats can’t even keep the water clean in Flint.
I posted an article about this months ago and predicted that Trump could easily take some of these states on the pro-coal votes alone and mentioned specifically Pennsylvania and Ohio.