#' Parameter for the effective minimum distance between embedded points
#'
#' Used in `embed::step_umap()`.
#'
#' @inheritParams Laplace
#' @examples
#' min_dist()
#' @export
min_dist <- function(range = c(-4, 0), trans = transform_log10()) {
new_quant_param(
type = "double",
range = range,
inclusive = c(TRUE, TRUE),
trans = trans,
label = c(min_dist = "Min Distance between Points"),
finalize = NULL
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.