# NOT RUN {
library(dplyr)
library(amapGeocode)
# Before the `convertCoord()` is executed,
# the token should be set by `option(amap_key = 'key')`
# or set by key argument in `convertCoord()`
# get result of converted coordinate system as a XML
convertCoord("116.481499,39.990475", coordsys = "gps", to_table = FALSE) %>%
# extract result of converted coordinate system as a data.table
extractConvertCoord()
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab