modify1 {DRIP}

Type-1 Modification Procedure

Description

Modify detected edges to make them thin.

Usage

modify1(bandwidth, image, edge, plot)

Arguments

image

A matrix that represents the image.

bandwidth

A positive integer that specifies the number of pixels to use in the local smoothing.

edge

A matrix of 0 and 1 represents detected edge pixels.

plot

If plot = TRUE, images of detected edges before and after the modification are plotted.

Details

A local-smoothing based edge detection algorithm may flag deceptive edge pixel candidates. One kind of such candidates consists of those close to the real edges. They occur due to the nature of local smoothing. That is, if the point (x_i, y_j) is flagged, then its neighboring pixels will be flagged with high probability. This kind of deceptive candidates can make the detected edges thick. This modification procedure makes the detected edges thin.

Value

A matrix of zeros and ones of the same size as the input image.

References

Qiu, P. and Yandell, B. (1997) "Jump Detection in Regression Surfaces," Journal of Computational and Graphical Statistics 6(3), 332-354, doi:10.1080/10618600.1997.10474746.

See Also

modify2

Examples

edge <- stepEdge(sar, bandwidth = 4, thresh = 20, degree = 0)
out <- modify1(4, sar, edge)