heatmap.2(x=mat)```## Using north arrow and scalebar
```r
ggplot()+annotation_spatial(longlake_waterdf)+layer_spatial(longlake_depthdf, aes(col = DEPTH_M))+annotation_scale(location ="tl")+annotation_north_arrow(location ="br", which_north ="true")