MaplePrimes - answers and comments on Question, Detect symbolic exponent/floating point in an expression

Use indets

Carl Love — Thu, 06 Dec 2012 04:14:06 Z

A:= x^n+y^3.5:

indets(A, anything^float);
                             / 3.5\
                            { y    }
                             \   /
indets(A, anything^symbol);
                              n
                             { x }

indets(A, `^`);
                           n   3.5
                          { x , y    }

more alternatives

Alejandro Jakubi — Thu, 06 Dec 2012 08:45:31 Z

By pattern matching, binding equations are generated for the extraction of the exponents and bases:

patmatch(x^n+ y^3.5,a::algebraic^s::symbol+b::algebraic^f::float,'p');p;p:='p':
                                      true
                         [a = x, b = y, f = 3.5, s = n]

Also, for symbolics, these undocumented commands may become useful:

`tools/symbolic_degree`(x^n,x);
                                       n
`tools/symbolic_base`(x^n,x);
                                       x

{op(A)}

MDD — Fri, 26 Jun 2015 21:27:54 Z

If A:= x^n+y^3.5
then use

{op(A)}