This is a wrapper function used by explore_space_pca() and should be be called directly by the user

add_start(dt, start_size = 5, start_alpha = 1, start_color = NULL, ...)

Arguments

dt

A data object from the running the optimisation algorithm in guided tour

start_size

numeric; the size of start point

start_alpha

numeric; the alpha of start point

start_color

the variable to be coloured by

...

other aesthetics inherent from explore_space_pca()

Value

a wrapper for drawing start points in explore_space_pca()

See also

Examples

library(ggplot2)
# construct the space and start df for plotting
space <- tibble::tibble(x0 = 0, y0 = 0, r = 5)
start <- holes_1d_geo %>%
  compute_pca() %>%
  purrr::pluck("aug") %>%
  clean_method() %>%
  get_start()
ggplot() +
  add_space(dt = space) +
  add_start(dt = start, start_color = info) +
  theme_void() +
  theme(aspect.ratio = 1)