Google Maps by rStudio

mapType='normal'
mapType='terrain'

 
mapgps <- sqlQuery(channel, "select distinct top 10  (convert(varchar,Lat) +','+ convert(varchar,Lon)) as Latitude, Lon  fromvCompany c inner join

tbNZPostcode p on c.vchPostCode = p.postcode  where chCountryCode = 'NZ' and p.postcode = 1010 ")

Map <- gvisMap(gps,
                      options=list(showTip=TRUE,
                                   showLine=TRUE,
                                   enableScrollWheel=TRUE,
                                   mapType='normal',
                                   useMapTypeControl=TRUE,
       width=800,
       height=800))

plot(AndrewMap)