This function takes a set of bases and produces a tour by geodesically interpolating between each basis
interpolate(basis_set, angle = 0.05, cycle = FALSE)input basis set
target distance (in radians) between bases
For planned_tour cycle through continuously (TRUE) or stop after first pass (FALSE)
t1 <- save_history(flea[, 1:6], grand_tour(1), max = 3)
#> Converting input data to the required matrix format.
dim(t1)
#> [1] 6 1 3
dim(interpolate(t1, 0.01))
#> [1] 6 1 226
dim(interpolate(t1, 0.05))
#> [1] 6 1 47
dim(interpolate(t1, 0.1))
#> [1] 6 1 25
t2 <- save_history(flea[, 1:6], grand_tour(2), max = 2)
#> Converting input data to the required matrix format.
dim(interpolate(t2, 0.05))
#> [1] 6 2 32