World maps

> library(maptools)
> library(rgdal)

> setwd("C:/Users/batagelj/Documents/papers/2018/CRoNoS/shape/TM_world")
> W<-readShapePoly("TM_WORLD_BORDERS-0.3.shp")
> plot(W)
> plot(W,xlim=c(-25,48),ylim=c(40,67))
> plot(W,xlim=c(-10,45),ylim=c(52,60))

> setwd("C:/Users/batagelj/Documents/papers/2018/CRoNoS/shape/nEarth")
> W<-readShapePoly("ne_50m_admin_0_countries.shp")
> plot(W,xlim=c(-10,45),ylim=c(52,60))
> plot(W,xlim=c(15,20),ylim=c(52,60))
> plot(W,xlim=c(12,20),ylim=c(40,50))

> setwd("C:/Users/batagelj/Documents/papers/2018/CRoNoS/shape/world")
> W<-readShapePoly("world.shp")
> plot(W,xlim=c(-10,45),ylim=c(52,60))