if (FALSE) {
# SpatialPolygonsDataFrame & geographical
data(Phyllomedusa)
rangesize <- lets.rangesize(x = Phyllomedusa,
coordinates = "geographic")
# SpatialPolygonsDataFrame & planar
rangesize2 <- lets.rangesize(x = Phyllomedusa,
coordinates = "planar")
# PresenceAbsence & cell
data(PAM)
rangesize3 <- lets.rangesize(x = PAM,
units = "cell")
# PresenceAbsence & squaremeter
rangesize4 <- lets.rangesize(x = PAM,
units = "squaremeter")
}
Run the code above in your browser using DataLab