The frozen guided tour
frozen_guided_tour(frozen, index_f, d = 2, max.tries = 25)
matrix of frozen variables, as described in
freeze
the index function to optimise.
target dimensionality
the maximum number of unsuccessful attempts to find a better projection before giving up
frozen <- matrix(NA, nrow = 4, ncol = 2)
frozen[3, ] <- .5
animate_xy(flea[, 1:4], frozen_guided_tour(frozen, holes()))
#> Converting input data to the required matrix format.
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Best was: 1.582 (0.781 away). Trying again...
#> Using half_range 65