Plot the result of viewshed
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
if (FALSE) {
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))
}