if (FALSE) {
login()
# Create journal citation
journalCitationId <- create_journal_citation(
packageId = "edi.17.1",
articleDoi = "10.1890/11-1026.1",
articleTitle = "Corridors promote fire via connectivity and edge effects",
journalTitle = "Ecological Applications",
relationType = "IsCitedBy",
env = "staging"
)
journalCitationId
#> [1] 74
# Delete journal citation
delete_journal_citation(journalCitationId, env = "staging")
#> [1] TRUE
logout()
}
Run the code above in your browser using DataLab