Google Distance API¶
First, go to the following website: https://console.developers.google.com/apis/
Apply to your API credentials and enable the APIs for geocoding, distances and places
In [1]:
install.packages("googleway")
install.packages("rgdal")
install.packages("rgeos")
install.packages("sp")
install.packages("ggplot2")
install.packages("ggmap")
In [28]:
library(googleway)
library(ggmap)
Loading required package: ggplot2
Warning message:
"package 'ggplot2' was built under R version 3.3.3"Google Maps API Terms of Service: http://developers.google.com/maps/terms.
Please cite ggmap if you use it: see citation("ggmap") for details.
In [40]:
mit <- data.frame(place=c("mit","centralSQ"), lon=c(-71.0930055,-71.10359069999998), lat=c(42.3592151,42.3653248))
print(mit)
place lon lat 1 mit -71.09301 42.35922 2 centralSQ -71.10359 42.36532
In [44]:
# We will compute the distance between MIT and Central Square.
mitmap = ggmap(get_googlemap(center=c(-71.098613,42.362569), scale=1, zoom=15), extent="normal")
mitmap + geom_point(aes(x=lon, y=lat), data=mit, col="red", alpha=0.8, size=10)
Source : https://maps.googleapis.com/maps/api/staticmap?center=42.362569,-71.098613&zoom=15&size=640x640&scale=1&maptype=terrain
In [3]:
# Key API de Google Distance
keyDist = 'myAPIKeyCredential'
In [8]:
# Example of distance between MIT and Central Square
results <- google_distance(origins=list(c(42.3592151,-71.0930055)),
destinations=list(c(42.3653248,-71.10359069999998)),
key=keyDist, simplify = TRUE)
In [9]:
print(results$rows$elements)
[[1]] distance.text distance.value duration.text duration.value 1 1.1 km 1081 5 mins 327 duration_in_traffic.text duration_in_traffic.value status 1 6 mins 343 OK
In [11]:
# https://developers.google.com/maps/documentation/distance-matrix/intro#DirectionsResponseElements
In [14]:
setwd("C:/Users/yourWDDirectory/")
library(rgdal)
In [16]:
# Read shapefile with the MBTA stations.
stations <- readOGR(dsn=".", layer="MBTA_NODE", stringsAsFactors = FALSE)
OGR data source with driver: ESRI Shapefile Source: ".", layer: "MBTA_NODE" with 162 features It has 4 fields
In [19]:
head(stations)
dim(stations)
coordinates STATION LINE TERMINUS
1 (236007.5, 892693) Ashmont RED Y
2 (231387.3, 902684) Harvard RED N
3 (234087.9, 901406.6) Kendall/MIT RED N
4 (234055.4, 890869.4) Capen Street RED N
5 (235900.3, 899934.3) Tufts Medical Center ORANGE N
6 (222197.3, 897300.4) Waban GREEN N
ROUTE
1 A - Ashmont C - Alewife
2 A - Ashmont B - Braintree C - Alewife
3 A - Ashmont B - Braintree C - Alewife
4 Mattapan Trolley
5 Forest Hills to Oak Grove
6 D - Riverside
- 162
- 4
In [18]:
class(stations)
'SpatialPointsDataFrame'
In [21]:
# Check the projection of the file.
proj4string(stations)
'+proj=lcc +lat_1=41.71666666666667 +lat_2=42.68333333333333 +lat_0=41 +lon_0=-71.5 +x_0=200000 +y_0=750000 +datum=NAD83 +units=m +no_defs +ellps=GRS80 +towgs84=0,0,0'
In [22]:
## Transform to geographic coordinates.
stations_dg <- spTransform(stations, CRS('+proj=longlat +datum=WGS84 +no_defs +ellps=WGS84 +towgs84=0,0,0'))
In [24]:
head(coordinates(stations_dg))
| coords.x1 | coords.x2 |
|---|---|
| -71.06343 | 42.28388 |
| -71.11891 | 42.37403 |
| -71.08619 | 42.36242 |
| -71.08720 | 42.26755 |
| -71.06428 | 42.34908 |
| -71.23069 | 42.32588 |
In [27]:
d <- data.frame(coordinates(stations_dg)) # obtain the coordindates
colnames(d) <- c("longitude","latitude")
d$station <- stations@data$STATION
d$coords <- paste(d$latitude, d$longitude, sep=",")
head(d)
| longitude | latitude | station | coords |
|---|---|---|---|
| -71.06343 | 42.28388 | Ashmont | 42.2838835462253,-71.06343014439 |
| -71.11891 | 42.37403 | Harvard | 42.3740292306852,-71.1189060723783 |
| -71.08619 | 42.36242 | Kendall/MIT | 42.3624153448843,-71.0861914939985 |
| -71.08720 | 42.26755 | Capen Street | 42.2675530566276,-71.0872048238978 |
| -71.06428 | 42.34908 | Tufts Medical Center | 42.3490800070744,-71.0642815507741 |
| -71.23069 | 42.32588 | Waban | 42.3258777163534,-71.2306934194716 |
In [59]:
res <- c()
#for (i in 1:nrow(d)){
for (i in 1:10){
Sys.sleep(1)
dist <- google_distance(origins=list(c(42.3592151,-71.0930055)),
destinations=list(c(d$latitud[i], d$longitude[i])),
key=keyDist, simplify = TRUE)
temp = as.numeric(unlist(dist$rows$elements[1])["distance.value"]) # distance in meters
res <- c(res,temp)
}
head(res)
- 14532
- 2704
- 966
- 14932
- 4589
- 18385
In [62]:
vector_distances <- data.frame(station=d$station[1:10],distance_mts=res)
head(vector_distances)
| station | distance_mts |
|---|---|
| Ashmont | 14532 |
| Harvard | 2704 |
| Kendall/MIT | 966 |
| Capen Street | 14932 |
| Tufts Medical Center | 4589 |
| Waban | 18385 |
Google Geocode API¶
In [65]:
df <- google_geocode(address = "60 Wadsworth St, Cambridge, MA, United States",
key = keyDist,
simplify = TRUE)
print(df)
$results
address_components
1 Eastgate, 60, Wadsworth Street, Area 2/MIT, Cambridge, Middlesex County, Massachusetts, United States, 02142, Eastgate, 60, Wadsworth St, Area 2/MIT, Cambridge, Middlesex County, MA, US, 02142, premise, street_number, route, neighborhood, political, locality, political, administrative_area_level_2, political, administrative_area_level_1, political, country, political, postal_code
formatted_address
1 Eastgate, 60 Wadsworth St, Cambridge, MA 02142, USA
geometry.bounds.northeast.lat geometry.bounds.northeast.lng
1 42.36187 -71.08372
geometry.bounds.southwest.lat geometry.bounds.southwest.lng
1 42.36161 -71.08409
geometry.location.lat geometry.location.lng geometry.location_type
1 42.36174 -71.0839 ROOFTOP
geometry.viewport.northeast.lat geometry.viewport.northeast.lng
1 42.36309 -71.08255
geometry.viewport.southwest.lat geometry.viewport.southwest.lng
1 42.36039 -71.08525
place_id types
1 ChIJL0cG3qVw44kRTWgeSddBl_Q premise
$status
[1] "OK"
Google Place API¶
In [66]:
test <- google_places(location = c(42.3592151,-71.0930055),
radius = 500,
#place_type = "food",
key = keyDist)
print(test)
$html_attributions
list()
$next_page_token
[1] "CpQCDwEAAAzjNbdbfnbRSYoB-O6vSp1kNTBihLP7gSBcb7g2PbSEESrVMgPcl7Yb8NR4lgJCExwqH85KIV0OnCC-ZWIZ27_Bjw_ayhSWfNCNkb5Ps2fjSeq6dGnu51p-9ywf8GZ_N-AX1el4fxxt-AB6CleXNcADhtDPPzImBnZHCnt-vznCikRAh-t1WZBwmZTHnyElaqG4J4I9j1H5OG4JRWv3OySIB3kLaDtVfoeFBweAPJv1k4rLX7hz8tsDA9DRfYdAO5u2Lm3vEAjucgscFdXJ-vU5APr2QmUoM-AZa9FABAbPCdq3I_1PNEJwMA-4j2z-FcmgI-9eJP6glmmUzH2hXBYkNnTXOzXTz2EW1eB065MLEhAdOHTvRkIm7g1CDKbJu62vGhRsY-E2d4X3NbIrppwA9OrEVMZNgA"
$results
geometry.location.lat geometry.location.lng geometry.viewport.northeast.lat
1 42.37362 -71.10973 42.40438
2 42.36009 -71.09416 42.37028
3 42.36100 -71.09663 42.36240
4 42.36306 -71.09161 42.36440
5 42.36326 -71.09304 42.36510
6 42.36077 -71.09637 42.36220
7 42.36309 -71.09244 42.36434
8 42.36178 -71.09727 42.36306
9 42.35888 -71.09466 42.36044
10 42.36186 -71.09056 42.36335
11 42.36137 -71.09747 42.36281
12 42.36268 -71.09404 42.36403
13 42.36036 -71.08726 42.36161
14 42.36185 -71.09732 42.36312
15 42.36108 -71.09677 42.36248
16 42.35925 -71.09313 42.36050
17 42.35904 -71.09498 42.36020
18 42.36318 -71.09333 42.36506
19 42.36251 -71.09655 42.36384
20 42.35704 -71.09286 42.36490
geometry.viewport.northeast.lng geometry.viewport.southwest.lat
1 -71.06549 42.35240
2 -71.06538 42.34783
3 -71.09522 42.35970
4 -71.09011 42.36170
5 -71.09158 42.36240
6 -71.09494 42.35950
7 -71.09112 42.36164
8 -71.09599 42.36036
9 -71.09288 42.35774
10 -71.08935 42.36065
11 -71.09600 42.36012
12 -71.09269 42.36133
13 -71.08586 42.35892
14 -71.09606 42.36042
15 -71.09536 42.35978
16 -71.09202 42.35780
17 -71.09350 42.35750
18 -71.09179 42.36237
19 -71.09521 42.36115
20 -71.07579 42.35240
geometry.viewport.southwest.lng
1 -71.16033
2 -71.12099
3 -71.09792
4 -71.09281
5 -71.09428
6 -71.09764
7 -71.09382
8 -71.09869
9 -71.09558
10 -71.09205
11 -71.09870
12 -71.09539
13 -71.08856
14 -71.09876
15 -71.09806
16 -71.09471
17 -71.09620
18 -71.09449
19 -71.09790
20 -71.11070
icon
1 https://maps.gstatic.com/mapfiles/place_api/icons/geocode-71.png
2 https://maps.gstatic.com/mapfiles/place_api/icons/school-71.png
3 https://maps.gstatic.com/mapfiles/place_api/icons/restaurant-71.png
4 https://maps.gstatic.com/mapfiles/place_api/icons/restaurant-71.png
5 https://maps.gstatic.com/mapfiles/place_api/icons/shopping-71.png
6 https://maps.gstatic.com/mapfiles/place_api/icons/bar-71.png
7 https://maps.gstatic.com/mapfiles/place_api/icons/restaurant-71.png
8 https://maps.gstatic.com/mapfiles/place_api/icons/restaurant-71.png
9 https://maps.gstatic.com/mapfiles/place_api/icons/restaurant-71.png
10 https://maps.gstatic.com/mapfiles/place_api/icons/school-71.png
11 https://maps.gstatic.com/mapfiles/place_api/icons/generic_business-71.png
12 https://maps.gstatic.com/mapfiles/place_api/icons/restaurant-71.png
13 https://maps.gstatic.com/mapfiles/place_api/icons/school-71.png
14 https://maps.gstatic.com/mapfiles/place_api/icons/shopping-71.png
15 https://maps.gstatic.com/mapfiles/place_api/icons/shopping-71.png
16 https://maps.gstatic.com/mapfiles/place_api/icons/generic_business-71.png
17 https://maps.gstatic.com/mapfiles/place_api/icons/shopping-71.png
18 https://maps.gstatic.com/mapfiles/place_api/icons/atm-71.png
19 https://maps.gstatic.com/mapfiles/place_api/icons/generic_business-71.png
20 https://maps.gstatic.com/mapfiles/place_api/icons/geocode-71.png
id
1 6d2faadca7159347cc68b047055a94b00fec6032
2 69719c0103126aa1381f9a9491f481506b770584
3 cc6f6a4a9af0a79517ae298e642cc79a045e0a54
4 5c4273f6250c6e914c57794e1b9d99080be405db
5 3c6fbc1b40edb1c1e0b2006a9b0f70a4e31e0cfd
6 0bead7e795f2b662033d3cce76ece659be4c5c79
7 9a07296d9b54392d3c9f82619c282cf1eedcc99c
8 3a5632ef52c1fc8608526dae8d839b1b9b5ebb32
9 443974c953fc8b7b54e3e4fc09bc0bc8509f075e
10 ce19d6e8f02676748764b87708cdfb07349ee86a
11 aee068743ad4d3cdde08c5559c5082edfef18cf9
12 3a6e8bfc5d81b67882e663e2ebd8bb6c9d00455f
13 ec8fad1ea6d1f6f60ea0c9401a929130adbd78b6
14 e9265311a7b3e6c78b74aaf17fd8773309942b1d
15 7fb12a2885d765f79410f33e5b1e66c5af622ca3
16 266281c301a0b2a65bdfb6adbdb043390b196931
17 621060be8de6fe9adee2adf79798f9aa4abcdf69
18 597e2f5191357c9bc50651f17c5950ba8ebeb702
19 557e7ec607d9b38fcfcb21d9742ddb85debe49fb
20 dd6e5ef309917a92806a9e96fd9b5407d7178161
name
1 Cambridge
2 Massachusetts Institute of Technology
3 Flour Bakery
4 Catalyst
5 FedEx Office Print & Ship Center
6 Paradise
7 Area Four
8 Beantown Taqueria
9 Anna's Taqueria
10 MIT: Computer Science and Artificial Intelligence Laboratory
11 Novartis Institutes for BioMedical Research
12 Cafe Luna
13 MIT Media Lab
14 Cambridge Bicycle
15 Central Bottle Wine & Provisions
16 Dr. David V. Diamond, MD
17 MIT Coop
18 Cardtronics
19 Boston Movers - Allen and Coles
20 Area 2/MIT
photos
1 2250, <a href="https://maps.google.com/maps/contrib/111882793823187543993/photos">Clayton Rocha</a>, CmRaAAAA0IecHDiushpMfcJjnVhVcstdqMYibxHkYOmMxy4vj2KqQX3n4-ABimqBui3jDgyn-ETj-crG6dSEexa1WabaFR-Np8dvfFmIDFWNAPHEgNbDTukFjBf2wQNpeq0KnRoxEhAfY4E9pImonoDweJpHmjl1GhSGKPh6str2I0j6GMPhLPOzZxMq1g, 4000
2 1849, <a href="https://maps.google.com/maps/contrib/101046882135806425785/photos">Ira Gon</a>, CmRaAAAAD5U_9me3vWMeMAADHB2CWbJPlUU6q4dTKVpC66WhcqFvKxskrcqrYbpjxHFIo--ymcrb9H_9WPcT3hf3GzSqZ9HyCMtSHtnp_3X21RJz3wxYT_fyqrZFUX5-cb9ngLuqEhD6Qwo-AniqEDpX1boSKd5yGhSrdxqM6vKekMGh-R-dF1zpXNZbDA, 3264
3 3024, <a href="https://maps.google.com/maps/contrib/104578247846188377346/photos">Eliott Wiener</a>, CmRaAAAACQ7B-2kuBC_slOjX6RVWmrZ3cjwsdqk1nXqZ4hGQK8oLYTi_QloXqCPz5QME7gjwUYKvER5lpKDcT30l9qMlIL34HwNwoT2cUAjPAAggRvZKXMDwvx9zM6dudvo4bX8NEhBdG7NUAheGk0-8NTQvh-l_GhRfwBOgW1DhLUIQCSrm_98sDDgqJA, 4032
4 2848, <a href="https://maps.google.com/maps/contrib/117009105686320254613/photos">Catalyst</a>, CmRaAAAA5u8WrV9Zmp7Uf36N1O3aJXksq9syVS7ezRuQj0QkhqPp2yeGpnGBotvi2PzJhByB_zgL8YLv-3oPsXFVe0IKrtOT6lsxgD2svcdRnLU2MP7nBnr3g-5oaoQoOQ1wRQxVEhDvSDGlqx9TsQDfPVAeQx8SGhT5-eXwT4SJu3TVq3qvFCDI8K0uZg, 4272
5 683, <a href="https://maps.google.com/maps/contrib/100943572591073729521/photos">FedEx Office Print & Ship Center</a>, CmRaAAAAjD8JKdTfWfNMl4UxhdWJHzbOkZGef0rpkSoeTThEGb2JKNAZU414ZQQ_iKpU3SJfRn-yDpxykNj4RqLl8lXDS9aa--Ax0iY9Z1W39Q-IK-2yAgUt9r-OJdVv50-lCE3tEhCOyV4WmAJgzxouC0I6JBR3GhRRXHrguKdIVSK3wheMRQvRs6Ec8w, 1024
6 1932, <a href="https://maps.google.com/maps/contrib/117479671036346153569/photos">Ardeci Cardoso</a>, CmRaAAAAMDV_kViN_IooGTuFqDn6QNHA0KqBqH2TGiloy95whpiloyb7gcYJk8nB4M6L5KCKTzgzA9j3JTNS2dB3Xl9-2MYKfokly9E7JltyUXU3SSMZLPLivgC91IJf0vcnPF7mEhBJUoBCBd72Seln6Wrz7sJmGhR6vpLdgnuMIJ9Y8A4x8r6SJ9DIJg, 2576
7 4032, <a href="https://maps.google.com/maps/contrib/107794143522700140963/photos">Kirtan Patel</a>, CmRaAAAAYwEVkxhfK9OFHD0YFXJcH38mPJG48BUVnRVLauyvQ3BKrzmZncwlI_rG4a6oDLRU3Q2BEsneIOTaL_r4gAThNPNWNXImQs4mgc4CCqncsld8k0C5VxA0puzQxsWVHQ2BEhCuXJX_ZasmXvZCN_mjPkc1GhTc6Se7PiHOVIrNu3QvBfPF73UWjA, 3024
8 3024, <a href="https://maps.google.com/maps/contrib/107818539721040487967/photos">Lennart Husvogt</a>, CmRaAAAAEsSKZP_d4Tf-k1sFe9_vniGXzb3G06ny6H1RXHD8gPL6RNcOVQ0eexdkAajY9sL5VuipZpQe6MhogK7alWSmOlaYlub2mSx_FBka59SFP1vyYkA_8V6iVjW943el2rkWEhC59KMhtI2iSmPMYrBeh-1FGhT_sD0zS0Wv9jUorTNZ0l9aGB4GPQ, 4032
9 1365, <a href="https://maps.google.com/maps/contrib/104111246635874032234/photos">ZAGAT</a>, CmRaAAAA7J41NiI6tQ2R_T6vygcfzpCDHyd70UBDsxoDDEsy-x5Vw45n7h2rrjmWbBegngai1zdd8kLBOkemusZAvhS74bjAUZrATOewD7Q5eOeTJ4jdDQsYX9fstxHVsFRTaZlfEhABnPuVH_PGRdkSWSYk473jGhTDp4uUgGl4wofmgNl3SkLBvZjyXg, 2048
10 3456, <a href="https://maps.google.com/maps/contrib/110350056655658805900/photos">Ramil Sharifsoy</a>, CmRZAAAAwI3y6qlYvedCdOFpTOgjHSakKiUd7w36hRlkP65Fk3keVnwt7ogxkrMoGlTiqVUukmZSDwIlzT3fx3FS9nKpYgfzqvzWocv1NIAxDUPx9IPEqa2RNZm3948Nf_Kz4vCwEhC34TpuCykDFdSRRlJvYbJRGhQJy6mCgvk9OaBXTbImTlmVRFHS5g, 5184
11 870, <a href="https://maps.google.com/maps/contrib/114437705200393004751/photos">Jason Shurb</a>, CmRaAAAAr5_pwOAfbQTt7O4QI9oqb6G5kMsVMasVqnkSuT-Wr4J1TZSVFOg_uQyOYCDz_PeRU67IYJg4-YBjzFKrgJupyQvy07U8kBpzSNmHdfXfgKGOPLh8mKa79fgm8sbhqjqxEhDN8zQjr3mfNRS71rZDqIVjGhSqu-shct-Xu4uM-7CitK2H-JK-FA, 1234
12 3480, <a href="https://maps.google.com/maps/contrib/102846824116861448095/photos">Rishabh Sardana</a>, CmRaAAAA-lwp-alRUaXmGEk9s12lAr3z9G7EVqsxHPZ4q_GdVLE1GfX7z62RbeGDt53tXIzjyCcBJTxJRHMW8hOJlqOt18UjPWudnL59shnvlT-Q6-vLiS5hAe0AOPClPhZyX995EhAIDP46ip3dVVF1WsTqdOKrGhRd_0VL5D9jhc4QYlwjFLUTCqJOKg, 4640
13 2160, <a href="https://maps.google.com/maps/contrib/106375652157841603682/photos">hisatake okada</a>, CmRaAAAAAjjYgpRZFq7xiTNNztHgWIsantrQjifICOE8UBpdw78oCg5bT_K8w1pRErDnD6_fGuHehv-xLYiTkgAza9s2gRLYs7FEN08SkXqDMtWYyTHgA_B0Pu6I3bw7ZHJir7JrEhDOrDWbiarwzdURLixNnLrNGhRThpe-Xm4yYGGEvVNRtBvtfnm9zw, 3840
14 3006, <a href="https://maps.google.com/maps/contrib/114672027290724063702/photos">Steven Riendeau</a>, CmRaAAAArX0MG1dEWQrF2JflCEJDgkUj-d-14WuuPv8d9uK7KxFYJyrwbVx6K2IKsP0OJkwlZ1oTVdcj8mUehDJjr6wl0hcHLaQjZ_s2zWQ1r9NDcd3Az11WG_cdPv2tilOg1qQ9EhBjBekNTrrANBz9xaDd7JWFGhQW33Xx2m_EpHiY-tUJs8CJnnn6qw, 5344
15 3232, <a href="https://maps.google.com/maps/contrib/115783396611415402510/photos">Sam McDaniel</a>, CmRaAAAAt9g_DCTAQtrO06B08jCjmol8CkDyCBRagsc5H3eh8PUrZ7HGU3y7syTU8Sf9E1g0anYm_1vOW4o1DUits8QXqLots2m5O3xk5uUQn0wmX5ECJEii1Iaaw8NbGnNIwHQdEhA0WDlXRxZD-aM5y7M9vtV4GhS2iUEqI2dbOFgx8CspAHA1Ko4cBA, 2424
16 NULL
17 1944, <a href="https://maps.google.com/maps/contrib/114849634493712404965/photos">Ruben Mauricio</a>, CmRaAAAATnl5aKxZrtahjLyVyjJMWp93Yq70XIppXDkrCH59zvltBczimxVnqCMuT6zT93_18hLuFQGfP4VbD_cEp-Omj_mkp2xqjq83MEjysbzkGDL7AF9FH4g5BpjFHk1OqFDvEhCwYHs2-06iE7iI6P-YefAHGhQF6CQE1P5kS7w7bOWocXAZHNtQjw, 2592
18 NULL
19 NULL
20 2998, <a href="https://maps.google.com/maps/contrib/105825568159173748451/photos">Marco Ziero</a>, CmRaAAAASTHYXRKwUsze-bqf6n-hOHPZOFRC1XCrlFOr-Et6lSlT6xL1EDTp4CEAE9iqq9WYY2xKn62Xgh81NyT3cS9_G_TJFm6c9eh0kopZn3u_1zdbfcfQ1fm-c3CUxPYBmkoHEhBc_60hYNVW28vH85QqPH4cGhTS9GLnlaGP_0L4It4j2Dbxoxtdmw, 3999
place_id
1 ChIJX8wwy6Vw44kRh2xoiWSOOsU
2 ChIJh2oa9apw44kRPCAIs6WO4NA
3 ChIJueNI2apw44kRUyAncgwcQPk
4 ChIJzS9HAqxw44kRCo0sjqcyWj8
5 ChIJL-lwFaxw44kRwiHLDKjT6R4
6 ChIJdUYn3Kpw44kRtJuXhqKPnoU
7 ChIJKaXoBqxw44kRjXSBtvbq1j0
8 ChIJ40i31FR344kRhDUXhw1zopQ
9 ChIJMdDnhapw44kR2TTK4LEj99c
10 ChIJRbMmRalw44kR7d9klh7aOjA
11 ChIJszG9KlV344kRcEZwPtHBEKw
12 ChIJI68OY1R344kRq9zKM6nn9bc
13 ChIJxRDzsKhw44kRMIBfveamJho
14 ChIJH8OZ01R344kRSKBR02mrD9k
15 ChIJrf-J16pw44kRa8qQufDvgg0
16 ChIJuSzS_alw44kRt54aTwDa1MA
17 ChIJjTMNT69w44kRSPoObzwdSX8
18 ChIJV55c11R344kR0_K2Tf4xksM
19 ChIJvwqYLYRw44kRda7m5NhaM-w
20 ChIJ9SRZcapw44kRiBW_a5dU0T8
reference
1 CmRbAAAAKMVx-_KU5E9ex3TmXqatRjpM0tYuWfpD--1fiIq_pP8BF_2AmPUv0ZMfW82a0_xLv47O7muAlsYenMBjcimcv3BVyFU7iOIBhWy3t1yDo3gfocgt52Gcip0OdK8bf9OQEhAaC88bVjLtQ7wD8iTx9jJ3GhTZFjiOTF8hBljC99AKkEutfTz8eg
2 CmRSAAAA9caWxHGE4hYJS3Qdt3IgRpPi_NFlYJolgvZWZ0EqiWZyt3JsAn069z3VQ_yDgXFG4qrJvVR_HTLBbQf9vPdzhnHAF8vthcIHxbhbXsa3084wuvnT-XLR2ueVKNEEQXEwEhD2470ygMMUIqTz56pVlE36GhQfWJWGyJHQUFwMxsuCQYRTHZFbhw
3 CmRSAAAA-Hg-5GkNwzJJsay9tnji4LPyNGrDRBQQhQMxt6Ut6SRNa1lES0XMQvByWtEiEBpwhZHOtrVcHA_Pk4iPsHE6eyYiF2MzOR0xH8mAic06EScuGQBHHh9zqKfeGuKi1XWIEhDDTuHSvVT1gE_tczv6PQPvGhTPpywFAnEwImMYbCRVLLG-MTucdg
4 CmRRAAAAeMEKwT_988r3b30_6V7omNojEh8m2VSdhiIKj588_rMsAiW5e8QU9Yq9vZ-i7G-tApHxW8WnI58xlP5kd52FpPBMyVvrMngwOSPWMhYFjL0NV18ZM4e7ExLOpzwM40FCEhDFZDXmvBFdWzsKe0C2h4g0GhQC79Yfp0Eda8XqVMIPgQQ4tt4VDQ
5 CmRRAAAAGCIQwumwJEe-GPzHV4lJqayu7GIyUD8UWzztDxt13lVNxWjjUCEFq0oa5zvp2BpxYaxuxpArPKAWhSjQdFbj3g_wqnfkSaQvf-OTiQFqWABEPlSYFGRrTJ0kPSygfle1EhDvTDPVdXsAAa8IxEz2zBFxGhTwMG9t1K0NvvSaknYXzXrV2_nGmQ
6 CmRSAAAARj1KBrhyJ52-JrOMP8UeUh9_3bUjg6cm1QR7mXHd6847lYvgv5nqyNRFn6QFCkl7fMXOq9fTSK7yBtZxBT3cU5QEWavGF20F13W1NwAkThqrrhNMqLIXXpsNtVotG_MYEhDf6j2VP6pN1z-oPhlm5hXGGhTKfknUTJ_KW0pkpFprpV0P5olQDg
7 CmRRAAAAFhcIn_edu4knj6xdi1UK61WV90L8I7Zr9bzKxYTBI5q0yjCSBWhttdK-pvhu_wrOvDhF_-F04y9kjvw5b5vMEDWmYYKaI1gZ6lwotwMM-_aqZLjouDWExQhbEb4ZQhqyEhCBIB1VUW10R5vMDptQ8dexGhTu-CuI1voaNPslvjw5h9ZpaYqgaA
8 CmRSAAAAugUvz74BwT6ucRTF8idxtNw33SmN-Ba2Yt2ZV8Z5Mlnzh1DpCRoJBSybltjnP8PhCdSIZfS3ZWoVfu--cS6wf6dK2R2mgXu7-quVIVsFtKQsjXkoKIxwicWwKi5zzMweEhBN_zou4qPm3NPNRH-H4fzIGhTNQONMGvRT2IoTsc6UoQcE5Ch2kg
9 CmRSAAAAOvLIxNivSMyWapk1LyuiFvtwffo9F_PbsAF3eUV0nlPqqaquSuUNLDr0jkzGVNZH4UN3055yWNCXUUzy0sSRBX9SsXijUXDalgJQ34tmr9c1zlkSJnhWDrSZqdMvAt6-EhDMSk45ZOZzlnNzUSmC_iASGhQ3eQuwDe3_52Ni2ihBI16i_0asyA
10 CmRRAAAAN5gQvbEyhL19iv6CEaAqKQefw5l4tesehdUiM9hOncVOlMpJIuUOFfB0N-HVbg6F0AaEJB_wbKIFh0Mjmm1GnCiC8X2iLgNbisx8TtYnTUYha1en4ts0H6qP0Vtz_fksEhAdQYsVTRwIFdp0jkIeckPYGhSVyy1YpPDuw7kWJFubwNt1RDiclQ
11 CmRSAAAApriOAnhAIj5TXAPpWWA9HwAYpsomhMexPIxKe_mXj7i2szXwYrWOpTd2p1V5fpwhZZkt8GgyUBv5QA8bzIAcdU8fGPbiuQgWC-R82J75YxnzE9GQ9tLiLaLKCyZPBr5OEhCdkw2Vc5asmK1cFHqiRBq4GhTUABsG09QaF1qBtNfcw5d7hdXywQ
12 CmRSAAAAKOYxWKnr469RbAC2qYtdkuhgCFy6pZjbrFnY-jSAEyvZ9XO7CnTdFBQVQYMfwcoJeMWLyWERzzIoq87xNTdQ1vAFkNcNLTpA_wbMSttcTF5zc-esCwVqttvKu7vgKsrQEhC195TYcPkhiVVygREPhhy7GhSP72Gt0FH3OFcOXBJFiCPRXO5oHA
13 CmRRAAAAgp7tEqaolKINJ6lNlaztv99rKUWcY624lwpn6naS2Jv1PE8mVj4opvIhunHvuAHaQJa3LAB9QNNvXzXU4_1Jkuq4oW1a8r0NrHjfDFwhavYCbdXpwfpBeRp6-D-yTSgWEhAMO9hIkHmXJRJadFTLZApiGhQjN9JLhjiinXI_DuhGXQ9dmF31LQ
14 CmRSAAAAJ057J5Cn2z9LTmqeLb7HvGUKS5zRK825Yx-w9xOj_eufXjmxCU9OmgI91un5cpjBMTo5HCowfZGz_bLJkOguajpK4L1nQuLOJN4O5X9PLlgSCdv--S4FRzuMnUfLUjWQEhBf8u93ODkoqyOkxmqVx4bxGhTi4pxV0d4pgTXEx2uo2zG8LxaytA
15 CmRRAAAAzsaFDu_3ZVYWVuR1x82VpyRj1Lva4eS53zvOKYNQO6NrArX36l84HxR8WzQ5iNB57V0p3-eZKUfQGhocpMg1FomNkpzEp1iQgpURvK8XCrve9Vl-CrKfry-utgIOG8K4EhAABelMGoUXNetRHdafqhf-GhShpu7WJrgizkIelpY8bt5LEaYeeg
16 CmRSAAAAI2xI1Dov3zYF1fWUryBJdT7wvi4RIFDH4IGuiQhwZ4Q-o-kjGJ1Abj1NySb1_PvNks0YI1ibOxzkM7CqJN6WbMponXrs12mNQ9ka8sDPJeSeDD6UN90CFV9O2vXQSdRCEhBCpKRmwMMklPwj26PHRiCHGhRCGsWxkiQogvy8fVaJcPxRmfNP_w
17 CmRRAAAACMOQLV0fte_hy7XTXpzQHdtWTKoB18PM-2zmRSVGdsAvEsrryZS8-5BZk9K1c7J9eHel6h1-Pgu1nNA-xRhl0yNJRwZz-ZBC-9lXTihCcr1SS7qbGD3EmUQtpNVbvkFtEhD3FzzO9OwQwRIpqzXtPCAOGhQKkjcI2n5p-GqEJdV2xpER2TFtwg
18 CmRSAAAAsFpqKeJqZ83bvtFMbhM4FsVPovuD51aRRfYDNn_LiecIXkC4ULZ4Zvc3kkHGHoXdggzmmSaCCNqj6EAr-NMxhszC3JKjOi1KwRIW5_NBDKlmjA970EJkLo1oOmD86n3BEhChvYEvKwA8dKlVpRp4gkCuGhT0ozn2vpdtW74xZMt481kf0YZAZw
19 CmRSAAAAkhtFWETQheoY-pRSfQpiQX0nfcIgzpH3T5Iu1mk5djj1PJ2fmONWYlUJWuEXimn8wjuOZa894nPJ2Gpk2N41d0MpDYHfEkLjAHOXQ1TXEwSjQCoWEmzN7-9UnKMm9bxTEhBGmYOKbXefsav9Ixbf6ndXGhR8S--YMSAHiaoNBGoA4q6Ej8ZTyw
20 CmRbAAAAe-JGlauPU5l34P_41-sCiUmjLr4EeuPIx7A2-VuYv3q6PKhQIiDrE_uC6WZwx1WmuSF3-A8LWNWTWvmSYgsEKNeccIsn8fefIA4YAPTe-Vrv8g80sq4TacK2hXl_3XseEhDbK5I96Lt0K88Kgj7QQAHaGhTg9y926oHBZ28qii2QWyh67DZt0A
scope
1 GOOGLE
2 GOOGLE
3 GOOGLE
4 GOOGLE
5 GOOGLE
6 GOOGLE
7 GOOGLE
8 GOOGLE
9 GOOGLE
10 GOOGLE
11 GOOGLE
12 GOOGLE
13 GOOGLE
14 GOOGLE
15 GOOGLE
16 GOOGLE
17 GOOGLE
18 GOOGLE
19 GOOGLE
20 GOOGLE
types
1 locality, political
2 university, point_of_interest, establishment
3 bakery, cafe, food, store, point_of_interest, establishment
4 restaurant, food, point_of_interest, establishment
5 store, point_of_interest, establishment
6 bar, night_club, point_of_interest, establishment
7 bakery, cafe, bar, restaurant, food, store, point_of_interest, establishment
8 restaurant, food, point_of_interest, establishment
9 restaurant, food, point_of_interest, establishment
10 point_of_interest, establishment
11 health, point_of_interest, establishment
12 restaurant, food, point_of_interest, establishment
13 point_of_interest, establishment
14 bicycle_store, store, point_of_interest, establishment
15 bar, liquor_store, food, store, point_of_interest, establishment
16 doctor, health, point_of_interest, establishment
17 book_store, store, point_of_interest, establishment
18 atm, finance, point_of_interest, establishment
19 moving_company, storage, point_of_interest, establishment
20 neighborhood, political
vicinity opening_hours.open_now
1 Cambridge NA
2 77 Massachusetts Avenue, Cambridge FALSE
3 190 Massachusetts Avenue, Cambridge TRUE
4 300 Technology Square, Cambridge TRUE
5 NE49, 600 Technology Square, Cambridge TRUE
6 180 Massachusetts Avenue, Cambridge FALSE
7 500 Technology Square, Cambridge TRUE
8 245 Massachusetts Avenue, Cambridge TRUE
9 84 Massachusetts Avenue, Cambridge TRUE
10 32 Vassar Street, Cambridge NA
11 250 Massachusetts Avenue, Cambridge FALSE
12 612 Main Street, Cambridge FALSE
13 75 Amherst Street, Cambridge FALSE
14 259 Massachusetts Avenue, Cambridge TRUE
15 196 Massachusetts Avenue, Cambridge FALSE
16 77 Massachusetts Avenue, Cambridge NA
17 84 Massachusetts Avenue, Cambridge FALSE
18 600 Technology Square, Cambridge NA
19 60 State Street, Boston FALSE
20 Cambridge NA
opening_hours.weekday_text rating price_level
1 NULL NA NA
2 NULL 4.6 NA
3 NULL 4.5 1
4 NULL 4.3 3
5 NULL 2.6 2
6 NULL 3.5 NA
7 NULL 4.4 2
8 NULL 3.9 1
9 NULL 4.1 1
10 NULL 4.8 NA
11 NULL 4.2 NA
12 NULL 4.4 2
13 NULL 4.8 NA
14 NULL 3.7 NA
15 NULL 4.2 4
16 NULL NA NA
17 NULL 4.2 NA
18 NULL NA NA
19 NULL NA NA
20 NULL NA NA
$status
[1] "OK"
In [74]:
test["next_page_token"]
$next_page_token = 'CpQCDwEAAAzjNbdbfnbRSYoB-O6vSp1kNTBihLP7gSBcb7g2PbSEESrVMgPcl7Yb8NR4lgJCExwqH85KIV0OnCC-ZWIZ27_Bjw_ayhSWfNCNkb5Ps2fjSeq6dGnu51p-9ywf8GZ_N-AX1el4fxxt-AB6CleXNcADhtDPPzImBnZHCnt-vznCikRAh-t1WZBwmZTHnyElaqG4J4I9j1H5OG4JRWv3OySIB3kLaDtVfoeFBweAPJv1k4rLX7hz8tsDA9DRfYdAO5u2Lm3vEAjucgscFdXJ-vU5APr2QmUoM-AZa9FABAbPCdq3I_1PNEJwMA-4j2z-FcmgI-9eJP6glmmUzH2hXBYkNnTXOzXTz2EW1eB065MLEhAdOHTvRkIm7g1CDKbJu62vGhRsY-E2d4X3NbIrppwA9OrEVMZNgA'
In [76]:
next_page_token <- test$next_page_token
google_places(location = c(42.3592151,-71.0930055),
radius = 500,
page_token = next_page_token,
key = keyDist)
$html_attributions
list()
$next_page_token
[1] "CrQDrwEAAMlobjlpio46DQ-uWww0B7qHuKy3IWQU5tdkrdRHJMaOd_rjGsgBHiFpaMwv_lDC14UAWACn6uXxIThPX_CQAdNZGbe35too5qOPTzktfZVTivDYfBSgA5pSWhnyeDJf9gZdfTWMIkYGd3vf2nuBbHMAmx9y8r4E0-HJ_Wjm7T9p_y-OtE_XbsGW2hWbP35AgU2i532XhXIMJM5i_34yAaEDyHFk7VPACN40oQ2aQx57SHiR3BLj5RVG5Zolp-62VAW_QpTRok_lFkbrqnLqvgHH7dKXIZlRUqIEL8O7hMeklPSrheJJf-tBfVoe5W8OLi8tIm2jTCz5VLkHHgva0NZVaObGZ5AKQwtxf1I-dxHbtE9gE0Kn_IdC8StcF4cANAVKUixQvFsnK9cETVb_zNNin3WfFKQ_2tjw0EMhYnJcKIWhyPYf9u4jzmfCq92vCwadFDoH6T1N2NH2-ezXwyC32NZQBwWZUwAG7KGTjJPyWD00bSWwje-6Jrlfs5i7TgcXQCmYHNj3A93sLsHOjWjqT0nfTC6CHg2BeaKNm8NSL2MrJsGKUR8ImGZye-RAaRIQk1Km2xvCk2FzsN1NI67zVBoUdCeQRIPzwqnhY2r4UVaRobBJt3Y"
$results
geometry.location.lat geometry.location.lng geometry.viewport.northeast.lat
1 42.35881 -71.09620 42.36039
2 42.35925 -71.09313 42.36060
3 42.36240 -71.09165 42.36351
4 42.35924 -71.09314 42.36049
5 42.35838 -71.09805 42.35973
6 42.35847 -71.09641 42.35981
7 42.36310 -71.09145 42.36445
8 42.35924 -71.09314 42.36049
9 42.35904 -71.09762 42.36039
10 42.35901 -71.09620 42.36035
11 42.35901 -71.09764 42.36036
12 42.36083 -71.09630 42.36218
13 42.36161 -71.09244 42.36296
14 42.35937 -71.08831 42.36050
15 42.36370 -71.09288 42.36532
16 42.35862 -71.09584 42.36033
17 42.35863 -71.09648 42.35998
18 42.35905 -71.08919 42.36040
19 42.36171 -71.09713 42.36299
20 42.36081 -71.08771 42.36215
geometry.viewport.northeast.lng geometry.viewport.southwest.lat
1 -71.09506 42.35770
2 -71.09179 42.35791
3 -71.09009 42.36081
4 -71.09202 42.35780
5 -71.09670 42.35703
6 -71.09506 42.35712
7 -71.09003 42.36175
8 -71.09202 42.35780
9 -71.09627 42.35769
10 -71.09485 42.35766
11 -71.09629 42.35766
12 -71.09495 42.35949
13 -71.09109 42.36026
14 -71.08683 42.35780
15 -71.09150 42.36262
16 -71.09482 42.35763
17 -71.09513 42.35728
18 -71.08784 42.35771
19 -71.09586 42.36029
20 -71.08636 42.35946
geometry.viewport.southwest.lng
1 -71.09776
2 -71.09448
3 -71.09279
4 -71.09472
5 -71.09940
6 -71.09776
7 -71.09273
8 -71.09472
9 -71.09897
10 -71.09755
11 -71.09899
12 -71.09764
13 -71.09379
14 -71.08953
15 -71.09420
16 -71.09751
17 -71.09783
18 -71.09054
19 -71.09856
20 -71.08906
icon
1 https://maps.gstatic.com/mapfiles/place_api/icons/school-71.png
2 https://maps.gstatic.com/mapfiles/place_api/icons/generic_business-71.png
3 https://maps.gstatic.com/mapfiles/place_api/icons/school-71.png
4 https://maps.gstatic.com/mapfiles/place_api/icons/school-71.png
5 https://maps.gstatic.com/mapfiles/place_api/icons/generic_business-71.png
6 https://maps.gstatic.com/mapfiles/place_api/icons/generic_business-71.png
7 https://maps.gstatic.com/mapfiles/place_api/icons/generic_business-71.png
8 https://maps.gstatic.com/mapfiles/place_api/icons/generic_business-71.png
9 https://maps.gstatic.com/mapfiles/place_api/icons/generic_business-71.png
10 https://maps.gstatic.com/mapfiles/place_api/icons/school-71.png
11 https://maps.gstatic.com/mapfiles/place_api/icons/generic_business-71.png
12 https://maps.gstatic.com/mapfiles/place_api/icons/atm-71.png
13 https://maps.gstatic.com/mapfiles/place_api/icons/school-71.png
14 https://maps.gstatic.com/mapfiles/place_api/icons/generic_business-71.png
15 https://maps.gstatic.com/mapfiles/place_api/icons/generic_business-71.png
16 https://maps.gstatic.com/mapfiles/place_api/icons/generic_business-71.png
17 https://maps.gstatic.com/mapfiles/place_api/icons/generic_business-71.png
18 https://maps.gstatic.com/mapfiles/place_api/icons/library-71.png
19 https://maps.gstatic.com/mapfiles/place_api/icons/generic_business-71.png
20 https://maps.gstatic.com/mapfiles/place_api/icons/school-71.png
id
1 372dbeb58208011fbb3e29c59e4e500300c2c648
2 497f2b74e76f74aa0ed257bd80794b4460230b0b
3 9213cb25faafc9206aa4afa687900078ad605751
4 4c0dad386d9704e58f4cb6d1bc9284c572b2704a
5 eb2f51910582ca8f941051ac97f0390ed199f614
6 3dedbb18862b051d54ea0c8282447b184792197c
7 124f6f9dbc6e288b12706695beac5bd8e06a34c8
8 e5ce29a6745bbd514eeffa79c1aab8308a9e3f42
9 9b275de72065c7624f8c31c509f9b8aeef8b1abb
10 dd71b2fd0f1c70cada9c1b8cb943bf1977600fca
11 32d2459b9899f3b728ebcd09e7e3c7ff2f20dd2b
12 d8819f276fad8c173bae7c1f9143f03377588e93
13 471eff85379d97c0731efda753acb6ee4bd1cf40
14 eed27b4b37c0a0bc1fa7cd72143c91da49825275
15 efce3cc646f500bed050e891eb67799afac95db1
16 8272fc95b11ef7ee0872d984363ef7762f718e13
17 6caf1ae531ca7e722f24b64b5514121f48f6ad6d
18 e492dfcb853e556bcb0becc5de1dc3c875b44331
19 a3b65ef3039ee3f0d046a3cacd8b661e411eef1a
20 3a43bced720528cefdeb575f8c0260ec941fe662
name opening_hours.open_now
1 MIT Recreation - Swim Lessons TRUE
2 Dolores M. Vidal, RN NA
3 The Picower Institute for Learning and Memory at MIT NA
4 MIT School of Architecture and Planning NA
5 Henry G. Steinbrenner Stadium NA
6 Johnson Ice Rink TRUE
7 Massachusetts Biotechnology Council NA
8 Dr. William A. Ruth, MD NA
9 West Parking Garage NA
10 Cambridge Community Gymnastics FALSE
11 West Garage NA
12 Cardtronics ATM NA
13 Cyclotron NA
14 Walker Memorial NA
15 Cambridge Athletic Club TRUE
16 Cara Gustafson, ATC NA
17 Elise Parente, ATC NA
18 MIT Libraries NA
19 Chicago Pizza TRUE
20 Office of the Arts NA
opening_hours.weekday_text
1 NULL
2 NULL
3 NULL
4 NULL
5 NULL
6 NULL
7 NULL
8 NULL
9 NULL
10 NULL
11 NULL
12 NULL
13 NULL
14 NULL
15 NULL
16 NULL
17 NULL
18 NULL
19 NULL
20 NULL
photos
1 400, <a href="https://maps.google.com/maps/contrib/108978755841083247791/photos">MIT Recreation - Swim Lessons</a>, CmRaAAAARDzLqA5sAH-nG8aANqGYzPYfDrdpDo76W2REelq-ccyDnYJmyFn61w8o3tnyJ6-TRCufzsvQ5432ol9pCCJm2ZDuGYk5VvJUB1xLFKaOkU91frJRsNNwR8Bg_mvNSq8bEhDZIWtZO1F-3KOu-xEJJGFTGhQDQ-VoOoFdF1g76hucKX6CUgo6vw, 600
2 NULL
3 1388, <a href="https://maps.google.com/maps/contrib/108576089723461209638/photos">Joshua Sarinana</a>, CmRaAAAAN2u4sBxDE4MHcUda1LHtP2P5EhtnOGn69D_QgCQY6-SfeRipMKix5y5WT3urXQTujJuUH2p5DBNzyWB6yQoaj1uNEs2pKsqFPbpSPi4oNHac2fv-EtQ7nUT9rFZ5ryTPEhA3327frzOegiPjxO1Vx4XUGhRbIFGVqr6h0HjAPKFiusEGdOLZzQ, 1409
4 703, <a href="https://maps.google.com/maps/contrib/102743208253252136572/photos">Mustafa Sipka</a>, CmRaAAAArxM9D4aOnUdItLCnhBKHeqvcwh8-c4f4hs-pRgQiRpGxc4M3L4A0NVAPRP0FhCkEsleGZCosUNs8gh72UyqjbIG8GMTsGdOk949a1SmyhmsQitYu4vkngGe0YWoZlBmSEhChhiOLwko4cQkHr5xU3uRlGhSdepSOTRjConDJUSa37SsAx14j8g, 941
5 5312, <a href="https://maps.google.com/maps/contrib/108503501290514254915/photos">Gabriel Olivares</a>, CmRaAAAAeO07QpX9jiWAd013Yu-yH7v4QQyj7Vw-tCtscxK8mjHlz0xSGoF-m1qYgz8FGWoMOiojxFegj6GSMYXNoM-S11i8QFDcQchBzdQP7mt8OKu04APYs19MhpNZ3hTvcHwOEhC6vwOAZUzUdfmpbv-juplaGhQ9HKuRQ_FgW3TpN-cexXHsHwg5-g, 2988
6 1067, <a href="https://maps.google.com/maps/contrib/105846490952955324112/photos">Kolos Ferenc</a>, CmRaAAAAczEJ0mkb3yzjnMeZCcpV9fIcDXtqp11Q1fPK0G0jtcFd7SdQEJ3L7VrZxTPQPAeciupE7Vk3SNQyjJacr9u5eU0Kb8VrO6favhIYBe7pWorYKwMMqVgjgNgyoJQCEFdBEhBr4knVy6tbGyaRcKYKyktmGhQpxcq0ToDWx1bl3vSrRNUoeXPmLw, 1600
7 NULL
8 NULL
9 NULL
10 1536, <a href="https://maps.google.com/maps/contrib/111733804172332930092/photos">Cambridge Community Gymnastics</a>, CmRaAAAAXrh5Cx28lMzPTF0b9eJ0neC_LXIiPUx7yPaU8q8UaEhDg1KoYUqpcoBOU9w-p-sXwuqs2bNBEydP1mQVO1cAFhMd6Iy8vnkCb5EQxn_-PHRXfPX6sq2h7x6qzBGv2xnBEhDhgM5jhNCW998fam6OAtWLGhT63fbhJmEjbCsaC9kI00TAKOoh1w, 2048
11 NULL
12 NULL
13 763, <a href="https://maps.google.com/maps/contrib/118193160598482061258/photos">Jeremy Valadez</a>, CmRaAAAAumTQytmsVwcOZyZWnoS7mQSUICeW3-9VEpw0scv-dYIQ4gvJud7Xy6PQEhxSz2vbdIIBxcACaoU4ogdBVPATFSHYg4Ky_l5eDpqglAXctZ0JXCufwqbAWdUG5Q6rgIB0EhBeHXw1Plr8c-V-C2frHNfAGhT8V_l3FASLagGP3sVmTUnbLNO9zg, 432
14 3240, <a href="https://maps.google.com/maps/contrib/116255082793108230816/photos">Maurizio Giove</a>, CmRaAAAA_kXVBnQTubRE_lAHjUFxTzpGpTXHh3JR3dIdnDnSV0n06mRerpiBpevOe_iIEQOD0sG3tvEODcOB53TJGRfI6DmHqW94E6WppKC5kVJ-IewGXjcYRoy_bIM3MtluEMbbEhB6GVawaL5aFFgS4tVexnAHGhTMxLsJio4depLwswvP99_Cs0jzfA, 4320
15 3024, <a href="https://maps.google.com/maps/contrib/108270635781194231181/photos">Mark Massie</a>, CmRaAAAAapOknd5H5jA1vJNno8h-HkicbUWKSrxPk-Q3yCvNjZzwerv72KdcdsozhgQmr2HpKDIFs-PocnYrzH_KOIROogd0i7Sn7JUbrpJ2W08oyQaloCi3BguIzZjfIigHRRoOEhBRFeOS8GaxF3SlrZNkd4PfGhRFJ-RzGREVghFFg0XQrJdbf_CHCw, 4032
16 NULL
17 NULL
18 858, <a href="https://maps.google.com/maps/contrib/116620192778123442919/photos">Vinod Johnson</a>, CmRaAAAALgxtQ5NKj1irQ9hvcb9GfoR8fz7nuFoMm1COAPNvFJ5L42KylZmxM7_WspnL0BSU1VCCU8EgtwQBsbo4R1hJzsb5xmcafA2oQu4NqiUOWAV3g-ZvHFnaZcCy1fHQpZiTEhATPee7-L4gFWtTV2PQUzrmGhSQ9kiYliZbR6dC-XzspP-F9vVtdw, 1400
19 500, <a href="https://maps.google.com/maps/contrib/113359443379509946206/photos">Chicago Pizza</a>, CmRaAAAAZplzl4d5Ptw-5njd002Yp0fBt5-osJ7N0f2wM6kMZ-tvY8TzszCy6iph6-p05zr6kEGr-pgEE_ADK8-iiVBpLXNVPoyeCYdvJoC_C33XqK3DeORheYJivW8oxIf5S9aUEhBnkNWLEI0PMOxfbr0Dc9AjGhTJBNubCpL0PQElfaQrIPikozDBPQ, 748
20 NULL
place_id rating
1 ChIJnTiroKpw44kRwDQSnE8JNHU 4.4
2 ChIJuSzS_alw44kRFqHiHOJW4-w NA
3 ChIJf0Vh4qtw44kRN7nfZhy4JGo 5.0
4 ChIJr54iaapw44kRNOV6XjSIZiE 4.3
5 ChIJ-6gL8_9544kRD1kreuQTogU 5.0
6 ChIJuSzS_alw44kR2ACrrAa1n2w 4.5
7 ChIJawEL9qVw44kRHYwMBUqvjUw NA
8 ChIJuSzS_alw44kRGXq947FG0XE NA
9 ChIJyT6NVVV344kRvi5ULe3KFzo NA
10 ChIJnTiroKpw44kRaRLHmXQ1qsU 4.3
11 ChIJ2TmNVVV344kRSeQGY3cQ0L8 NA
12 ChIJV55c11R344kRXwxAnnyX4ao NA
13 ChIJQdtrwqtw44kRf5f6Umcx3Ss 5.0
14 ChIJoQqcTahw44kRSN8bTcpmfS0 4.8
15 ChIJu_CMdKxw44kR9IQiWZjGGgU 4.2
16 ChIJnTiroKpw44kRy11GEEC09Yc NA
17 ChIJnTiroKpw44kRZmLxNuFZV6w 5.0
18 ChIJuSzS_alw44kRSAdfm_9mVQo 4.5
19 ChIJrcxZLKtw44kRfh9E4t5Rcj4 2.3
20 ChIJKzby56hw44kRl7kW0PeEYTY NA
reference
1 CmRRAAAAPXZeevGrvTkJfRSYa-gPXzXKT-Wxb5b8rBFTgx4xzRfmfeSHexGKWHSNm3B4pkE28csDrWJn0k8p2JKkMoV_c8dvufYQ9hLqNMeArcJB-qzHfehkAsjdQbJvYLTEEROyEhCf1dGGLFn7ceMXQgIkgAPVGhQ5SV0NaUBUd-hx0Ob_9mUoEm7FNQ
2 CmRSAAAAsXi4ahJCJbktxstSzzDEwes0t46nBfOErzR-ifoRrPNH_DpyKR2cfB-MK9sXAvYnxI3Tl312LlRkM48w6zXCPyOEH65KqbypIUy-cYFG5I_cKrAAiN-lVvb1x97LMniWEhCx_ITK_Hc0L2K5-ss61IsaGhRCAvrQK9AsjeAgAtBBTKMLejxI4w
3 CmRRAAAA6b5tmnqSMQX6aGJPnZwsgb0fWQC7dXnBqRF5e7J4orAJqNy0fRvGIWOttaVE53GgiWjSCdVTFd18pdEMAEO4AIvWhBY78lm8fbtnIC8fG7D43l-4_Nr8rFVTLxhtS0jFEhAy0oaruvDUCX6JjPwnr2vxGhQWY_ccQwV64E7veV5aS8mNv1D-Dw
4 CmRRAAAAPi9qjw6ORCCL7U8Rv3Xtph7IfJ4Tp1hXJv1HznuCjtpjZifJ0pBFvGlcXYi7hgwatvGuzOCBqoqtpbcD4ajfxWGof6yWeINC4yVWO5NoiSdJObfP-x9O3X9gf6I9U83yEhBts-ihKiVT5_f9CVeEP9rkGhQyD4ZVUSVPviYIJP9hslbnSiWtlg
5 CmRRAAAAnS169tUXOQIJvypeezGa-kRatkZZLM_90LKnpRoKwByalVMWo00FFeQk-6_zHZwKC3O4ofbs-ubxcUXeXFHias9L8eKhauC2sFhrwpB9eu7KCoiMVluIvGfWkdDqxbyzEhAPwrAsZdCCWFQuYmjfY6WgGhTmZ1zGpsQPZVv23iIclchaoOxp1g
6 CmRRAAAAUQUMcK_urLhnQMXtfer_S1D9VR-qnxeW5_F__jKopufQ2POlq2pLTuTxkC9BWwKbrm4tIsHG3nmnjIbjO9eV83DnHdVA2BfAje0C7zqkXGK6UAXXB3zK5Dkxb3p8Pu9REhDZ657M8Ex7WOIeopb_FreHGhSoLqCTrHVTpdlZNd1yFKj73YgGnQ
7 CmRRAAAAiImxmB-W70KWsd6jAF75_LokJqaXssP3mzaSbVoXjZqNzAv70vQ1CkCXeTTtpad7ktneN0Djl0ELuHrdv8KWj6jBqwT18lID1W5ceOJH0ouLth3v_wun4xXrWwwRa1lREhDqr7Sa5Bk0UuAv3gVy--d0GhQR0YzHspbLCJH-S__WBL7HX-uAIA
8 CmRRAAAAqAZ613sYva6ODGZJ9OgLgDzGJfJjdvrIjE5xz2r72Wtne-qbnXxWngBqgSHqu8SDqAfjRlTLO5XtewYw-c8pRqf5uA0F0KeRzcx_tQnoW4umrOY7NcXVsoRQixO-hnquEhA5uD-msc_eTyvdkaUy55DGGhQDMNR1yDGaONwzX_i8KMo7ATCTgQ
9 CmRbAAAAr-IyvIg2AAngWRKooykb7X5-MTQe_XVnOcWFCnAePkLBwrV5uqEHvbtkd16n7hUhw1q_ZbvvI7R4nXf_NitMwSeD3DsygKMtSRBSUhUa5NIO7tbBT8KgkmxOXbUxngacEhBYX7JXa_1rgYn1rk7o8wbNGhQqsTuTW2xUU06kQU4zTsKmfW3onA
10 CmRSAAAAAkYdrPxdcfmTP_1wF5OqL32ljjUChXRRwGlffmLcaaoW5hbe2-HxsO_duUMYkOazrhjf__mUTowvIYzqbvJOtIb0UW374JszGszN1FKoSWntcN84c_9BC6Wn2JBZkL4AEhDtgZxzrAkyFFIIvQDgkXspGhQcqsdvrnJ_N6HzdH1hFyXoSBT_ug
11 CmRSAAAAkLpOysn3W9c1iKu0U8Tre4IwxiR1_cLpis78Mgd-MYobFuHd1hHXlaefTPcjlTA6Bz0sRXtSXP3PHydSqb99CRXnoLzUPX-hQD8PMa7fnHSWBx1BUMFW52uZT96bQTU5EhB4Jc16fkxbAky_mFLT-UCUGhR9v4FSt5bRx7mMkfzHnb7mkAm7Vw
12 CmRSAAAAuOZJXbPqdvEp1e5pnWAknunmSQ7Y0TjJgK1LfIXCWcHP5q01bzUwf2mmXEwso49uybAYKex29sQfKhUN9LG7MDSBgksmuV_Q3XkJB73jFjQfYfJkamlIFpwr5uwU_RVDEhDtbZ59CfUPdXgwscWlzjbIGhSdrxMKVAR7vQFMxYZQWmbKwH3B0A
13 CmRRAAAArG-3AL52YO4doaaihc5YCGIPSZO-WWZilXsDjiwn8WNzaw64HwsV9nIDIWWqYzIMfScghsAuckFJm8tJTOF4In8mDT2s8B6iUc0zg4oDBJkMOGjd_9G-dkFlhR2520DSEhCbWROOGwtNXQiYjAgNaAvTGhRkh68-I66gGfN1yN6u-QhrTumcog
14 CmRRAAAAGlcdCPMB6AT9UBaKq1Lq5HC2GUh5Kkl_0BB7-4Q0S4cyDd8wZTTFIZZ2zPam3r_2tRggiPtJbzCZICCNsghoV7M1RNb0P62q6HUkSFuyIfRI6tObQ46yPn00GvVvzXkoEhDwPc9PVoLgG9kBT9ujDeiDGhT13UoScIDlt4riDRcj2xHLYnka_Q
15 CmRRAAAAJLocuVwscLD4zCnkTLwqexPzivHKBFxSiP-HI_R8AI56_LT3-JCZDAke1lCKsu9T2qgPEoHq0qga6yCVcdNkW7oMYSkaiBr8cfBjJrhh-reaBiDbMBk4z3rwrT3gWl9fEhANXLGHPdtCdsLhhV1hhuwmGhSYLn5AHaGD8Y_fHaMYDCu2Ru-ZYg
16 CmRSAAAAskWWQo9v3sgTpqlLCU_ZJaHKwEvlF4hPcsUcLH0XRnb0ZFaQuQqpQM42o159GuZvgkofg3xOhnfGJlDWAEpDYtd-SAHPdT7FYCMHfJUXqWGzA3wmyyiOWLDEocPKDGrXEhCkIPe6GkJ-PqFw7kgL5k2AGhTukle39XdarBwaIW41kWB52NXm0Q
17 CmRSAAAAmvOdEjEcXaMRVo-igiL5ZBRBHvzlhot-7LrObnl2I6TMNsjsLvnxRNIkRobjt8PW9ccjGhnR7SpsCgJZj452u6rGzaSMs9idMyb9eEFVeqU0H0ZOsxO3jGhuO96n5vPUEhDSBv2eIX6t5neV6E90zaGgGhTwh5HFrraJDwXhTkUDU0BfzjUrlQ
18 CmRRAAAAQ6B-sdeCbCpJuPBPlY36VxlbplSQ_OiCjlf1DCO1owvCSP1Hn1wFUdU3SIhu5ahpiizYfaCJqnyQ9axnpcvNp3_Koi8lWt8XjhXORaMxl-mU7hXtONcm1QuBqcGmK9QTEhDYjCE6-sYvFh8-jeACek9qGhSHB_0RBjq01EecBzIBgGfaO9huaQ
19 CmRRAAAAVgPQBoYQMT0QprQZ0Kpvd-yXM-8njC5ZhjW4w2p7S3YTTjAfIgI4uf8h4gFLWRAT7n4WvBRR2lPjoN6bls9l7F1KgDCvUddyiEMsO5HIgWTM3P4UUX8LbJYW9Rwix3YkEhDwPjmH6AKWrJZzr3eNUSRoGhQsCPOlbfCXZqjOyE5-kjPb-uiDfg
20 CmRRAAAAaAOp-AcGCQ7VB2MDJad94oYu14c-rnAzoRkCoLF47ZUQ8t4K8XctGmLbDNuYMMWcQgV4n4AfOfRYwMJnouV_nPfsxoTYvh8pffU1zDzHHNgo_Xe2VV-gisE9aeyvhniGEhA_JhEId_jTXiRKlOR72HEEGhSpZQ1Se68mpiVBkXYwvvPyif8xxQ
scope
1 GOOGLE
2 GOOGLE
3 GOOGLE
4 GOOGLE
5 GOOGLE
6 GOOGLE
7 GOOGLE
8 GOOGLE
9 GOOGLE
10 GOOGLE
11 GOOGLE
12 GOOGLE
13 GOOGLE
14 GOOGLE
15 GOOGLE
16 GOOGLE
17 GOOGLE
18 GOOGLE
19 GOOGLE
20 GOOGLE
types
1 point_of_interest, establishment
2 doctor, health, point_of_interest, establishment
3 point_of_interest, establishment
4 point_of_interest, establishment
5 stadium, point_of_interest, establishment
6 point_of_interest, establishment
7 point_of_interest, establishment
8 doctor, health, point_of_interest, establishment
9 parking, premise, point_of_interest, establishment
10 gym, health, point_of_interest, establishment
11 point_of_interest, establishment
12 atm, bank, finance, point_of_interest, establishment
13 university, point_of_interest, establishment
14 point_of_interest, establishment
15 gym, health, point_of_interest, establishment
16 doctor, health, point_of_interest, establishment
17 doctor, health, point_of_interest, establishment
18 library, point_of_interest, establishment
19 meal_delivery, meal_takeaway, restaurant, food, store, point_of_interest, establishment
20 university, point_of_interest, establishment
vicinity price_level
1 120 Vassar Street, Cambridge NA
2 77 Massachusetts Avenue, Cambridge, MA 02139, Cambridge NA
3 43 Vassar Street, Cambridge NA
4 337, 77 Massachusetts Avenue, Cambridge NA
5 Cambridge NA
6 77 Massachusetts Avenue, Cambridge NA
7 300 Technology Square, Cambridge NA
8 77 Massachusetts Avenue, Cambridge NA
9 Cambridge NA
10 120 Vassar St., MIT duPont Gymnasium, Cambridge NA
11 Cambridge NA
12 180 Massachusetts Avenue, Cambridge NA
13 Cambridge NA
14 142 Memorial Drive, Cambridge NA
15 600 Technology Square, Cambridge NA
16 120 Vassar Street, Cambridge NA
17 120 Vassar Street, Cambridge, MA 02139, Cambridge NA
18 77 Massachusetts Ave # 14S-216, Cambridge NA
19 239 Massachusetts Avenue, Cambridge 2
20 75 Amherst Street - City View Room, Cambridge NA
$status
[1] "OK"
Typically, a 'while' and a 'for' loop are needed to retrieve the places at a location location.
Google Elevation API¶
In [88]:
google_elevation(mit, polyline = NULL,
location_type = c("path"), samples = 20, keyDist,
simplify = TRUE)
$results elevation location.lat location.lng resolution 1 1.477637 42.35922 -71.09301 9.543952 2 2.780119 42.35954 -71.09356 9.543952 3 2.630147 42.35986 -71.09412 9.543952 4 2.752434 42.36018 -71.09468 9.543952 5 2.396201 42.36050 -71.09523 9.543952 6 2.104616 42.36082 -71.09579 9.543952 7 2.263908 42.36114 -71.09635 9.543952 8 1.982063 42.36147 -71.09691 9.543952 9 2.257129 42.36179 -71.09746 9.543952 10 2.444169 42.36211 -71.09802 9.543952 11 2.904974 42.36243 -71.09858 9.543952 12 2.127851 42.36275 -71.09913 9.543952 13 2.101060 42.36307 -71.09969 9.543952 14 2.262573 42.36340 -71.10025 9.543952 15 2.560928 42.36372 -71.10080 9.543952 16 2.406585 42.36404 -71.10136 9.543952 17 3.175499 42.36436 -71.10192 9.543952 18 3.949722 42.36468 -71.10248 9.543952 19 4.321166 42.36500 -71.10303 9.543952 20 4.944111 42.36532 -71.10359 9.543952 $status [1] "OK"
In [ ]: