Todo: add vehicles and casualties datasets
A data frame
1 2 3 4 5 6 7 | ## Not run:
set.seed(2018)
ac_sample1000 = ac[sample(nrow(ac), 1000), ]
usethis::use_data(ac_sample1000, overwrite = TRUE)
## End(Not run)
plot(ac_sample1000$Longitude, ac_sample1000$Latitude)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.