R script to investigate spatial components of metadata I currently have to work with