Plot the grand tour animation of the bases space in high dimension

```
explore_space_tour(...)
prep_space_tour(
dt,
group = NULL,
flip = FALSE,
color = NULL,
rand_size = 1,
point_size = 1.5,
end_size = 5,
theo_size = 3,
theo_shape = 17,
theo_color = "black",
palette = botanical_palettes$fern,
...
)
```

## Arguments

- ...
other argument passed to `tourr::animate_xy()`

and `prep_space_tour()`

- dt
a data object collected by the projection pursuit guided tour optimisation in `tourr`

- group
the variable to label different runs of the optimiser(s)

- flip
logical; if the sign flipping need to be performed

- color
the variable to be coloured by

- rand_size
numeric; the size of random points

- point_size
numeric; the size of points searched by the optimiser(s)

- end_size
numeric; the size of end points

- theo_size
numeric; the size of theoretical point(s)

- theo_shape
numeric; the shape symbol in the basic plot

- theo_color
character; the color of theoretical point(s)

- palette
the colour palette to be used

## Value

`explore_space_tour()`

an animation of the search path in the high-dimensional sphere

`prep_space_tour()`

a list containing various components needed for producing the animation

## Examples

```
explore_space_tour(dplyr::bind_rows(holes_1d_better, holes_1d_geo),
group = method, palette = botanical_palettes$fern[c(1, 6)]
)
#> map method to color
#> target_dist - cur_dist: 0
#> generation: dist = 1.767093
#> Using half_range 0.56
#> target_dist - cur_dist: 1.767093
```