```r
g1<- g1 + labs(title = "Annual precipitation recorded at Hurn meterological station, Dorset", x="Year", y="Total annual precipitation in mm")
g1
```

<img src="qs_21_files/figure-html/unnamed-chunk-61-1.png" width="672" />