species_vector <- c('Bufo bufo',
'BUbo bubo',
'B. bubo',
'Buteo sp','Buteosp','buteosp1','buteo sp1','Buteo_sp1','Buteo_sp 1',
'Buteo buteo 1758 Linnée','Buteo buteo (linnaeus)',
'Buteo buteo meridionalis',
'Buteo buteo aff meridionalis', 'Buteo morphospecies4','Buteo morphospecies 4',
'Buteo morpho 1','Buteo morpho 10',
"Buteo buteo.us", 'Buteo buteo.de','Buteo buteo.fr'
)
grouping_vector <- rep("Site 1", length(species_vector))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.