# \donttest{
set.seed(123)
X <- matrix(rnorm(1000), nrow = 100, ncol = 10)
# Single matrix correlation
res <- bdCorr_matrix(X)
# Transposed (sample-sample correlations)
res_t <- bdCorr_matrix(X, trans_x = TRUE)
# Cross-correlation with a second matrix
Y <- matrix(rnorm(400), nrow = 100, ncol = 4)
res_xy <- bdCorr_matrix(X, Y)
# }
Run the code above in your browser using DataLab