my site: https://b04902122.github.io/CSX_R/week_2/myRcrawler.html

IKEA-RCrawler

library(httr)

url <- "https://ww8.ikea.com/ext/iplugins/en_US/data/local-stores/data.json"
res = GET(url)
res_json = content(res)
raw = (data.frame(do.call(rbind,res_json)))

Show Results

library(knitr)
kable(raw)
storeState storeCity storeNumber
AZ Tempe 209
CA Burbank 399
CA Carson 162
CA Costa Mesa 167
CA Covina 413
CA East Palo Alto 347
CA Emeryville 165
CA San Diego 166
CA West Sacramento 157
CO Centennial 064
CT New Haven 213
FL Jacksonville 537
FL Miami 327
FL Orlando 145
FL Sunrise 207
FL Tampa 042
GA Atlanta 257
IL Bolingbrook 170
IL Schaumburg 210
IN Fishers 536
KS Merriam 374
MD Baltimore 152
MD College Park 411
MA Stoughton 158
MI Canton 026
MN Twin Cities 212
MO St. Louis 410
NV Las Vegas 462
NJ Elizabeth 154
NJ Paramus 409
NY Brooklyn 921
NY Long Island 156
NC Charlotte 067
OH Columbus 511
OH West Chester 175
OR Portland 028
PA Conshohocken 211
PA South Philadelphia 215
PA Pittsburgh 153
TN Memphis 508
TX Frisco 183
TX Houston 379
TX Grand Prairie 535
TX Round Rock 027
UT Draper 103
VA Woodbridge 168
WA Renton 488