Pretty polynomial
Pretty form of a qspray
polynomial.
prettyQspray(qspray, vars = NULL)
qspray
: a qspray
objectvars
: variable names; NULL
for "x1"
, "x2"
, ...A character string.
library(qspray) P <- (qlone(1) + "1/2"*qlone(2))^2 + 5 prettyP <- prettyQspray(P, vars = c("x", "y")) prettyP cat(Ryacas::yac_str(sprintf("PrettyForm(%s)", prettyP))) Ryacas::yac_str(sprintf("TeXForm(%s)", prettyP))