Update map.station.R

A quick fix of the color bar coding colors :)