Print number of predictors and principal components used.

# S3 method for apd_similarity
print(x, ...)

Arguments

x

A apd_similarity object.

...

Not currently used, but required for extensibility.

Value

None

Examples


set.seed(535)
tr_x <- matrix(
  sample(0:1, size = 20 * 50, prob = rep(.5, 2), replace = TRUE),
  ncol = 20
 )
model <- apd_similarity(tr_x)
print(model)
#> Applicability domain via similarity
#> Reference data were 20 variables collected on 50 data points.
#> New data summarized using the mean.