Print Method for vector_rsa_design
Usage
# S3 method for class 'vector_rsa_design'
print(x, ...)Examples
# \donttest{
D <- as.matrix(dist(matrix(rnorm(5*3), 5, 3)))
rownames(D) <- colnames(D) <- letters[1:5]
labels <- factor(rep(letters[1:5], 2))
block_var <- rep(1:2, each=5)
des <- vector_rsa_design(D, labels, block_var)
print(des)
#> ==================================================
#> Vectorized RSA Design
#> ==================================================
#>
#> Distance Matrix:
#> |- Original Dimensions: 5 x 5
#> Labels:
#> |- Total Labels: 10
#> |- Sample: a, b, c, d, e, ...
#> Blocks:
#> |- Number of Blocks: 2
#> |- Block Labels: 1, 2
#> Expanded D Matrix:
#> |- Dimensions: 10 x 10
#>
#> ==================================================
# }