Make spirograph arrowheads

## Usage

```
arrow_head_hypotrochoid(
r = 4,
R = 3,
d = r,
windings = r,
rotate = 0,
rescale = c(1, 1),
nudge = c(0, 0),
transformations = c("unitizer", "rotater", "rescaler", "nudger"),
n = 361,
plot = FALSE
)
arrow_head_deltoid(
d = 2.6,
rotate = pi,
rescale = c(1, 0.5),
nudge = c(0, 0),
transformations = c("unitizer", "rotater", "rescaler", "nudger"),
n = 361,
plot = FALSE
)
```

## Arguments

- r
cycling circle radius

- R
fixed circle radius

- d
pen distance

- windings
windings

- rotate
rotation angle in radians

- rescale
a single value or 2-length vector for scaling in x and y

- nudge
a single value or 2-length vector for nudging in x and y

- transformations
a vector of transformation functions

- n
number of points in polygon

- plot
plot arrowhead if TRUE

## Examples

```
star5 <- arrow_head_hypotrochoid(plot = TRUE, rotate = pi)
star5_long <- arrow_head_hypotrochoid(
plot = TRUE,
r = 4,
R = 3,
rotate = pi,
rescale = c(1, .4)
)
deltoid_long <- arrow_head_deltoid(plot = TRUE, rescale = c(1,1))
deltoid_long <- arrow_head_deltoid(plot = TRUE)
deltoid_spaced <- arrow_head_deltoid(plot = TRUE,
rescale = c(.6,.3),
nudge = c(.4, 0))
```