caracas: Computer algebra in R
caracas is available on CRAN and can be installed as usual:
install.packages('caracas')To build and install from Github with vignettes run this command from within R (please install remotes first if not already installed):
# install.packages('remotes')
remotes::install_github("r-cas/caracas", build_vignettes = TRUE)You can also install the package without vignettes if needed as follows:
remotes::install_github("r-cas/caracas")See https://github.com/r-cas/caracas.
See https://r-cas.github.io/caracas/.
The name “caracas” is intended to mean “(inter)face to computer algebra system(s)” - notice that “cara” is Spanish (Castellano to be precise) for “face”.
Please note that the caracas project is released with a Contributor Code of Conduct (available in CODE_OF_CONDUCT.md). By contributing to this project, you agree to abide by its terms.
x <- symbol('x')
eq <- 2*x^2 - x
eq
#> [caracas]: 2
#> 2⋅x - x
as.character(eq)
#> [1] "2*x^2 - x"
as_r(eq)
#> expression(2 * x^2 - x)
tex(eq)
#> [1] "2 x^{2} - x"solve_sys(eq, x)
#> Solution 1:
#> x = 0
#> Solution 2:
#> x = 1/2
der(eq, x)
#> [caracas]: 4⋅x - 1
subs(eq, x, "y")
#> [caracas]: 2
#> 2⋅y - yA <- matrix(c("x", 2, 0, "2*x"), 2, 2)
B <- as_symbol(A)
B
#> [caracas]: ⎡x 0 ⎤
#> ⎢ ⎥
#> ⎣2 2⋅x⎦
Binv <- inv(B)
Binv
#> [caracas]: ⎡ 1 ⎤
#> ⎢ ─ 0 ⎥
#> ⎢ x ⎥
#> ⎢ ⎥
#> ⎢-1 1 ⎥
#> ⎢─── ───⎥
#> ⎢ 2 2⋅x⎥
#> ⎣ x ⎦
tex(Binv)
#> [1] "\\left[\\begin{matrix}\\frac{1}{x} & 0\\\\- \\frac{1}{x^{2}} & \\frac{1}{2 x}\\end{matrix}\\right]"eigen_val(Binv)
#> [[1]]
#> [[1]]$eigval
#> [caracas]: 1
#> ─
#> x
#>
#> [[1]]$eigmult
#> [1] 1
#>
#>
#> [[2]]
#> [[2]]$eigval
#> [caracas]: 1
#> ───
#> 2⋅x
#>
#> [[2]]$eigmult
#> [1] 1Please find more examples in the other vignettes available at https://r-cas.github.io/caracas/.