Calculate correlations in a nested, long dataframe

Question

I\'ve got a dataframe with nested dataframes obtained through nest. Each nested dataframe looks the same, like this:

df %>% head(n=6)

year  month