Please plot the locations on the map of Vancouver. Details are on the pictures. Thank you.

Plot the locations of all of the pokemon in the Vanpoke table, overlayed on a map of Vancouver. Provide the resulting graphic. The following code segment may be useful: library (rworldmap) ## Loading required package: sp ## ### Welcome to rworldmap ### ## For a short introduction type : vignette ('rworldmap') library (rworldxtra) worldmap = getMap (resolution = "high") NrthAm = worldmap [which (worldmap$REGION =="North America") , ] plot (NrthAm, xlim=c (-123.35,-122. 65) , ylim=c (49, 49.35), main = "Pokemon in Vancouver")