Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]


Groups > comp.soft-sys.math.maple > #1183

Re: Simplify trigonometric expressions

From Axel Vogt <&noreply@axelvogt.de>
Newsgroups comp.soft-sys.math.maple, sci.math.symbolic
Subject Re: Simplify trigonometric expressions
Date 2015-08-14 23:45 +0200
Message-ID <d375seF7ivpU1@mid.individual.net> (permalink)
References <f14c65d6-4b6e-46ca-bbc9-940bb0fb3127@googlegroups.com> <d36annFljmU1@mid.individual.net> <ae0050b5-53a8-4965-9c1d-4ed536935efd@googlegroups.com>

Cross-posted to 2 groups.

Show all headers | View raw


On 14.08.2015 18:45, Peter Luschny wrote:
> On Friday, August 14, 2015 at 4:02:34 PM UTC+2, Axel Vogt wrote:
>> On 14.08.2015 15:00, Peter Luschny wrote:
>>> How can I teach Maple to simplify these expressions?
>>> I thought this would be peanuts for Maple
>>> (especially as it is peanuts for the competitor).
>>>
>> ...
>>
>> Depends on what one wants do have ... If L denotes
>> the list of your equations then for example
>>
>> convert(L, radical):
>> simplify(%);
>
> OK. So what about these?
>
> [1] -1/7+x-(2/7)*cos((2/7)*Pi)+(2/7)*cos((3/7)*Pi)+(2/7)*cos((1/7)*Pi)
>
> [2] (4/7)*x*cos((1/7)*Pi)-(2/7)*cos((1/7)*Pi)-(4/7)*x*cos((2/7)*Pi)+(2/7)*cos((2/7)*Pi)+(4/7)*x*cos((3/7)*Pi)-(2/7)*cos((3/7)*Pi)+1/7-(2/7)*x+x^2
>
> [3] (2/7)*cos((1/7)*Pi)+(6/7)*x^2*cos((1/7)*Pi)-(6/7)*x*cos((1/7)*Pi)-(2/7)*cos((2/7)*Pi)-(6/7)*cos((2/7)*Pi)*x^2+(6/7)*x*cos((2/7)*Pi)+(2/7)*cos((3/7)*Pi)+(6/7)*x^2*cos((3/7)*Pi)-(6/7)*x*cos((3/7)*Pi)-1/7+(3/7)*x-(3/7)*x^2+x^3
>
> [4] -(2/7)*cos((1/7)*Pi)-(12/7)*x^2*cos((1/7)*Pi)+(8/7)*x*cos((1/7)*Pi)+(8/7)*x^3*cos((1/7)*Pi)-(8/7)*cos((2/7)*Pi)*x^3+(2/7)*cos((2/7)*Pi)+(12/7)*cos((2/7)*Pi)*x^2-(8/7)*x*cos((2/7)*Pi)-(2/7)*cos((3/7)*Pi)-(12/7)*x^2*cos((3/7)*Pi)+(8/7)*x*cos((3/7)*Pi)+(8/7)*x^3*cos((3/7)*Pi)+1/7-(4/7)*x+(6/7)*x^2-(4/7)*x^3+x^4
>

evalf[20](L): fnormal(%): identify(%); # to have a guess

                                 2   3   4
                            [x, x , x , x ]

convert(L, RootOf): # nun aber in echt ...
simplify(%);
                                 2   3   4
                            [x, x , x , x ]

I think it is also "what is intended by simplify (and should trig
survive)?" Thus I included sci.math.symbolic for further answers.

PS: would you mind to post as list

PPS: well, it may break down at some degree

Back to comp.soft-sys.math.maple | Previous | NextPrevious in thread | Next in thread | Find similar


Thread

Simplify trigonometric expressions Peter Luschny <peter.luschny@gmail.com> - 2015-08-14 06:00 -0700
  Re: Simplify trigonometric expressions Axel Vogt <&noreply@axelvogt.de> - 2015-08-14 16:02 +0200
    Re: Simplify trigonometric expressions Peter Luschny <peter.luschny@gmail.com> - 2015-08-14 09:37 -0700
    Re: Simplify trigonometric expressions Peter Luschny <peter.luschny@gmail.com> - 2015-08-14 09:45 -0700
      Re: Simplify trigonometric expressions Peter Luschny <peter.luschny@gmail.com> - 2015-08-14 12:39 -0700
      Re: Simplify trigonometric expressions Axel Vogt <&noreply@axelvogt.de> - 2015-08-14 23:45 +0200
        Re: Simplify trigonometric expressions Peter Luschny <peter.luschny@gmail.com> - 2015-08-15 01:43 -0700
        Re: Simplify trigonometric expressions clicliclic@freenet.de - 2015-08-19 14:59 +0200
          Re: Simplify trigonometric expressions Peter Luschny <peter.luschny@gmail.com> - 2015-08-19 11:19 -0700
            Re: Simplify trigonometric expressions Axel Vogt <&noreply@axelvogt.de> - 2015-08-19 22:08 +0200
              Re: Simplify trigonometric expressions Peter Luschny <peter.luschny@gmail.com> - 2015-08-20 06:14 -0700
              Re: Simplify trigonometric expressions clicliclic@freenet.de - 2015-08-22 13:55 +0200

csiph-web