Description Usage Arguments Value Examples
Homogenize a polynomial.
1 2 3 4 5 6 7 | homogenize(x, indeterminate = "t")
dehomogenize(x, indeterminate = "t")
is.homogeneous(x)
homogeneous_components(x)
|
x |
an mpoly object, see |
indeterminate |
name of homogenization |
a (de/homogenized) mpoly or an mpolyList
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 | x <- mp("x^4 + y + 2 x y^2 - 3 z")
is.homogeneous(x)
(xh <- homogenize(x))
is.homogeneous(xh)
homogeneous_components(x)
homogenize(x, "o")
xh <- homogenize(x)
dehomogenize(xh) # assumes indeterminate = "t"
plug(xh, "t", 1) # same effect, but dehomogenize is faster
# the functions are vectorized
(ps <- mp(c("x + y^2", "x + y^3")))
(psh <- homogenize(ps))
dehomogenize(psh)
# demonstrating a leading property of homogeneous polynomials
library(magrittr)
p <- mp("x^2 + 2 x + 3")
(ph <- homogenize(p, "y"))
lambda <- 3
(d <- totaldeg(p))
ph %>%
plug("x", lambda*mp("x")) %>%
plug("y", lambda*mp("y"))
lambda^d * ph
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.