Load packages

Read in data

Here are the peaks un the sawatch range

## Rows: 584
## Columns: 5
## $ Rank      <dbl> 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, …
## $ Peak      <chr> "Grizzly Peak A", "Stewart Peak", "Columbia Point", "Pigeon …
## $ Elevation <dbl> 13988, 13983, 13980, 13972, 13971, 13951, 13951, 13950, 1394…
## $ Elev_m    <dbl> 4265, 4263, 4262, 4260, 4259, 4253, 4253, 4253, 4251, 4250, …
## $ Range     <chr> "Sawatch", "San Juan", "Sangre de Cristo", "San Juan", "Sawa…

Here are the peaks in the san juans

summary

## # A tibble: 1 × 1
##     mean
##    <dbl>
## 1 13401.

plotting expnapl

mapping

## Rows: 224
## Columns: 9
## $ brewery               <chr> "Brauerei Rittmayer", "Brauhaus Leikeim", "Ammer…
## $ address               <chr> "Aischer Hauptstrasse 5", "Gewerbegebiet 4", "Ma…
## $ zipcode               <chr> "91325", "96264", "90614", "97688", "97450", "91…
## $ village               <chr> "Adelsdorf", "Altenkunstadt", "Ammerndorf", "Bad…
## $ state                 <fct> Bayern, Bayern, Bayern, Bayern, Bayern, Bayern, …
## $ founded               <dbl> 1422, 1887, 1730, NA, 1885, 1886, 1867, 2004, 16…
## $ number.of.types       <dbl> 2, 11, 10, 6, 5, 7, 8, 3, 5, 5, 3, 5, 4, 6, 4, 2…
## $ number.seasonal.beers <dbl> 1, 1, 0, 0, 0, 0, 0, 3, 0, 1, 2, 2, 1, 3, 4, 0, …
## $ geometry              <POINT [°]> POINT (10.88922 49.71979), POINT (11.23873…