2016-09-06 19 views

答えて

1

簡単な答えは、freeofを使用することです。そして、

(%i1) exponentp(e,n):=not mapatom(e) and 
         op(e) = "^" and not freeof(n,second(args(e)))$ 

希望の答えをある
(%i2) map(exponentp,[2*n,n^2,2^n,(n+1)^(a+b), (a+b)^(n+c),2^(3/n+1)],[n,n,n,n,n,n]); 

(%o2) [false,false,true,false,true,true] 

、私は信じています。

+0

素晴らしい、ありがとう! – Kasper