https://github.com/zumbov2/rayshader-adelboden

Example code of rayshader exploration
https://github.com/zumbov2/rayshader-adelboden

3d datavisualization geodata rstats switzerland

Last synced: 2 months ago
JSON representation

Example code of rayshader exploration

• Host: GitHub
• URL: https://github.com/zumbov2/rayshader-adelboden
• Owner: zumbov2
• Created: 2019-11-15T23:33:12.000Z (about 5 years ago)
• Default Branch: master
• Last Pushed: 2019-11-15T23:35:32.000Z (about 5 years ago)
• Last Synced: 2024-11-03T07:32:36.444Z (3 months ago)
• Topics: 3d, datavisualization, geodata, rstats, switzerland
• Language: R
• Homepage:
• Size: 74.8 MB
• Stars: 20
• Watchers: 3
• Forks: 5
• Open Issues: 0
• Metadata Files:
  • Readme: README.md

Awesome Lists containing this project

README

        
# Rayshading Adelboden

Here you can find some code examples of my exploration of [Tyler Morgan-Wall's](https://twitter.com/tylermorganwall) amazing [rayshader package](https://www.rayshader.com/) for R. My approach was heavily inspired by Will Bishop's blog post [I can rayshade, and so can you](https://wcmbishop.github.io/rayshader-demo/).

 

  

## Short version of ```code_adelboden.R```

### Goal ###

Creating a 3-dimensional image of my favourite ski holiday destination [Adelboden](https://de.wikipedia.org/wiki/Adelboden).

### Approach ###

- We download the latest shapefiles of the **municipal boundaries** from the website of the Swiss [Federal Statistical Office](https://www.bfs.admin.ch/bfs/de/home/dienstleistungen/geostat/geodaten-bundesstatistik/administrative-grenzen/generalisierte-gemeindegrenzen.html).

- We access different types of **elevation data**: [SRTM 90m](https://dwtkns.com/srtm/) and [SRTM 30m](https://dwtkns.com/srtm30m/) of NASA's [Shuttle Radar Topography Mission](https://www2.jpl.nasa.gov/srtm/) and we create an even more fine-grained elevation model (10m) with Google's [Elevation API](https://developers.google.com/maps/documentation/elevation/start) (5 USD per 1000 requests, total costs of ~ 25 USD).

- We use [rayshader](https://www.rayshader.com/) for a **three-dimensional spatial visualization** of Adelboden's 88,2 km2.

  

- We download a suitable **aerial image** via the [ArcGIS REST API](https://utility.arcgisonline.com/arcgis/rest/services/Utilities/PrintingTools/GPServer/Export%20Web%20Map%20Task/execute) using Will Bishop's `get_arcgis_map_image` [function](https://github.com/wcmbishop/rayshader-demo/blob/master/R/map-image-api.R).

- We printscreen an **arial image** from the map of the [Swiss Federal Geoportal](https://map.geo.admin.ch), assign it georeferences and crop it to the appropriate size.

- We **overlay** the rayshaded 3D visualizations with the aerial images.

  

- We add georeferenced **labels** and render a **video** of the scenery.

  

And...it's a wrap!