Extract the anchor points on the geodesic path

get_anchor(dt, group = NULL)

Arguments

dt

a data object collected by the projection pursuit guided tour optimisation in the tourr package

group

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

Value

a tibble object containing the target bases in each iteration

See also

Examples

holes_1d_better %>% get_anchor()
#> # A tibble: 5 x 8 #> basis index_val info method alpha tries loop id #> <list> <dbl> <chr> <chr> <dbl> <dbl> <dbl> <int> #> 1 <dbl[,1] [5 × 1]> 0.749 new_basis search_better 0.5 1 1 1 #> 2 <dbl[,1] [5 × 1]> 0.752 new_basis search_better 0.5 2 6 2 #> 3 <dbl[,1] [5 × 1]> 0.798 new_basis search_better 0.495 3 1 3 #> 4 <dbl[,1] [5 × 1]> 0.813 new_basis search_better 0.49 4 7 4 #> 5 <dbl[,1] [5 × 1]> 0.904 new_basis search_better 0.485 5 3 5
holes_1d_geo %>% get_anchor()
#> # A tibble: 34 x 8 #> basis index_val info method alpha tries loop id #> <list> <dbl> <chr> <chr> <dbl> <dbl> <dbl> <int> #> 1 <dbl[,1] [5 × … 0.749 new_basis search_geode… 0.5 1 1 1 #> 2 <dbl[,1] [5 × … 0.753 best_line_se… search_geode… NA 2 1 2 #> 3 <dbl[,1] [5 × … 0.793 best_line_se… search_geode… NA 3 1 3 #> 4 <dbl[,1] [5 × … 0.805 best_line_se… search_geode… NA 4 1 4 #> 5 <dbl[,1] [5 × … 0.836 best_line_se… search_geode… NA 5 1 5 #> 6 <dbl[,1] [5 × … 0.890 best_line_se… search_geode… NA 6 1 6 #> 7 <dbl[,1] [5 × … 0.917 best_line_se… search_geode… NA 7 1 7 #> 8 <dbl[,1] [5 × … 0.929 best_line_se… search_geode… NA 8 1 8 #> 9 <dbl[,1] [5 × … 0.929 best_line_se… search_geode… NA 9 1 9 #> 10 <dbl[,1] [5 × … 0.933 best_line_se… search_geode… NA 9 2 10 #> # … with 24 more rows