table with by GENUS and INSTCODE and data_source before dropping duplicates

@slgora

I found useful to have table with by GENUS and INSTCODE and data_source before dropping duplicates I added this to script 1 to generate and save the table:

# create table with by GENUS and INSTCODE and data_source before dropping duplicates
gen_wiews_counts <- gen_wiews_df %>%
  group_by(INSTCODE, GENUS, data_source) %>%
  summarize(n = n()) %>%
  arrange(desc(n))
write.csv(gen_wiews_counts, '../../Data_processing/1_merge_data/2025_08_15/gen_wiews_counts_before_dropping_duplicates.csv', row.names = FALSE)