Generate ellipse coordinates for an indicatrix
Examples
ii <- indicatrix(c(0, 45), "+proj=robin")
ell <- ti_ellipse(ii[[1]], scale = 5e5)
head(ell)
#> [,1] [,2]
#> [1,] 380302.5 4805074
#> [2,] 378855.3 4845730
#> [3,] 374524.8 4886078
#> [4,] 367344.0 4925808
#> [5,] 357367.4 4964620
#> [6,] 344671.1 5002218
## draw on a map
tissot_map(target = "+proj=robin", add = FALSE)
lines(ell)