powered by
This function takes a set of bases and produces a tour by geodesically interpolating between each basis
interpolate(basis_set, angle = 0.05)
input basis set
target distance (in radians) between bases
# NOT RUN { t1 <- save_history(flea[, 1:6], grand_tour(1), max = 10) dim(t1) dim(interpolate(t1, 0.01)) dim(interpolate(t1, 0.05)) dim(interpolate(t1, 0.1)) # }
Run the code above in your browser using DataLab