The function rgeo()
works a bit like rflip()
, but instead of randomly flipping coins, it randomly selects points on the earth. You can create 10 such points with
Places <- rgeo(10)
Places
## lat lon
## 1 -50.587328 69.69287
## 2 14.158126 16.19094
## 3 12.623850 -78.21591
## 4 14.285802 152.43605
## 5 46.205840 -74.76630
## 6 16.297284 121.42643
## 7 -78.815743 -76.95962
## 8 -32.337061 -83.94452
## 9 19.400388 -112.77980
## 10 1.633282 -96.39867
Replace the number 10 with some other number to generate a different number of points.
If you want to see these places on a map, you can do this
leaflet_map(position = Places, mark = TRUE)
Of course, you should see different random places on your map.
Zoom in on each of your positions and enter the information (latitude, longitude, and whether you are on land or in water) in this google form. You can click on the marker to reveal the latitude and longitude.
We can use the data to create a confidence interval for the proportion of the earth that is covered by water.
Here is a map of the data we collected.
Status | count |
---|---|
Land | 146 |
Water | 367 |