# \donttest{
synlist <- data.frame("id" = c(1,2,3),
"canonical" = c("Hypochlorosis ancharia",
"Hypochlorosis ancharia",
"Hypochlorosis ancharia"),
"synonym" = c( "Hypochlorosis tenebrosa",
"Pseudonotis humboldti",
"Myrina ancharia"),
"family" = c("Lycaenidae", "Lycaenidae",
"Lycaenidae"),
"source" = c("itis","wiki","wiki"),
stringsAsFactors = FALSE)
mytaxo <- syn2taxo(synlist)
# }
Run the code above in your browser using DataLab