remove unclears from locations_v2 points

[adelegem]

Locational points: https://www.dropbox.com/scl/fi/8k9w1885qnn1f8ozllxk9/locations_endemic_genera_v2.csv?rlkey=xi8rxkac7r73ha8kj15k0l3mm&dl=0

code to remove any non-endemics (some are classified as unclears in point data)

points <- read.csv('C:/Users/adele/Documents/BEES3041/endemism/endemism/data/endemic_locations/locations_endemic_genera_v2.csv')

all <- read_csv('intermediate_data/all_gen_with_status.csv')

non_end <- all %>% 
  subset(endemism_status == 'non-endemic')

end <- all %>% 
  subset(endemism_status == 'endemic')

points <- points[!points$genus %in% non_end$genus, ]

points$current_knowledge <- 'endemic'