r substitua o espaço por
data$species <- sub(" ", "_", data$species)
Disturbed Dingo
data$species <- sub(" ", "_", data$species)