year_subset function

Subset samples by a specific year