showNb: Show Neighborhood

Description

Shows the neighborhood corresponding to the left-to-right top-to-bottom raster scan order with additional information: variable names of the data frame returned by dataPrep, predictors used in the model returned by surfacemodel, or their percentage importance currently, extracted from the rpart object) in the model. This function is useful for choosing a good neighborhood size and understanding relationship between pixels (e.g., periodcity).

Usage

showNb(model, what = c("neighborhood", "predictors", "importance"), plot.it = TRUE)

Arguments

model

either the object returned by surfacemodel or a positive vector of length 1 or 3 specifying the neighboorhood. If it is a vector, what <- "neighborhood".

what

what to show in the neighorhood. "neighborhood" shows variable names of the data frame returned by dataPrep, "predictors" shows predictors used in the model returned by surfacemodel, "importance" shows their percentage importance in the model.

plot.it

if TRUE, plot the neighborhood.

Value

A matrix that contains the information for the plot (using the grid.table function).

References

Bui, A.T., and Apley., D.W. (2017) A Monitoring and Diagnostic Approach for Stochastic Textured Surfaces", Technometrics (in press).

Examples

Run this code

# NOT RUN {
## show the neighorhood with variables names of the data frame constructed by dataPrep()
img <- matrix(1:25, 5, 5) # an image of size 5x5 pixels
img
dataPrep(img, 2)
showNb(c(2, 2, 2)) # showNb(2) has the same effect

## show the neighorhood with predictors and their importance used in the model returned
## by surfacemodel()
img <- sarGen(m = 100, n = 100, border = 50) # training image
model <- surfacemodel(img, nb = 3)
showNb(model, "predictors") # show predictors
showNb(model, "importance") # show predictor percentage importance
# }