In friendly/matlib: Matrix Functions for Teaching and Learning Linear Algebra and Multivariate Statistics

knitr::opts_chunk$set(echo = TRUE)

library(matlib)

Eqn <- function(...) {
    cat("$$\n")
    eval(...)
    cat("$$")
}

Eqn(cat("X=U \\lambda V"))
Eqn({
    symbolicMatrix("u", "n", "k", lhs = '')
    symbolicMatrix("\\lambda", "k", "k", diag=TRUE)
    symbolicMatrix("v", "k", "p", transpose = TRUE)
})

A <- matrix(paste0('a_', 1:9), 3, 3)
b <- paste0("\\beta_", 1:3)

matrix2latex(cbind(A,b))

matrix2latex(cbind(A,b)) |> Eqn()

friendly/matlib documentation built on Dec. 6, 2024, 9:25 a.m.