Description Usage Arguments Value Author(s) Examples
Extracts training data from a raster stack and returns a dataframe containing for each pixel all values.
1 | get_traindata(rasterStack = NULL, trainPlots = NULL)
|
rasterStack |
an object of rasterstack*. containing image data to make prediction on |
trainPlots |
an object of SpatialPolygonDataFrame*. providing the training areas |
data frame with either the raster stack of all trainingn data and/or the data frame containing the training data vlaues of given training areas
Chris Reudenbach
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 | ## Not run:
##- required packages
require(uavRst)
setwd(tempdir())
##- get the tutorial data
utils::download.file("https://github.com/gisma/gismaData/raw/master/uavRst/data/tutorial_data.zip",
"tutorial_data.zip")
unzip("tutorial_data.zip",exdir = ".")
##- get the files
imageTrainStack <- list()
geomTrainStack <- list()
imageTrainFiles <- Sys.glob("rgb??.tif")
geomTrainFiles <- Sys.glob("rgb??.shp")
##- create stacks from image and geometry files
imageTrainStack<-lapply(imageTrainFiles, FUN=raster::stack)
geomTrainStack <- lapply(geomTrainFiles, FUN=raster::shapefile)
names(imageTrainStack[[1]])<-c("red","green","blue")
names(imageTrainStack[[2]])<-c("red","green","blue")
names(imageTrainStack[[3]])<-c("red","green","blue")
##' finally extraxt the training data to a data frame
trainDF <- get_traindata(rasterStack = imageTrainStack,
trainPlots = geomTrainStack)
##- have a look at the training data
head(trainDF)
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.