Motif Rotation

motif_rotation(tile, theta, center = c(0, 0))

Arguments

tile

is sf object likes as output of motif function.

theta

the angle of rotation.

center

the center of rotation. it is 2-D vector like c(0,0).

Value

sf object

Examples

library(ggplot2)
tile <- motif(polyLine = T, drawBox = T)
tile_30 <- motif_rotation(tile,30,center = c(0,1))
tilePlotter(tile)
#> Coordinate system already present. Adding new coordinate system, which will replace the existing one.

tilePlotter(rbind(tile,tile_30))
#> Coordinate system already present. Adding new coordinate system, which will replace the existing one.