Remember put a reproducible example of data for better help you all the community.
Its easy like that: dput(dataframe[1:40, ]). And try to select all the case in AnnPrecip
dput(dataframe[1:40, ])