Importar Vernacular

library(opendatabio)
base_url="http://localhost/opendatabio/api"
token ="O SEU TOKEN AQUI"
cfg = odb_config(base_url=base_url, token = token)
odb_test(cfg)

#gerar um dado fake para teste
name = c('pau rosa',"casca preciosa")
taxons = c("Aniba roseaodora,Aniba panurensis,Aniba parvifolia","Aniba canelilla")

#pega o id de alguns individuos
inds = odb_get_individuals(params=list(taxon="Aniba roseaodora,Aniba panurensis,Aniba parvifolia",fields='id,scientificName',limit=10),odb_cfg = cfg)
individuals=c(paste(inds$id,collapse = ","),NA)

idiomas = odb_get_languages(odb_cfg = cfg)
language= c('pt-br','en')  

#cria um data.frame com essas informacoes
verna = data.frame(name,taxons,language,taxons,individuals)

#citatcoes (basta gerar um data.frame para cada vernacular)
umaCitatcao = data.frame(
  citation='Este seria o texto citado', 
  bibreference="Riberiroetal1999FloraDucke",   #bibkey ou o id
  type='generic',   #pode ser: generic, use, etimology
  notes='minhas observações sobre essa citação')

#adiciona uma coluna do tipo lista 
verna$citations  = list(umaCitatcao,NA) 

#importar para o opendatabio
odb_import_vernaculars(verna,odb_cfg = cfg)