R/position.R

In EvaMaeRey/ggstamp: Annotation in ggplot using stamp_* functions

Defines functions pos_polygon_x

Documented in pos_polygon_x

pos_polygon_x <- function(x0 = 0,
            n = 5,
            radius = 1,
            rotation = -.5){

  radius * cos(-2*pi*0:(n-1)/n - rotation * pi) + x0

}