save_history | R Documentation |
Save a tour path so it can later be displayed in many different ways.
save_history(
data,
tour_path = grand_tour(),
max_bases = 100,
start = NULL,
rescale = FALSE,
sphere = FALSE,
step_size = Inf,
...
)
data |
matrix, or data frame containing numeric columns |
tour_path |
tour path generator |
max_bases |
maximum number of new bases to generate. Some tour paths (like the guided tour) may generate less than the maximum. |
start |
starting projection, if you want to specify one |
rescale |
Default FALSE. If TRUE, rescale all variables to range [0,1]? |
sphere |
if true, sphere all variables |
step_size |
distance between each step - defaults to |
... |
additional arguments passed to tour path |
# You can use a saved history to replay tours with different visualisations
t1 <- save_history(flea[, 1:6], max = 3)
animate_xy(flea[, 1:6], planned_tour(t1))
## andrews_history(t1)
## andrews_history(interpolate(t1))
## t1 <- save_history(flea[, 1:6], grand_tour(4), max = 3)
## animate_pcp(flea[, 1:6], planned_tour(t1))
## animate_scatmat(flea[, 1:6], planned_tour(t1))
## t1 <- save_history(flea[, 1:6], grand_tour(1), max = 3)
## animate_dist(flea[, 1:6], planned_tour(t1))
testdata <- matrix(rnorm(100 * 3), ncol = 3)
testdata[1:50, 1] <- testdata[1:50, 1] + 10
testdata <- sphere_data(testdata)
t2 <- save_history(testdata, guided_tour(holes(), max.tries = 10),
max = 5
)
animate_xy(testdata, planned_tour(t2))
# Or you can use saved histories to visualise the path that the tour took.
plot(path_index(interpolate(t2), holes()))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.