add names to summary df

[adw96]

dv_water$shannon %>% names has names but

dv_water$shannon %>% summary

has no names

[adw96]

closed in b/a