# NOT RUN {
## geocode to get geospatial data for a place name
(tikehau <- mr_geo_code("tikehau"))
## then pass in in an MRGID as the first parameter
mr_place_relations(tikehau$MRGID)
## Set direction='both'
mr_place_relations(tikehau$MRGID, direction = "both")
## Set type to various other options
mr_place_relations(307, type = "adjacentto")
mr_place_relations(414, type = "similarto")
mr_place_relations(4177, type = "all")
# }
Run the code above in your browser using DataLab