Extract matrix from scaled matrix

Source: R/matrix_scaled.R

Extract matrix from scaled matrix

unscale_matrix(X)

Arguments

X

scaled matrix created with scale_matrix()

Examples

if (has_sympy()) {
  V <- matrix_sym(2, 2, "v")
  a <- symbol("a")
  Ks <- scale_matrix(V, a, divide = FALSE)
  Ks
  unscale_matrix(Ks)
  V %*% a
}
#> c: ⎡a⋅v₁₁  a⋅v₁₂⎤
#>    ⎢            ⎥
#>    ⎣a⋅v₂₁  a⋅v₂₂⎦