Visualise geometric objects

Visualise geometric objects

visualise(
  ...,
  window = NULL,
  trace = FALSE,
  new = TRUE,
  clip = TRUE,
  theme = gtTheme
)

Arguments

...	objects to plot and optional graphical parameters.
window	[data.frame(1)] two opposing corners of a rectangle to which the plot is limited.
trace	[logical(1)] Print the provenance information of the geometric object (if available) (TRUE), or simply plot the object (FALSE, default).
new	[logical(1)] force a new plot (TRUE, default).
clip	[logical(1)] clip the plot by the plot box (TRUE, default), or plot also objects that go beyond the plot box.
theme	[list(7)] the theme from which to take graphical parameters; see setTheme for details.

Value

Returns invisibly an object of class recordedplot, see recordPlot for details (and warnings).

Examples

# make an empty plot
visualise()

visualise(window = getExtent(gtGeoms$grid$continuous))


coords <- data.frame(x = c(30, 60, 60, 40),
                     y = c(40, 40, 60, 70),
                     fid = 1)
(aGeom <- gs_polygon(anchor = coords))
#> geom        polygon
#>             1 group | 1 feature | 5 points
#> crs         cartesian
#> attributes  --
#> tiny map       70 
#>                ◌ ◎ ◌ ◌    
#>                ◌ ◌ ◌ ◎    
#>                ◌ ◌ ◌ ◌    
#>             30 ◉ ◌ ◌ ◎ 60 
#>                40 
visualise(aGeom)


win <- data.frame(x = c(0, 80),
                  y = c(0, 80))
withWindow <- setWindow(x = aGeom, to = win)
visualise(expanded = withWindow)


(aRaster <-  gtGeoms$grid$continuous)
#> geom        grid
#>             1 layers | 3360 cells
#> crs         cartesian
#> attributes  --
#> resolution  1 1 (x, y)
#> extent      0 60 0 56 (xmin, xmax, ymin, ymax)

# plot several objects together
visualise(aRaster, aGeom)


# give names
visualise(`a raster` = aRaster, `a geom` = aGeom)


# use graphical parameters ...
visualise(aGeom, linecol = "green")


# ... or a theme
visualise(aRaster, theme = setTheme(title = list(plot = FALSE)))