topsa (version 0.1.0)

barcode_plotter: Barcode plotter

Description

Barcode plotter

Usage

barcode_plotter(
  Ydat,
  Xdat,
  maxscale = rep(0.05, ncol(Xdat)),
  mc.cores = parallel::detectCores(logical = FALSE)
)

Arguments

Ydat

A vector with the model's dependent variable.

Xdat

A matrix with the model's input variables.

maxscale

Maximum radius allowed to find the barcode.

mc.cores

Number of cores used to estimate the barcodes in parallel. (See mclapply).

Value

A plot with the barcode for each variable.

Examples

# NOT RUN {
ishigami.fun <- function(X) {
A <- 7
B <- 0.1
sin(X[, 1]) + A * sin(X[, 2])^2 + B * X[, 3]^4 * sin(X[, 1])
}
X <- matrix(runif(3*100, -pi, pi), ncol = 3)
Y <- ishigami.fun(X)

barcode_plotter(Ydat = Y, Xdat = X, maxscale = 0.2, mc.cores = 2)

# }