This function tells us which variables contain shade information
Examples
df_shadow <- bind_shadow(airquality)
which_are_shade(df_shadow)
#> Ozone_NA Solar.R_NA Wind_NA Temp_NA Month_NA Day_NA
#> 7 8 9 10 11 12