Changed the method to get and sort data to a more R-friendly way. This is also more robust at handling 'Ice' values.