remote: Class, methods, and functions for remote sensing objects

In bmcnellis/RSFIA: FIA Tree Mortality Analysis

Description

Wrapper/processing functions for remotely-sensed data.

Usage

## S4 method for signature 'remote'
initialize(.Object, ...)

## S4 method for signature 'remote'
SetupDataFile(object, overwrite = F, backup = F)

ReadEarthEngineOutputs(object, satellite)

BandKey()

DistillRasterStack(coords, geo_dir = getwd())

DropFirePerimeters(df, fire_dir, yrs = c(2000, 2015), as_logical = F)

FilterPointsByGeoMac(coords, years, dir = getwd(), tag = "perimeters")

Arguments

object	Object of class 'remote'
bands	Integer vector of bands to include (in Landsat 8 form)

Format

object of class 'remote'

Slots

ft_dir

Directory location of fusion table/GEE output files

bands

Bands from BandKey() to include, must be in GEE filename as band*

Author(s)

Brandon McNellis

Examples

NULL
library(RSFIA)
remote <- new('remote')
remote@bands <- c(101L, 102L, 103L, 7L)
remote <- AddCoords(remote, FIA_mortality_with_explanatory$LON, FIA_mortality_with_explanatory$LAT)
remote@nc_dir <- '/media/bem/F_STORAGE/RSFIA_analysis'
remote@file_name <- 'RGI_NDVI_NDMI_MIR_2000_2015_nplots12k.nc'
remote@ft_dir <- '/media/bem/F_STORAGE/RSFIA_data/GEE_outputs'
remote@variables <- as.character(remote@bands)
remote <- SetupDataFile(remote)
t1 <- Sys.time()
ReadEarthEngineOutputs(remote, 'Landsat 7')
remote@n_fill <- length(remote@sample)
print(difftime(Sys.time(), t1))

bmcnellis/RSFIA documentation built on June 1, 2019, 7:40 a.m.