r - 是否有可能以 TeX 形式输出符号表达式

Question

假设我正在对 R 中的表达式求导:

 D(expression((x^3)/(2*(x+1))),"x")

输出是:

3 * x^2/(2 * (x + 1)) - (x^3) * 2/(2 * (x + 1))^2

我想知道这个输出是否可以以 TeX 形式显示在屏幕上，这样更容易阅读。

谢谢。

Answer 1

查看 Ryacas :

> library(Ryacas)
> yacas("TeXForm(3 * x^2/(2 * (x + 1)) - (x^3) * 2/(2 * (x + 1))^2)", 
+   retclass = "unquote")
$\frac{3 x ^{2}}{2 \left( x + 1\right) }  - \frac{2 x ^{3}}{\left( 2 \left( x + 1\right) \right)  ^{2}} $

编辑:或

> library(Ryacas)
> x <- Sym("x")
> y <- (x^3)/(2*(x+1))
> dy <- deriv(y, x)
> dy <- Simplify(dy)
> fmt <- sprintf("TeXForm(%s)", dy)
> yacas(fmt, retclass = "unquote")
$\frac{\left( 2 x + 3\right)  x ^{2}}{2 \left( x ^{2} + 2 x + 1\right) } $