Occurence data
Visual check and filtering of data with IUCN EOOs Step 3/4
Many records fall outside the native range. We will refine the dataset removing those records:
> krameri_sp<-SpatialPoints(xy)
> ov<-over(krameri_sp, krameri_EOO)
> krameri<-krameri[!is.na(ov[,1]),]
And we plot again the occurrences on the map:
> plot(wrld_simpl)
> plot(krameri_EOO, col="cyan", add=T)
> xy<-cbind(krameri$lon,krameri$lat)
> points(xy, pch=21, bg="red",cex=0.5)
Figure 1.3: The occurences of P. krameri after the removal of occurrences falling outside the native range