plot_viewshed: Plot viewshed results

In windfarmGA: Genetic Algorithm for Wind Farm Layout Optimization

Description

Plot the result of viewshed

Usage

plot_viewshed(res, legend = FALSE, ...)

Arguments

res	The resulting list from viewshed
legend	Plot a legend? Default is FALSE
...	Is passed along to plot

See Also

Other Viewshed Analysis: cansee(), interpol_view(), rasterprofile(), viewTo(), viewshed()

Other Plotting Functions: interpol_view(), plot_cloud(), plot_development(), plot_evolution(), plot_fitness_evolution(), plot_heatmap(), plot_parkfitness(), plot_result(), plot_windfarmGA(), plot_windrose(), random_search_single()

Examples

## Not run: 
library(raster)
library(sf)
Polygon1 <- sf::st_as_sf(sf::st_sfc(
  sf::st_polygon(list(cbind(
    c(4496482, 4496482, 4499991, 4499991, 4496482),
    c(2666272, 2669343, 2669343, 2666272, 2666272)))),
  crs = 3035
))
DEM_meter <- getDEM(Polygon1)

turbloc = st_sample(DEM_meter[[2]], 10, type = "random");
res <- viewshed(r = DEM_meter[[1]], shape = DEM_meter[[2]], turbine_locs = turbloc,  
                h1 = 1.8, h2 = 50)
plot_viewshed(res)

## ... Arguments are past on to raster::plot
plot_viewshed(res, legend = TRUE, interpolate=TRUE, colNA="black", 
              col = topo.colors(15))

## End(Not run)

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