In [1]:
library(readr)

In [2]:
url_csv <- "http://s3.amazonaws.com/assets.datacamp.com/production/course_1478/datasets/swimming_pools.csv"

In [4]:
swimming_pools <- read.csv(url_csv)
head(swimming_pools)


NameAddressLatitudeLongitude
Acacia Ridge Leisure Centre 1391 Beaudesert Road, Acacia Ridge -27.58616 153.0264
Bellbowrie Pool Sugarwood Street, Bellbowrie -27.56547 152.8911
Carole Park Cnr Boundary Road and Waterford Road Wacol-27.60744 152.9315
Centenary Pool (inner City) 400 Gregory Terrace, Spring Hill -27.45537 153.0251
Chermside Pool 375 Hamilton Road, Chermside -27.38583 153.0351
Colmslie Pool (Morningside) 400 Lytton Road, Morningside -27.45516 153.0789

In [5]:
swimming_pools <- read_csv(url_csv)
head(swimming_pools)


Parsed with column specification:
cols(
  Name = col_character(),
  Address = col_character(),
  Latitude = col_double(),
  Longitude = col_double()
)
NameAddressLatitudeLongitude
Acacia Ridge Leisure Centre 1391 Beaudesert Road, Acacia Ridge -27.58616 153.0264
Bellbowrie Pool Sugarwood Street, Bellbowrie -27.56547 152.8911
Carole Park Cnr Boundary Road and Waterford Road Wacol-27.60744 152.9315
Centenary Pool (inner City) 400 Gregory Terrace, Spring Hill -27.45537 153.0251
Chermside Pool 375 Hamilton Road, Chermside -27.38583 153.0351
Colmslie Pool (Morningside) 400 Lytton Road, Morningside -27.45516 153.0789

In [ ]: