inst/raw_data/read-in_raw.R

forest <- rgdal::readOGR(system.file('raw_data', 'sosma_fragments', 
                                     package = 'CaatingaArthropods'), 'sosma')

lcover <- raster::raster(system.file('raw_data', 'landcover_sosma.tif', 
                                     package = 'CaatingaArthropods'))
lcoverkey <- data.frame(code = c(14, 20, 30, 40, 50, 60, 110, 120, 130, 
                                 150, 180, 200, 210), 
                        type = c('Cropland', 'Mosaic mostly cropland', 
                                 'Mosaic mostly veg',
                                 'Closed to open evergreen/semideciduous forest', 
                                 'Closed deciduous forest', 'Open deciduous forest', 
                                 'Mosaic mostly forest/shrubland', 
                                 'Mosaic mostly grassland', 'Closed to open shrubland', 
                                 'Sparse vegetation', 
                                 'Grassland or woody veg on regularely flooded soil',
                                 'Bare area', 'Water bodies'), 
                        stringsAsFactors = FALSE)

regions <- rgdal::readOGR(system.file('raw_data', 'caatinga_regions.kml', 
                                      package = 'CaatingaArthropods'), 'caatinga_regions')
regions@data <- data.frame(region = regions$Name)
regions$region <- gsub('_', '_0', regions$region)

roads <- rgdal::readOGR(system.file('raw_data', 'BRA_rds', package = 'CaatingaArthropods'), 
                        'BRA_roads')
role-model/CaatingaArthropods documentation built on Jan. 9, 2020, 12:36 a.m.