Package: DataSimilarity
Check: examples
New result: ERROR
  Running examples in ‘DataSimilarity-Ex.R’ failed
  The error most likely occurred in:
  
  > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
  > ### Name: BallDivergence
  > ### Title: Ball Divergence Based Two- or k-sample Test
  > ### Aliases: BallDivergence
  > ### Keywords: htest numeric testing approach
  > 
  > ### ** Examples
  > 
  > set.seed(1234)
  > # Draw some data
  > X1 <- matrix(rnorm(1000), ncol = 10)
  > X2 <- matrix(rnorm(1000, mean = 0.5), ncol = 10)
  > # Calculate Ball Divergence and perform test 
  > if(requireNamespace("Ball", quietly = TRUE)) {
  +   BallDivergence(X1, X2, n.perm = 100)
  + }
  Error in match.arg(weight) : 'arg' must be of length 1
  Calls: BallDivergence ... do.call -> <Anonymous> -> bd.test.default -> match.arg
  Execution halted

Package: DataSimilarity
Check: tests
New result: ERROR
    Running ‘testthat.R’ [107s/103s]
  Running the tests in ‘tests/testthat.R’ failed.
  Complete output:
    > library(testthat)
    > library(DataSimilarity)
    > 
    > test_check("DataSimilarity")
    Using automatic sigma estimation (sigest) for RBF or laplace kernel 
    Using automatic sigma estimation (sigest) for RBF or laplace kernel 
    [ FAIL 1 | WARN 0 | SKIP 0 | PASS 2479 ]
    
    ══ Failed tests ════════════════════════════════════════════════════════════════
    ── Error ('test-BallDivergence.R:15:7'): (code run outside of `test_that()`) ───
    Error in `match.arg(weight)`: 'arg' must be of length 1
    Backtrace:
        ▆
     1. └─DataSimilarity (local) testBallDivergence(10) at test-BallDivergence.R:66:1
     2.   └─DataSimilarity::BallDivergence(X1, X2, n.perm = 0, seed = i) at test-BallDivergence.R:15:7
     3.     ├─base::do.call(...)
     4.     ├─Ball (local) `<fn>`(...)
     5.     └─Ball:::bd.test.default(...)
     6.       └─base::match.arg(weight)
    
    [ FAIL 1 | WARN 0 | SKIP 0 | PASS 2479 ]
    Error: Test failures
    Execution halted

Package: MFSIS
Check: examples
New result: ERROR
  Running examples in ‘MFSIS-Ex.R’ failed
  The error most likely occurred in:
  
  > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
  > ### Name: BcorSIS
  > ### Title: A Generic Sure Independence Screening Procedure
  > ### Aliases: BcorSIS
  > 
  > ### ** Examples
  > 
  > 
  > ## Scenario 1  generate complete data
  > n <- 100
  > p <- 200
  > rho <- 0.5
  > data <- GendataLM(n, p, rho, error = "gaussian")
  > data <- cbind(data[[1]], data[[2]])
  > colnames(data)[1:ncol(data)] <- c(paste0("X", 1:(ncol(data) - 1)), "Y")
  > data <- as.matrix(data)
  > X <- data[, 1:(ncol(data) - 1)]
  > Y <- data[, ncol(data)]
  > A1 <- BcorSIS(X, Y, n / log(n))
  Error in match.arg(arg = weight, choices = WEIGHT_TYPE) : 
    'arg' must be of length 1
  Calls: BcorSIS -> bcorsis -> examine_weight_arguments -> match.arg
  Execution halted