EqualAreaRectangle {GeoRange}

Create a rectangular shaped distribution with equal area to a given area

Description

Create a rectangular shaped distribution with equal area to a given area

Usage

EqualAreaRectangle(center = c(0, 0), TargetArea, error = 0.001)

Arguments

center

- Arrary containing the coordinates of the center of circular portion of the rectangle in decimal degree

TargetArea

- Area in square kilometers desired for the rectangle

error

- The tolerable proportion of error between the rectangular shape and the TargetArea

Value

Returns a 2-dimensional array of decimal degree coordinates outlining a rectangular shaped distribution

Note

This returns 100 evenly spaced points along each corner of the rectangle, in addition to the corners themselves

Examples

HorseShoeTest<-PtsAlgHorseShoe(z=2000,spacing=1,endAngles=c(-90,90))
HorseShoePts<-RandHorseShoe(center=c(0,0),npts=100,HorseShoeShape=HorseShoeTest)
EqualAreaRectangle(TargetArea=as.numeric(HorseShoePts$TotalArea_km2),error=0.001)