grid_area: Make a grid from a Simple Feature Polygon

Description Usage Arguments Value Note See Also Examples

View source: R/grid_area.R

Description

Create a grid from a given polygon with a certain resolution and proportionality. The grid cell centroids represent possible wind turbine locations.

Usage

1
grid_area(shape, size = 500, prop = 1, plotGrid = FALSE)

Arguments

shape

Simple Feature Polygon of the considered area

size

The cellsize of the grid in meters. Default is 500

prop

A factor used for grid calculation. It determines the minimum percentage that a grid cell must cover the area. Default is 1

plotGrid

Logical value indicating whether the results should be plotted. Default is FALSE

Value

Returns a list with 2 elements. List element 1 will have the grid cell IDS, and the X and Y coordinates of the centers of each grid cell. List element 2 is the grid as Simple Feature Polygons, which is used for plotting purposes.

Note

The grid of the genetic algorithm will have a resolution of Rotor * fcrR. See the arguments of windfarmGA

See Also

Other Helper Functions: dup_coords(), getDEM(), getISO3(), get_grids(), hexa_area(), isSpatial(), permutations(), readintegerSel(), readinteger(), splitAt(), windata_format()

Examples

 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
## Not run: 
## Exemplary input Polygon with 2km x 2km:
library(sf)
Polygon1 <- sf::st_as_sf(sf::st_sfc(
 sf::st_polygon(list(cbind(
   c(0, 0, 2000, 2000, 0),
   c(0, 2000, 2000, 0, 0)))),
crs = 3035
))

## Create a Grid
grid_area(Polygon1, 200, 1, TRUE)
grid_area(Polygon1, 400, 1, TRUE)

## Examplary irregular input Polygon
Polygon1 <- sf::st_as_sf(sf::st_sfc(
 sf::st_polygon(list(cbind(
   c(0, 0, 2000, 3000, 0),
   c(20, 200, 2000, 0, 20)))),
 crs = 3035
))

## Create a Grid
grid_area(Polygon1, 200, 1,   TRUE)
grid_area(Polygon1, 200, 0.1, TRUE)
grid_area(Polygon1, 400, 1,   TRUE)
grid_area(Polygon1, 400, 0.1, TRUE)

## End(Not run)

windfarmGA documentation built on May 5, 2021, 5:08 p.m.