Можно ли иметь символический вывод выражений в виде 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

Ну, стандартные подпрограммы текстового построения принимают аргументы типа «выражение» и интерпретируют их по правилам типа TeX. См. «Plotmath» для получения дополнительной информации. В вашем случае вы можете использовать что-то вроде этого:

plot(1:10, 1:10, type = "n") 
text(5, 5, D(expression((x^3)/(2*(x+1))),"x")) 

Answer 2

Заканчивать 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}} $ 

EDIT: или

> 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) } $