Prepare simple yacas
call
y_fn(x, fn, ...)
parameter to function fn
function with parameter x
additional arguments to fn
y_fn("x^2 - 1", "TeXForm")
#> [1] "TeXForm(x^2 - 1)"
yac_str(y_fn("x^2 - 1", "TeXForm"))
#> [1] "x ^{2} - 1"
y_fn("x^2 - 1", "Factor")
#> [1] "Factor(x^2 - 1)"
yac_str(y_fn("x^2 - 1", "Factor"))
#> [1] "(x+1)*(x-1)"
cmd <- "x^2 - 1 == 0" %>% y_fn("Solve", "x")
cmd
#> [1] "Solve(x^2 - 1 == 0, x)"
sol <- yac_str(cmd)
sol
#> [1] "{x==1,x==(-1)}"
yac_str(y_rmvars(sol))
#> [1] "{1,-1}"