# NOT RUN {
# create an mpoly object here (requires library mpoly) (not run)
# convert from mpoly to list representation
# t0 <- mpoly::mpoly(list(c(coef=3,x1=2),c(coef=2,x1=1,x2=3),
# c(coef=-4,z=2),c(coef=1,x1=1,x2=2,z=1)))
# t1 <- convert.mpoly(t0)
# convert from list representation back to an mpoly object
# t2 <- convert.mpoly(t1)
# }
Run the code above in your browser using DataLab