require(rangeMapper)
dbcon = rangeMap.start(file = "test.sqlite", overwrite = TRUE, dir = tempdir() )
# Breeding range vector files location
f = system.file(package = "rangeMapper", "extdata", "wrens", "vector_combined")
# Save the global bounding box,
global.bbox.save(con = dbcon, bbox = f,
p4s = CRS("+proj=cea +lon_0=0 +lat_ts=30 +x_0=0 +y_0=0 +ellps=WGS84 +units=m +no_defs") )
# upload grid size using the proposed default
gridSize.save(dbcon, gridSize = 100000) # cell size ~ 100km
# save canvas
canvas.save(dbcon)
summary(canvas.fetch(dbcon) )
# Upload BIO tables
data(wrens)
bio.save(con = dbcon, loc = wrens, ID = "sci_name")
# Process species ranges
r = readOGR(f, "wrens", verbose = FALSE)
processRanges(spdf = r, con = dbcon, ID = "sci_name" )
#Using sqlite aggregate functions
rangeMap.save(dbcon, FUN = "median" , biotab = "wrens",
biotrait = "body_size", tableName = "body_size")
# Fetch maps
summary(rangeMap.fetch(dbcon) )
# more examples at: http://rangemapper.r-forge.r-project.org
Run the code above in your browser using DataLab